Problema al actualizar tabla dinámica con Macros
Hola tengo un problema
Lo que pasa es que necesito realizar una macro que actualize una tabla dinámica cada vez que se ejecute
Los datos para actualizar se encuentran en la pestaña TABLAS y esta información varia de contenido dependiendo del filtro que hace otra macro.
La macro funciona bien en mi equipo pero en otros equipos presenta inconvenientes por la raíz del archivo , el asunto es que en el siguiente código:
Sub Macro6()
'
' Macro6 Macro
'
'
Sheets( HOJA DE COPIA ).Select
ActiveWindow.SmallScroll ToRight:=-7
Range( A1:Z1000 ).Select
Selection.ClearContents
Range( B15 ).Select
Sheets( MAPEO ).Select
Range( A16:AD531 ).Select
Selection.Copy
Sheets( HOJA DE COPIA ).Select
Range( A1 ).Select
ActiveSheet.Paste
Range( E20 ).Select
Sheets( TABLAS ).Select
Range( D14 ).Select
Application.CutCopyMode = False
ActiveSheet.PivotTables( tabladinamica1 ).ChangePivotCache ActiveWorkbook. _
PivotCaches.Create(SourceType:=xlDatabase, SourceData:= _
C:\Documents and Settings\halondon\Mis documentos\HAROLD\MAPEO\[MAPEO GERENCIA DE VENTAS HABILITADO 2.xlsm]HOJA DE COPIA!C1:C26 _
, Version:=xlPivotTableVersion12)
ActiveSheet.PivotTables( tabladinamica1 ).PivotCache.Refresh
End Sub
Como pueden ver pone la ruta del archivo y es lo que quiero eliminar, ya que esa macro se ejecuta por diversas personas en distintas maquinas y se guarda en diversas rutas.
¿Saben si hay alguna forma de hacer para que actualize sin tomar en cuenta la raíz y lo busque en la hoja TABLAS incluida en el mismo libro?
Muchas Gracias