jmovmex

Luis_P respondió: Prueba así: Dim cm As ComboBox For Each cm In Me.Controls If TypeOf cm Is ComboBox Then With cm .List = Array("Si", "No") End With cm.ListIndex = 0 End If On Error Resume Next Next

Luis_P respondió: Acá esta: Sub preguntas() Dim respuesta As Integer respuesta = MsgBox(" tiene automovil ?", vbQuestion + vbYesNo) If respuesta = 6 Then respuesta = MsgBox(" ¿El carro es Nuevo?", vbQuestion + vbYesNo) Else respuesta = MsgBox(" ¿Planea adquirir uno...

bacter582 respondió: Crea un userform y agrega 10 textbox y un commadbuton y pruebas este código Cada vez que le des al botón te pedirá el numero de textbox a mostrar. Espero te sea de ayuda. Saludos Bacter Private Sub CommandButton1_Click() Dim ctrl As Control Dim i As...

fpintod respondió: Probablemente tienes los cinco combos enlazados a la tabla, por lo que al actualizar se cambian todos. Prueba dejarlos sin enlazar, llenalos con código y así podrás controlar como se llena cada uno aunque tenga el mismo origen

barrusfalco respondió: Hay veces que se le va la pinza cuando utilizas [Nombre], prueba a cambiarlo por cualquier otra cosa como [Nomb], [Nom], o lo que prefieras, lo tienes que cambiar en las cinco primeras consultas.

barrusfalco respondió: Lo podrías hacer con cinco consultas más una sexta de unión. Consulta1: SELECT [dato1] as Fecha from [tabla] Consulta2: SELECT [dato2] as Fecha from [tabla] Consulta3: SELECT [dato3] as Fecha from [tabla] Consulta4: SELECT [dato4] as Fecha from...