Estimados, tengo un form con muchos botones (command) y quiero poner un combobox que tenga los items coincidentes con los botones. Pensaba en vincularlos por el caption pero no lo logro (for each.con una varíable object.. type name(a)= "command"...)

Es un trabajo con cadena de textos,cada botón posee un tipo de documentacion. Como son alrededor de 50 quería que tuviera las dos opciones, botón y combo...

Soy novato... sugerencias?

Gracias!

se supone que tenemos un combo con Command1,Command2, etc
y varios botones Command1, Command2, etc

Private Sub Combo1_Click()
If Combo1 = "Command1" Then Command1_Click
End Sub

Private Sub Command1_Click()
Label1 = "Hola"
End Sub

Es lo que tengo por ahora.

Pedro, primero gracias por tu respuesta. Intenté de ese modo pero tengo 59 command..(es una barbaridad, ya lo sé...) Pero es un form. que lo uso de comodín ante posibles faltantes de documentación descripta en otros form.
Cuando lo quise hacer así al insertar el condicional 9 me arroja error...

If Combo1.Text = Command1.Caption Then: Command1_Click
If Combo1.Text = Command1.Caption Then: Command2_Click
If Combo1.Text = Command1.Caption Then Command3_Click
If Combo1.Text = Command1.Caption Then Command4_Click
If Combo1.Text = Command1.Caption Then Command5_Click
If Combo1.Text = Command1.Caption Then Command6_Click
If Combo1.Text = Command1.Caption Then Command7_Click
If Combo1.Text = Command1.Caption Then Command8_Click
If Combo1.Text = Command1.Caption Then Command10_Click
If Combo1.Text = Command1.Caption Then Command11_Click

"Procedimiento sub o function no definido"

Los items del combo1 los tomé del caption de los command pero en esto estoy atascado...

Seguro esto es una barbaridad.. pero podría venir por este lado?

'Dim d, e, f, r As String, g As Object

'd = Combo1.Text
'e = Combo1.ListIndex

'f = "Command" & e


' For Each g In OTRADOC.Controls
' If TypeName(g) = "Command" Then
' If g.Name = f Then
' g.SetFocus
' End If
' End If

Si el error es "Procedimiento sub o function no definido" es bastante probable que se deba a que una de las funciones CommandXX_Click no existe. Quizas deberias revisar los nombres de las funciones

jar, me he fijado y está todo correcto. Haciéndolo con el IF THEN o Con CASE me toma sólo 9 posibilidades, en la décima me arroja dicho error.

Es decir, que actualmente no puedo determinarlo de ninguna forma y me está tomando demasiado tiempo... El problema es que soy demasiado novato porque seguramente existe una posibilidad de no hacerlo de modo tan repetitivo o.. no?

Agradezco a quienes comentaron y espero la ayuda del resto...

Jar, me retracto me saltaba el error por no asignarle una función a los commandb..

Por ese lado podría hacerlo así.. de todos modos... espero respuesta si hay posibilidad de describir el procedimiento con variables sin describir uno por uno en forma repetitiva... GraciaS!