Ejecutar Macro al Poner valor en celda

[LauraNM]

Hola Amigos, bueno tengo algo sencillo pero para mi es todo un mundo, tengo una hoja (Legionella) donde pongo valores en la columna M y necesito que si ese valor es mayor que 0 me copie las celdas...

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í

 

[JM123]

Hola
Pon un ejemplo para verlo mas claro

 

[LauraNM]

Te pongo el archivo, necesito que cada vez que se ponga un valor superior a 0 en la columna O de la hoja "Legionella" automaticamente se copien las celdas desde la A hasta la O de la fila activa a...

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í

 

[ioyama]

Hola Laura

Revisa el adjunto. Funciona con una macro de evento.

Un saludo desde Vitoria

 

[LauraNM]

Gracias por tu aporte ioyama, despues de probar muchas cosas al ver tu codigo ya me doy cuenta donde lo hacia mal, de todas formas tu codigo machaca la ultima fila disponible en lugar de crear una...

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í

 

[ioyama]

Hola Laura

Tienes razón. No tenía que buscar la última fila, sino la siguiente (primera vacía), luego debería haber usado

uf = Sheets("Positivos").Range("A" & Cells.Rows.Count).End(xlUp).Row...

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í