Colocar Fecha y Poder modificarla cuando sea necesario
Estoy trabajando en esta hoja y quisiera poder ingresar la fecha actual por intermedio de textBox y que me permita modificarla si es necesario, siempre que la celda "B4" este con datos.
1 respuesta
Respuesta de Dante Amor
1
Prueba:
Private Sub CommandButton1_Click()
If Range("B4").Value = "" Then
MsgBox "Falta cliente"
Else
Range("F4").Value = CDate(TextBox1.Value)
End If
End SubRecomendación:
Sal u dos Dante Amor
