La cosa piu' semplice e' di inserire all'interno del file A (il principale della coppia) una macro di Workbook_Open, che automaticamente apre anche il secondo file, se esso non e' gia' aperto.
Ad esempio, prova inserendo questa macro; va nel
Modulo di classe appartenente al File (QuestaCartellaDiLavoro, o ThisWorkbook):
- Codice: Seleziona tutto
Private Sub Workbook_Open()
Dim SecondoFFN As String, SecFN As String, mySplit, WWb As Workbook
'
SecondoFFN = "D:\PROVA\2018-04-24 - bianchi.xls" '<<< Percorso e Nome del file "gemello"
'
mySplit = Split("\0" & SecondoFFN, "\", , vbTextCompare)
SecFN = mySplit(UBound(mySplit))
On Error Resume Next
Set WWb = Workbooks(SecFN)
On Error GoTo 0
If WWb Is Nothing Then
Workbooks.Open SecondoFFN
End If
ThisWorkbook.Activate
End Sub
L'istruzione marcata <<< va personalizzata con la tua informazione.
Poi salva, chiudi e riapri il file; controlla che anche il secondo file sia stato aperto.
Per le istruzioni su come individuare la posizione in cui inserire la macro, guarda:
viewtopic.php?f=26&t=103893&p=647675#p647675Solo per curiosita', vecchissime versioni Excel (certamente inferiori a Excel 97) supportavano un formato "workspace" (.xlw), che poteva comprendere piu' workbook; do' per scontato che tu hai una versione non cosi' ...antica.
Fai sapere...