Copia colonna F1 e incolla nell prima cella libera del F2

[rmhiopera]

Buongiorno,

Devo copiare la colonna B3:B500 del foglio1 sulla prima colonna disponibile del foglio2.
Come posso fare?
Vi prego di scrivermi dei risultati solo in inglese perché lavoro con un excel non italiano.

Vi ringrazio anticipatamente per il vostro aiuto.

Giulia

[Flash30005]

Ciao Rmhiopera e benvenuto nel Forum

Prova questa macro

Codice: Seleziona tutto

Sub CopiaColonna()
Set uno = Worksheets("Sheet1")
Set due = Worksheets("Sheet2")
UC = due.Cells(3, Columns.Count).End(xlToLeft).Column
uno.Range("B3:B500").Copy Destination:=due.Cells(3, UC + 1)
End Sub

ciao

[rmhiopera]

Ciao Flash,

FUNZIONAAAAAA!!!!!
BRAVOOOOO!!!!
L'ultima cosa. Devo copiare solo i valori. Cosa devo cambiare?
GRAZIE GRAZIE FLASH!!!

Giulia

[ricky53]

Ciao Giulia,
prometti che la prossima volta dirai subito cosa ti occorre effettivamente?

Prova con questa modifica che ho fatto al codice di Flash

Codice: Seleziona tutto

Sub CopiaColonna_New()
    Set uno = Worksheets("Sheet1")
    Set due = Worksheets("Sheet2")
   
    UC = due.Cells(3, Columns.Count).End(xlToLeft).Column
    uno.Range("B3:B500").Copy
    due.Cells(3, UC + 1).PasteSpecial Paste:=xlPasteValues
End Sub

[rmhiopera]

GRAZIEEE FLASH!!!!!
FUNZIONA PERFETTAMENTE!

[ricky53]

Ciao,
il grazie a Flash è dovuto ma io ... mi chiamo Ricky53 !!!

[rmhiopera]

Ricky, scusa! mi sono proprio sbagliata.
Grazie RICKY! :-)