Valutazione 4.87/ 5 (100.00%) 5838 voti

Condividi:        

Ciclo doppio copia incolla

Vuoi potenziare i tuoi documenti Word? Non sai come si fa una macro in Excel? Devi creare una presentazione in PowerPoint?
Oppure sei passato a OpenOffice e non sei sicuro di come lavorare al meglio?

Moderatori: Anthony47, Flash30005

Ciclo doppio copia incolla

Postdi Statix » 24/03/12 22:01

Ciao a tutti,
ho qualche difficoltà a fare un ciclo di un doppio copia incolla solo valori,
cerco di spiegare quello che devo fare,
ho un foglio1 dove ho un range AP6:AEJ275 ,
inizio ciclo
la macro deve copiare le prime 5 colonne, range AP6:AT275
e incolla solo valori
nel foglio2 range B4:F273
dopodiche
sempre nel foglio2 copiare il range CU4:CU277 e incollare in CX4,
fine primo ciclo

inizio secondo ciclo
foglio1 copiare le seconde 5 colonne range AU6:AY275
e incolla solo valori
nel foglio2 range B4:F273
dopodiche
sempre nel foglio2 copiare il range CU4:CU277 e incollare in CY4,
fine secondo ciclo
e così via,i cicli in totale sono 155
spero di essere stato chiaro.
Statix
Windows 7,
Office 2010,
Statix
Utente Senior
 
Post: 1078
Iscritto il: 12/05/06 21:55
Località: Provincia di Caserta

Sponsor
 

Re: Ciclo doppio copia incolla

Postdi Anthony47 » 24/03/12 23:56

Questa?
Codice: Seleziona tutto
Sub stralp155()
Sheets("Foglio1").Select
For I = 0 To 154
    Range("AP6").Offset(0, I * 5).Resize(270, 5).Copy
    Sheets("Foglio2").Range("B4").PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
            :=False, Transpose:=False
    DoEvents
    Sheets("Foglio2").Range("CU4:CU277").Copy Destination:=Sheets("Foglio2").Range("CX4").Offset(0, I)
Next I
End Sub

Ciao
Anthony
Win7 + Office 2010 Ita; Win 7 + Office 2013 Ita
Xp + Office 2003 Ita
E voi cosa usate? (per istruzioni vedere viewtopic.php?f=26&t=97449)
Avatar utente
Anthony47
Moderatore
 
Post: 13899
Iscritto il: 21/03/06 16:03
Località: Ivrea


Torna a Applicazioni Office Windows


Topic correlati a "Ciclo doppio copia incolla":


Chi c’è in linea

Visitano il forum: Nessuno e 9 ospiti