#1   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 26
Default ComboBox

I'm sure this is possible and is probably easy, but I can't figure it out
(I'm learning, but still have a ways to go). I have a ComboBox that has only
three choices. Depending on which one you choose I'd like for it to run a
macro that I've already built. How do I attach the macro based on what the
user chooses? I would really appreciate any help.

--
Message posted via OfficeKB.com
http://www.officekb.com/Uwe/Forums.a...mming/200808/1

  #2   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 292
Default ComboBox

Assuming Combobox from the ActiveX toolbox:

Private Sub ComboBox1_Change()
Call ComboBox1_Click
End Sub

Private Sub ComboBox1_Click()
Select Case ComboBox1.ListIndex
Case -1
Call Msg("nothing, nonexisting entry")
Case 0
Call Msg("First choice")
Case 1
Call Msg("Secong choice")
Case 2
Call Msg("THird choice")
Case Else
Call Msg(ComboBox1.Text)
End Select
End Sub

Sub Msg(ByRef S As String)
ActiveSheet.Range("C12").Value = S
End Sub

HTH. Best wishes Harald


"lonnierudd via OfficeKB.com" <u11209@uwe skrev i melding
news:88046b7228010@uwe...
I'm sure this is possible and is probably easy, but I can't figure it out
(I'm learning, but still have a ways to go). I have a ComboBox that has
only
three choices. Depending on which one you choose I'd like for it to run a
macro that I've already built. How do I attach the macro based on what the
user chooses? I would really appreciate any help.

--
Message posted via OfficeKB.com
http://www.officekb.com/Uwe/Forums.a...mming/200808/1



  #3   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 26
Default ComboBox

Thanks!

Harald Staff wrote:
Assuming Combobox from the ActiveX toolbox:

Private Sub ComboBox1_Change()
Call ComboBox1_Click
End Sub

Private Sub ComboBox1_Click()
Select Case ComboBox1.ListIndex
Case -1
Call Msg("nothing, nonexisting entry")
Case 0
Call Msg("First choice")
Case 1
Call Msg("Secong choice")
Case 2
Call Msg("THird choice")
Case Else
Call Msg(ComboBox1.Text)
End Select
End Sub

Sub Msg(ByRef S As String)
ActiveSheet.Range("C12").Value = S
End Sub

HTH. Best wishes Harald

I'm sure this is possible and is probably easy, but I can't figure it out
(I'm learning, but still have a ways to go). I have a ComboBox that has
only
three choices. Depending on which one you choose I'd like for it to run a
macro that I've already built. How do I attach the macro based on what the
user chooses? I would really appreciate any help.


--
Message posted via OfficeKB.com
http://www.officekb.com/Uwe/Forums.a...mming/200808/1

Reply
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
fill combobox depending on selection from another combobox Adam Francis Excel Discussion (Misc queries) 2 July 24th 08 07:39 PM
Combobox items determined by the selection in another combobox Alerion Excel Programming 2 September 13th 06 01:07 PM
Combobox options based on the input of another combobox afmullane[_5_] Excel Programming 1 May 3rd 06 01:44 PM
ComboBox list reliant on the entry from a different ComboBox ndm berry[_2_] Excel Programming 4 October 4th 05 04:40 PM
How Do I Load A ComboBox RowSource From The Results Of Another ComboBox Minitman[_4_] Excel Programming 3 October 26th 04 07:58 PM


All times are GMT +1. The time now is 05:11 PM.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Copyright ©2004-2024 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"