Insertar Texto y fecha

Hola Expertos,

Quiero que en una celda cuando pulse un botón me añada una cadena de texto y la fecha actual. ¿Como lo hago? Por el momento solo inserto el texto y este es el código

Sheets("Pedido").Select
Sheets("Pedido").Range("B31").Select
ActiveCell.FormulaR1C1 = "Confirmado"

Gracias!!

1 respuesta

Respuesta
1

Prueba con esta macro:

sub prueba()'por luismondelosheets("pedido").selectrange("b31").selectactivecell.value = "Confirmado  " & dateend sub

recuerda finalizar la consulta

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas