P
paresh
Hi,
Could any one please help me with setting below properties for combobox
created on Outlook toolbar using Outlook 2007 Add-in. Please refer attached
initial code I wrote to create combobox in my Outlook command bar.
Could you tell me how to achieve below items:
1. When I select any "test" items from combobox the myComboBox_Click()
doesn't get called. Could you tell me what is wrong in the code?
2. How to add "FaceID" along with msoComboLabel properties? Basically I
want to have picture with the label name. I cannot use ".FaceID" as it gives
compile time error "method or data type not found". Could you help me on this.
Any help would be much appreciated.
My code:
' I have written below code in Connect.Dsr
' For your information, the similar methods work for CommandBarButton
Private WithEvents myComboBox As Office.CommandBarComboBox
Private Sub myComboBox_Click()
MsgBox "Combobox selection change event"
End Sub
Set mylComboBox = myCommandBar.Controls.Add(msoControlComboBox)
With myComboBox
.OnAction = "myComboBox_Click"
.Style = msoComboLabel
.AddItem "test1"
.AddItem "test2"
.AddItem "test3"
.Visible = True
End With
End If
Thanks.
Could any one please help me with setting below properties for combobox
created on Outlook toolbar using Outlook 2007 Add-in. Please refer attached
initial code I wrote to create combobox in my Outlook command bar.
Could you tell me how to achieve below items:
1. When I select any "test" items from combobox the myComboBox_Click()
doesn't get called. Could you tell me what is wrong in the code?
2. How to add "FaceID" along with msoComboLabel properties? Basically I
want to have picture with the label name. I cannot use ".FaceID" as it gives
compile time error "method or data type not found". Could you help me on this.
Any help would be much appreciated.
My code:
' I have written below code in Connect.Dsr
' For your information, the similar methods work for CommandBarButton
Private WithEvents myComboBox As Office.CommandBarComboBox
Private Sub myComboBox_Click()
MsgBox "Combobox selection change event"
End Sub
Set mylComboBox = myCommandBar.Controls.Add(msoControlComboBox)
With myComboBox
.OnAction = "myComboBox_Click"
.Style = msoComboLabel
.AddItem "test1"
.AddItem "test2"
.AddItem "test3"
.Visible = True
End With
End If
Thanks.