R E V I S I O N E D E L L A D I S C U S S I O N E |
Pier Giuseppe Moscardi |
Posted - 09 aprile 2016 : 16:06:35 Questa macro serve ad aggiornare l’estrazione nel file ruota, questo il listato :
Sub Estrazione() ‘ ‘ Estrazione Macro aggiorna archivio ‘
Range(“A8527:HT8527”).Select Selection.Copy
Range(“A8528”).Select ActiveSheet.Paste
Rows(“2:2”).Select Range(“L2”).Activate Selection.Delete Shift:=xlUp
Rows(“8526:8526”).Select Selection.Copy Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False
End Sub
Da non dimenticare, se si fa il copia incolla, l’incolonnamento. Ora apriamo il file ruota che abbiamo precedentemente costruito e premiamo contemporaneamente ALT+F11, apparirà la pagina VBA: Continua : http://www.nonsololotto.com/topic.asp?TOPIC_ID=39389 |
|
|