¿Cómo hacer que la fecha que uso en un Useform me sume un día?

Tengo la fecha del día actual en un campo de texto que es el día en que se hace el pedido, pero ocupo que a ese campo se le sume un día que corresponde al día de la entrega, esta es la forma en que lo hice con el día actual:

Private Sub UserForm_Activate()
' Pone la fecha en los campos
txtfechapedido = Format(Now, "dd/mm/yy")
Textfechadespacho (aquí de ser un día después de la fecha indicada en txtfechapedido)

1 respuesta

Respuesta
1

Intente con este código

    txtfechapedido = Format(Now, "dd/mm/yy")
    txtfechadespacho.Text = Format(DateAdd("d", 1, Date), "dd/mm/yy")

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas