[b]Ciao a tutti,
ho un file Excel che contiene 30 fogli a cui, mensilmente, viene cambiato nome. Ognuno di questi
fogli deve contenere la medesima macro che, quando attivata, copia data e saldo del foglio attivo
su un altro foglio riepilogativo.
Al momento la macro mi funziona solo sul primo singolo foglio. Come devo fare per farla funzionare
tutti i fogli presenti?
Mille grazie, ciao.
M.
Di seguito la macro attuale:
' Macro3 Macro
' Copia il saldo definitivo di cassa nel foglio Saldi Progressivi
'
'
Range("F3").Select
Selection.Copy
Sheets("Saldi Progressivi").Select
ActiveWindow.SmallScroll Down:=-45
Range("D1").Select
ActiveSheet.Paste
Sheets("1 Set").Select
Range("F3").Select
ActiveSheet.Paste
Application.CutCopyMode = False
ActiveWindow.SmallScroll Down:=21
Range("C39").Select
Selection.Copy
Range("C41").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Application.CutCopyMode = False
ActiveWorkbook.Save
Range("D41").Select
Sheets("1 Set").Select
Range("C41").Select
Selection.Copy
Sheets("Saldi Progressivi").Select
Range("E1").Select
ActiveSheet.Paste
Range("E1").Select
ActiveSheet.Paste
Application.CutCopyMode = False
Sheets("1 Set").Select
ActiveWindow.SmallScroll Down:=-60
Range("B7").Select
End Sub
Registrazione