ejecutar macro al cambiar el valor de una celda determinada

[suprempada]

que tal a tod@s,..

como le puedo hacer para ejecutar una macro al cambiar el valor de una celda o especificar un rango de celdas??

actualmente lo que hago es que meto el codigo de la macro dentro de este evento

Private Sub Worksheet_Change(ByVal Target As Range)

pero como en mi codigo lo que hago es copiar y pegar valores, entra en un loop infinito... entonces.. solo necesito especificar la celda o el rango de celdas que deben cambiar para ejecutar ese codigo... como lo hago???

gracias

[3pies]

Código:

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Cells = Range("D6") Then
    'bla, bla, bla...
    end if
end sub

Salu2

[avac]

YO TENGO ALGO MEJOR
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Application.Intersect(Range("A1:A2"), Target) Is Nothing Then Call MiFuncion
End Sub

Public Sub MiFuncion()
MsgBox "VALOR DE LA CELDA A CAMBIADO"
End Sub

ESTO SIRVE SI EL VALOR DE LA CELDA A1 ES =A2 ESTONCES SI CAMBIO EL VALOR DE A2 AUTOMATICAMENTE CAMBIA EL VALOR DE A1