I've tried to pass valve that select from combobox list in
event name "DropDown1_Change" to any cell but not success.
For combobox object on excel form ( not in VBA toolbar )
seem has no any property or method ( exclude input range,
cell link and dropdown line )

If anyone know how to solve this problem please let me know
Thank you very much in advance.

Sheets("YourSheet").Range("A1").Value=ComboBox1.Va lue

Substitute appropriate name for ComboBox1

HTH
Paul
--------------------------------------------------------------------------------------------------------------
Be advised to back up your WorkBook before attempting to make changes.
--------------------------------------------------------------------------------------------------------------
I've tried to pass value that select from combobox list in
event name "DropDown1_Change" to any cell but not success.
For combobox object on excel form ( not in VBA toolbar )
seem has no any property or method ( exclude input range,
cell link and dropdown line )

If anyone know how to solve this problem please let me know
Thank you very much in advance.

Sounds like this is a dropdown from the forms toolbar.

In a general module, put in code like this

Public Sub DropDown1_Change()
Dim drpdwn as DropDown
set drpdwn = ActiveSheet.DropDowns(Application.Caller)
With drpdwn
Activesheet.Cells(1,1).Value = .List(.ListIndex)
End With
End sub

right click on your combobox and choose assign macro. Assign the above
macro.

--
regards,
Tom Ogilvy

"chanon" wrote in message
...
I've tried to pass valve that select from combobox list in
event name "DropDown1_Change" to any cell but not success.
For combobox object on excel form ( not in VBA toolbar )
seem has no any property or method ( exclude input range,
cell link and dropdown line )

If anyone know how to solve this problem please let me know
Thank you very much in advance.

Thank you for all comment. I appreciate for rapidly answer everyone give
to me.


*** Sent via Developersdex http://www.developersdex.com ***
Don't just participate in USENET...get rewarded for it!