Macro per selezionare una cella successiva??

[Niko]

Ciao a tutti,
sto preparando un piccolo foglio per la compilazione delle distinte (ovvero un semplice elenco di codici).
Ho creato una semplice e breve macro che copia una cella da un primo foglio e la incolla dentro ad un secondo foglio , poi ritorna alla pagina di ricerca del primo foglio......il mio problema è (credo) semplicissimo: dopo avere incollato i dati nella cella (già selezionata) del secondo foglio, vorrei che la macro mi selezionasse automaticamente la cella sottostante a quella che ho appena incollato ......

Sub COPIA_INCOLLA()
Selection.Copy
Windows("secondo foglio.xls").Activate
Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=False
*******qui dovrei inserire il cambio di cella**********
Windows("primo foglio.xls").Activate
Sheets("Pagina di ricerca").Select
Range("A1").Select
End Sub

GRAZIE A TUTTI

[Mauro Gamberini]

sto preparando un piccolo foglio per la compilazione delle distinte (ovvero un semplice elenco di codici).
Ho creato una semplice e breve macro che copia una cella da un primo foglio e la incolla dentro ad un secondo foglio , poi ritorna alla pagina di ricerca del primo foglio......il mio problema è (credo) semplicissimo: dopo avere incollato i dati nella cella (già selezionata) del secondo foglio, vorrei che la macro mi selezionasse automaticamente la cella sottostante a quella che ho appena incollato ......
*************************************************

<cut>

Dai un'occhiata a:
End, xlUP, Offeset
nella guida del vba di Excel.

[Niko]

Grazie 1000!!
pensa ke lo volevo scrivere nel post d prima, poi o pensato fosse superfluo: NON HO INSTALLATO LA GUIDA DI VBA :(
e x d + nn trovo + il cd di installazioneeeeeee :(

cmq grazie mille, adesso provo subito a combinare qlc con quei tre comandi ;)

[Mauro Gamberini]

Grazie 1000!!
pensa ke lo volevo scrivere nel post d prima, poi o pensato fosse
superfluo: NON HO INSTALLATO LA GUIDA DI VBA :(
e x d + nn trovo + il cd di installazioneeeeeee :(
*****************************************

http://www.microsoft.com/downloads/results.aspx?pocId=&freetext=vba%20help&DisplayLang=en