¿Cómo ejecutar macro al cambiar el valor de una celda?

Tengo este código y me gustaría que se ejecute al cambiar el valor de la celda a2

Range("b47:e47").Select
finfila = Selection.Row + Range("a2").Value
Selection.AutoFill Destination:=Range("b47:e" & finfila), Type:=xlFillDefault

entonces como quedaría para que al cambiar el valor de a2 ejecute este código.

Espero ser claro.

Trabajo con excel 2007.

1 respuesta

1
Respuesta de

Hola:

Para que se ejecute al cambio del valor de una celda se coloca en el evento Change de la hoja en cuestión.

Desde el Editor, doble clic sobre el objeto HOJA que corresponda y allí copiá esta rutina:

Private Sub Worksheet_Change(ByVal Target As Range)
'se ejecuta solo al ingresar datos en col A2
If Target.Address <> $A$2 Then Exit Sub

'aquí tus instrucciones reemplazando A2 por Target

End Sub

Podes leer más sobre dónde colocar y cómo ejecutar las macros en la sección Macros de mi sitio.

Sdos

Elsa

http://aplicaexcel.galeon.com/manuales.htm

Añade un comentario a esta respuesta
Añade tu respuesta
Haz clic para o
Escribe tu mensaje
¿No es la respuesta que estabas buscando? Puedes explorar otras preguntas del tema Microsoft Excel o hacer tu propia pregunta: