RE: Combobox on an Outlook form with VBscript
- From: atwork <atwork@xxxxxxxxxxxxxxxxxxxxxxxxx>
- Date: Mon, 2 May 2005 10:36:09 -0700
I modified my code to look like this:
Option Explicit
dim Control
function Item_Open()
dim Page
Set Page = Item.GetInspector.ModifiedFormPages("PickOne")
Set Control = Page.Controls("cbosubject")
'Set Control = Nothing
call subject
end function
sub subject()
Control.additem "Marketing"
Control.additem "Sales"
It is now working
"atwork" wrote:
> I am new to outlook and to programming so i am struggiling. I have had one VB
> class about 2 years ago. I am trying to fill a combobox with vbscript code.
> After reading a few articles and trying to peice everything together this is
> what i have done.
>
> Option Explicit
> dim Control
>
> Sub cbosubject_click()
> Set Page = Item.GetInspector.ModifiedFormPages("PickOne")
> Set Control = Page.Controls("cbosubject")
> Control.additem "Marketing"
> Control.additem "Sales"
> End sub
>
> PickOne is the name of the form and
> cbosubject is the name of the combobox
>
> The question or problem is when I run the form there is nothing in the
> combobox
>
> Thanks in advance
>
>
.
- Prev by Date: Re: Manipulating Word Paragraphs and Shapes using VBA
- Next by Date: Word 2003 template -No security warning for High level.
- Previous by thread: problem loading picture in Forms.Image
- Next by thread: Word 2003 template -No security warning for High level.
- Index(es):
Relevant Pages
|
