Solved: CommandBars.Add DropDown LinkedCell?

[omnibuster]

Hi.
I was stuck here and need some advice!
How to add for ControlDropdown LinkedCell or get DropDown Selected Item Text?
:banghead:

[CharlesH]

HI,

The following code may help.



Sub mAction()
Dim Thisitem As Integer
Dim Thisname As String
With CommandBars("newMenubar").Controls("OmaDrDwn")
Thisitem = .ListIndex
Thisname = .List(.ListIndex)
End With
End Sub

[Simon Lloyd]

Charles, i just looked at his code and it seems he wants to set CommandBars("newMenubar").Controls("OmaDrDwn") to a linked cell G1. I may be wrong but i don't think there is a linked cell property for that control is there?

[CharlesH]

Simon,

I do not know about the "Linked" cells or if it's possible, but I think he also wanted the Text of the selected item in the dropdown. He may also mean when he makes a selection from the dropdown have that selection populate the sheet?

[Simon Lloyd]

Hmmm, without more interaction from him it's hopeless :)

[omnibuster]

Thanks CharlesH and Simon Lloyd.


Sub mAction()
Dim Thisitem As Integer
Dim Thisname As String
With CommandBars("newMenubar").Controls("OmaDrDwn")
Thisitem = .ListIndex
Thisname = .List(.ListIndex)
End With
End Sub


That exactly what it needed.(Text of the selected item in the dropdown.)

Sry my bad english.