Solved: CommandBars.Add DropDown LinkedCell?

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

HI,

The following code may help.

Code:

---

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

---

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?

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?

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

Thanks CharlesH and Simon Lloyd.
[vba]

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

[/vba]

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

Sry my bad english.