Salve,
vi spiego il problema:
ho diversi file excel es. File 1, File 2, File 3 ecc.... utilizzati per la fatturazione, quindi tra loro cambiano solo gli importi ed la descrizione del prodotto.
Devo copiare tutte le info contenute nelle fatture in un file “Archivio”.
Attualmente ho realizzato una macro che copia i dati del “file A” nell'Archivio,
vi spiego come funziona la macro:
- Apro il file Archivio
- rinomino una delle fatture con il nome A
- avvio la macro che copia i dati
- chiudo il file A e lo elimino
- …. passo al secondo file e ricomincia il loop
Come posso fare per copiare i dati i maniera più veloce?
La mia idea è quella di utilizzare una macro che copia i dati dei file incrementando da sola il numero (nome) del file.
Spero di essermi spiegato ...
Macro
codice:
Sub Archivio()
Range("A2:AG22").Select
Range("AG22").Activate
Selection.Copy
Sheets("Archivio").Select
Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=False
Range("A1").End(xlDown).Offset(1, 0).Select
End Sub
Nel foglio Macro pesco i dati dal File A, es. cella
codice:
=SE(R2="";"";'[A.xls]FATTURA pag. 1'!$A$25)
grazie.
Rispondi quotando
