vba: macro que se ejecute al pegar

[mrocf]

Hola! negu.
En realidad estás utilizando mal el evento Change.

¿Por qué? Pues, de hecho, Target contiene a todas las celdas involucradas en el cambio.

Te muestro un ejemplo sencillo:

Código vb:

Private Sub Worksheet_Change(ByVal Target As Range)
Dim C As Range, myTxt As String
For Each C In Target
  myTxt = myTxt & vbLf & C.Address
Next C
MsgBox myTxt
End Sub
 

¿Qué hace este código?... "Arma" un texto que contiene las celdas involucradas en el cambio (prueba pegar 3, 4 ó más celdas simultáneamente) y muestra el mensaje mediante un msgbox.

¿Qué es lo que te estaba faltando considerar? El "For Each C in Target".

Para tu necesidad particular, tan solo reemplazas el
myTxt = myTxt & vbLf & C.Address
por tu código.

Saludos, Cacho.