cuando los textbox1 el 2 y el 3 esten llenos los tres debe pasar los datos que se rellenan, si faltara rellenar un textbox deberia salir un mensaje alertando que falta llenar ese campo:
por ejemplo si falta edad entonces deberia salir mensaje "falta llenar edad" y no deberia permitir que pasen los datos a las celdas, asi con todas las combinaciones con tres textbox, es necesario usar solo el select case,.... a ver si me ayudan ver donde puedo estar errando.....
+cuando no se ha introducido ningun dato , hasta ahi corre chevre en las combinaciones tengo problemas.
ESTE EL CODIGO del boton aceptar
-------------------
Private Sub CommandButton1_Click()
Select Case (TextBox1 = "" Or TextBox2 = "" Or TextBox3 = "")
Case TextBox1 = "" And TextBox2 = "" And TextBox3 = "":
MsgBox ("faltan nombre y apellido,edad y direccion")
Case TextBox1 = "" And TextBox2 = "":
MsgBox ("faltan edad")
Case TextBox2 = "" And TextBox3 = "":
MsgBox ("faltan nombre")
Case Else
For x = 2 To 35
If Cells(x, 2) = "" Then
Exit For
End If
Next
Cells(x, 1) = TextBox1
Cells(x, 2) = TextBox2
Cells(x, 3) = TextBox3
End Select
End Sub
----------------