Moderatori: Anthony47, Flash30005
Workbooks("N3.xls").Worksheets("Archivio").Range("A1").value = _
Workbooks("N3.xls").Worksheets("Archivio").Range("A1").value +1
Workbooks("N3.xls").Worksheets("RP6").Range("D4:Q4").copy Destination:= _
Workbooks("Storico.xls").Worksheets("Lista").Range("D65536").End(XlUp).Offset(1,0)
Workbooks("N3.xls").Worksheets("RP6").Range("D4:Q4").copy
Workbooks("Storico.xls").Worksheets("Lista").Range("D65536").End(XlUp).Offset(1,0).PASTESPECIAL PASTE:=XLPASTEVALUES, _
OPERATION:=XLNONE, SKIPBLANKS:=FALSE, TRANSPOSE:=FALSE
Windows("L3.xls").Activate
Worksheets("Archivio").Range("A1").Value = Worksheets("Archivio").Range("A1").Value + 1
Calculate
Worksheets("RP6").Range("D6:Q6").Copy
Workbooks("Storico.xls").Worksheets("Lista").Range("D65536").End(xlUp).Offset(1, 0).PasteSpecial Paste:=xlPasteValues
Sheets("RP1").Select
Application.CutCopyMode = False
Selection.Copy
Sheets("cRP1").Select
Selection.PasteSpecial Paste:=xlPasteValues
Sheets("RP5").Select
Application.CutCopyMode = False
Selection.Copy
Sheets("cRP5").Select
Selection.PasteSpecial Paste:=xlPasteValues
Sheets("RP6").Select
Application.CutCopyMode = False
Selection.Copy
Sheets("cRP6").Select
Selection.PasteSpecial Paste:=xlPasteValues
Windows("STORICO.xls").Activate
Torna a Applicazioni Office Windows
Macro modifica date scelta periodo Autore: Ricky0185 |
Forum: Applicazioni Office Windows Risposte: 11 |
Supporto per sviluppo macro VBA Ordinare per data Autore: Carletto Ribolla |
Forum: Applicazioni Office Windows Risposte: 3 |
Inserire add.in nella barra di avvio veloce in excel 2003 Autore: Ricky0185 |
Forum: Applicazioni Office Windows Risposte: 4 |
Excel: problema con date se devo unirle a testi Autore: valle1975 |
Forum: Applicazioni Office Windows Risposte: 5 |
Visitano il forum: Nessuno e 25 ospiti