Bravo, vedi che l'esigenza aguzza l'ingegno...Ragazzi, finalmente ci sono riuscitoooo!
A me aveva funzionato col codice che ti ho suggerito.
Per copiare solo i valori e non il formato allora in Macro2 invece di
Range("F5:BA244").Copy Destination:=Range("B5")
avremmo dovuto usare
- Codice: Seleziona tutto
Range("F5:BA244").Copy '*****
Range("B5").PasteSpecial xlPasteValues
Per tornare su foglio IMPIANTI, inserire la sua attivazione in coda alla Workbook_Open, subito prima di End Sub:
- Codice: Seleziona tutto
Next Wk
Sheets("IMPIANTI").Select '<<<+++
End Sub
Ciao
Edit: ho MODIFICATO la riga marcata ***** perche' avevo erroneamente lasciato la parte Destination:= etc etc che invece andava rimossa