Tabelle pivot

[silvia.borsotti]

Ciao a tutti.. ho un problema con le tabelle pivot.. sto costruendo dei file excel con dei collegamenti a tabelle pivot che si trovano in altri file excel. Il problema è che se apro solo i file con i collegamenti, nelle caselle dove si trovano i collegamenti mi dà "RIF", non appena apro anche i file dove si trovano le pivot il "RIF" scompare e mi si popola il campo.. sapete spiegarmi perchè e come posso fare per non dover ogni volta aprire tutti i file? grazie mille, silvia

[Flash30005]

Potresti aprire automaticamente il/i file che occorrono all'apertura del file che contiene le Pivot
Per fare questo e postarti un codice valido dovresti dirci se i file sono contenuti nella stessa cartella del file "Pivot" altrimenti indicare il percorso.

Fai sapere

ciao

[Flash30005]

Riporto un esempio di codice che potrai inserire in workbook_open del file contenente le Pivot

Codice: Seleziona tutto

Private Sub Workbook_Open()
Perc = ThisWorkbook.Path & "\"   '<<<<<<<<<<<< percorso del file con le Pivot
FileP = ThisWorkbook.Name   
File1 = "File1.xlsx"   '<<<<<<<<<< nome del file con estensione di un file dati
File2 = "File2.xlsx"  '<<<<<<<<<< nome del file con estensione di un secondo file dati
Workbooks.Open Perc & File1   '<<<<<<<<<< apre il file1
Workbooks.Open Perc & File2  '<<<<<<<<< apre il file2
Workbooks(FileP).Activate   '<<<<<<<<<< attiva il file con le Pivot lasciando in "background" i file dati

End Sub

Volendo alla chiusura del file con le Pivot potresti, sempre tramite un codice simile, chiudere i file con i dati

Codice: Seleziona tutto

Private Sub Workbook_BeforeClose(Cancel As Boolean)
File1 = "File1.xlsx"
File2 = "File2.xlsx"
Workbooks(File1).Close
Workbooks(File2).Close
End Sub

Se dichiari Public (in un modulo) sia il File1 che il File2
non è necessario riassegnare queste variabili in workbook_BeforeClose

ciao