Ciao a tutti.
Sto cercando di predisporre una Macro che mi consenta, applicando due filtri, uno sulla data (per comodità le mie date sono solo il primo giorno del mese, quindi 01/01/2012, 01/02/2012 etc.) e uno su un ulteriore valore (è un valore maggiore di >0) su un file denominato Database, per poi importarlo a un secondo file.
Ho creato questo codice:
Windows("Database.xlsx").Activate
Selection.AutoFilter Field:=2, Criteria1:="01/01/2012"
If Range("E2").Value > "0" Then
Range("C2:H2").Select
Selection.Copy
Windows("Tax Assegni.xlsm").Activate
For I = Range("B65536").End(xlUp).Offset(0, 0).Row To 1 Step -1
If Len(Cells(I, 1).Value) > 0 Then Exit For
Next I
Cells(I + 1, 2).Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
End If
Essendo il file database composto da 5000 righe avrei bisogno di snellire la prima parte della macro affinche sia snella e sia applicata all'intero foglio.
Grazie mille a chi mi potrà aiutare.
Registrazione