Macro Excel usar como variable el nombre del archivo

Cerrado
Denunciar
Message postés
1
Date d'inscription
viernes, 12 de abril de 2013
Estatus
Miembro
Última intervención
viernes, 12 de abril de 2013
-
Agradeceria vuestra ayuda, necesito ejecutar una sub rutina (macro) dentro de otra, que tiene como nombre un archivo, pero pero este podría cambiar, este es la macro en cuestion

Private Sub Worksheet_Change(ByVal Target As Range)
Celda = "B2"
Dim nombrearchivo
nombrearchivo = ThisWorkbook.Name
If Not Application.Intersect(Target, Range(Celda)) Is Nothing Then
Application.Run _
nombrearchivo & "!detalle_pago_socios" * * Esta es la que quiero agregar y no me funciona
'"'Excel Socios3 - Daniel Sanchez.xlsm'!detalle_pago_socios" * * esta funciona bien, pero necesito ir cambiando el nombre

End If

End Sub

muchas gracias