Condicionar una macro según el valor de un Textbox en un formulario
Necesito ejecutar una macro si se cumplen tres condiciones especificas donde una de ellas es que el valor del Textbox sea cualquiera menos vacío... Tengo un formulario con un Textbox y un botón... La macro debe ejecutarse al presionar el botón.. Entonces
Private Sub CommandButton1_Click() If TextBox1.Value <> "" And Sheets("hoja1").Range("I54").Value = "" Or Sheets("hoja1").Range("I54").Value = 0 Then Cells(54, 9) = TextBox1.Value Else If MsgBox("desea reemplazar los valores, vbYesNo, "Reemplazar") = vbYes Then Cells(54, 9) = TextBox1.Value End If End If End Sub
Lo que deseo es que el valor que se coloque en el textbox, se registren en la celda I54 sólo si esta celda esta vacía o tiene valor cero, y únicamente si el textbox tiene un valor cualquiera. Esto es porque si la condición de la celda no se cumple y el textbox tiene un valor por registrar, pedirá autirización para el reemplazo del dato...
No se que está mal...
3 respuestas
Respuesta de Elsa Matilde
2
Respuesta de Dante Amor
1
Respuesta de Raúl Guerrero
1