Macro para poner fecha

[SerxFE]

Hola a todos.
Soy Sergi y la verdad es que no tengo mucha idea respecto a las Macros, pero con vosotros hasta ahora me he salido muy bien y defendido. El caso es que ahora necesito algo muy...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[SerxFE]

Adjunto archivo con el problema descrito.

 

[Macro Antonio]

.
Pon esta macro en la hoja Plantilla.
.

Private Sub Worksheet_Change(ByVal Target As Range)
   Application.EnableEvents = False
   ActiveSheet.Unprotect
   If Target.Address Like...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[SerxFE]

Gracias Antoni, pero estoy igual. Solo se pone la X y no se escribe la fecha.

Con la macro que yo tenia, si la descomplicaba, es decir sin querer borrar si no habia X, si habia conseguido que se...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[SerxFE]

Antoni, no entiendo la quinta linea:

Target.Row Mod 4 = 2 Then

que hace por favor?

 

[SerxFE]

Alguna idea, por favor? Tengo que entregar la hoja ya.

Saludos.

 

[Macro Antonio]

Algo debes estar haciendo mal. El adjunto funciona correctamente.
Target.Row Mod 4 = 2 .Resto de dividir por 4 el número de fila de la celda cambiada = 2

 

[SerxFE]

Ostras..., pues muchisimas gracias. El que me he descargado hecho por ti, funciona perfectamente.
No se, me repasaré lo que yo hice, aunque fue un copiar y pegar :shock:

No sabes como te lo...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí