PDA

View Full Version : Solved: CommandBars.Add DropDown LinkedCell?



omnibuster
10-09-2010, 12:06 PM
Hi.
I was stuck here and need some advice!
How to add for ControlDropdown LinkedCell or get DropDown Selected Item Text?
:banghead:

CharlesH
10-10-2010, 04:21 PM
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
10-10-2010, 05:10 PM
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
10-10-2010, 05:18 PM
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
10-10-2010, 06:21 PM
Hmmm, without more interaction from him it's hopeless :)

omnibuster
10-11-2010, 10:16 AM
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.