WindowsFilename e

Windows(Filename &
di Roberto (utente non iscritto) data: 13/10/2014 20:34:26
Sono stato poco chiaro nella precedente richiesta, ma non volevo dilungarmi troppo.

Il mio problema è il seguente: sto utilizzando un foglio di excel con tre schede aperte e vorrei passare dall'una all'altra in modo che su ciascuna scheda posso conservare le formattazioni.
Nella macro al posto di filename inserisco direttamente il nome del file, prelevando poi l'anno da una cella sul foglio di excel:

Il problema nasce nel momento in cui voglio rinominare il file (ad esempio aggiungendo "Prova" per poter lavorare senza sporcare l'originale): in questo caso sono costretto a modificare manualmente tutte le occorrenze del nome del file, rischiando anche di dimenticarne qualcuna.

Il programma funziona correttamente, solo vorrei sapere se c'è un sistema per modificare il nome del file adeguandolo a quello ottenuto dopo essere stato rinominato.

Ringrazio tutti per l'aiuto che potete darmi e mi scuso se predcedentemente sono stato poco chiaro.
Sheets("PRIMANOTA").Select Range("D1").Select ANNO = ActiveCell Windows("CONTABILITA' " & ANNO & ".xlsm:1").Activate Sheets("PRIMANOTA").Select