Tema: VBA combobox
Ver Mensaje Individual
  #5 (permalink)  
Antiguo 24/02/2012, 08:26
Avatar de lukas4
lukas4
 
Fecha de Ingreso: octubre-2008
Ubicación: frente al pc
Mensajes: 496
Antigüedad: 15 años, 6 meses
Puntos: 12
Respuesta: VBA combobox

andale, algo asi ocupo, pero lo que ocupo es que me cargue los combos desde que le doy click al boton en el worksheet de excel, mas no desde el form en si. La solución que encontre es la siguiente:

Código vb:
Ver original
  1. Public Sub LoadCombos(pcb As ComboBox)
  2. With pcb
  3.     .Clear
  4.     .AddItem "Select..."
  5.     .AddItem "Yes"
  6.     .AddItem "No"
  7.     .Text = .List(0)
  8. End With
  9. End Sub

y mando llamar esa función en el initialize:

Código vb:
Ver original
  1. Private Sub UserForm_Initialize()
  2.  
  3. LoadCombos answer1
  4. answer1.Style = fmStyleDropDownList
  5. LoadCombos answer2
  6. answer2.Style = fmStyleDropDownList
  7. LoadCombos answer3
  8. answer3.Style = fmStyleDropDownList
  9. LoadCombos answer4
  10. answer4.Style = fmStyleDropDownList
  11. LoadCombos answer5
  12. answer5.Style = fmStyleDropDownList
  13. LoadCombos answer6
  14. answer6.Style = fmStyleDropDownList
  15. LoadCombos answer7
  16. answer7.Style = fmStyleDropDownList
  17. LoadCombos answer8
  18. answer8.Style = fmStyleDropDownList
  19. answer9.Style = fmStyleDropDownList
  20.  
  21. End Sub
__________________
http://situcomo.blogspot.com
Karma is a Bitch... they said