Collegamento excel tra fogli di lavoro

Uso una cartella con diversi fogli collegati tra loro per i calcoli.
Vorrei eseguire quanto segue
Ho in un folgio due colonne di numeri, nella prima i numeri sono sequenziali, nella seconda no.
Vorrei eseguire l'ordinamento numerico sulla seconda colonna e visualizzarla in un altro foglio, di modo di averla sempre aggiornata quando modifico i dati nel primo foglio.
Ho cercato nelle formule di excel ma ho trovato soltanto i normali riferimenti agli ordinamenti numerici con la varie opzioni. Ma nessun riferimento a come farlo con i riferimenti in un altro foglio.
Spero di essermi spiegato.
Se qualcuno potesse darmi una mano.
Es.
Foglio 1 Foglio 2 (risultato)
1 2000 3 500
2 1000 2 1000
3 500 1 2000
4 5000 4 5000
Grazie Alberto

Ti devi creare una macro, e per ordinare e mettere il contenuto di FOGLIO1 in FOGLIO RISULTATO come quella illustrata di seguito:
Sub Macro1()
'
' Macro1 Macro
' Macro registrata il 24/09/2007 da Zetagi
'

'
Sheets("FOGLIO1").Select
Range("C5:C22").Select
Selection.Sort Key1:=Range("C5"), Order1:=xlAscending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal
Sheets("FOGLIO RISULTATO").Select
Range("C9").Select

=SOMMA(FOGLIO1!C5:FOGLIO1!C22)

End Sub

Non o mai usato le macro ma penso che sia l'unica soluzione. Ora provo a inserrla e ti faccio sapere.
Grazie Alberto

Ho fatto come detto
Quando eseguo la macro con F5 mi da' errore di compilazione sulla riga
=somma(foglio1!c5:foglio1!c22)
Ciao ALberto

Citazione:

---

Originariamente Scritto da ALBERTO2006

Ho fatto come detto
Quando eseguo la macro con F5 mi da' errore di compilazione sulla riga
=somma(foglio1!c5:foglio1!c22)
Ciao ALberto

---

per i nomi dei fogli devi rispettare maiuscole e minuscole, li devi scrivere esattamente come sono scritti nel foglio excel, ed i dati di riga/colonna che ti ho passato sono solo come esempio

La mia cartella di lavoro ha 2 fogli denominati FOGLIO1 e FOGLIO2, nella riga della macro sono scritti correttamente.
Ho ricontrollato ma l'errore e' sempre lo stesso
Ciao Alberto

L'errore corretto e' errore di compilazione:errore di sintassi.
Grazie Alberto

Citazione:

---

Originariamente Scritto da ALBERTO2006

L'errore corretto e' errore di compilazione:errore di sintassi.
Grazie Alberto

---

Forse hai excel nel quale bisogna scrivere le istruzioni in inglese.
Le posizioni C5 e C22 le ho messe come esempio, tu devi mettere le posizioni di riga/colonna di partenza e riga/colonna di arrivo del tuo foglio1 e le devi sostituire in tutta la macro.

Carissimo Zetagi

So perfettamente che forse reco fastidio, ma insisto perche’ la macro mi sarebbe davvero utile per un lavoro.
Di seguito riporto le operazioni da me effettuate
La versione di Excel in mio possesso e’ la Office Professional 2003 in italiano
Ho creato una cartella di lavoro con due fogli denominati FOGLIO1 e FOGLIO2 (maiuscolo)
Sul FOGLIO1 ho inserito nella colonna A dei numeri progressivi da 1 a 18, nella colonna B dei numeri che devono essere ordinati dal piu’ grande al piu’ piccolo mantenendo il collegamento con il progressivo della colonna A. Sto’ facendo una prova perche’ i numeri da ordinare sono in realta’ piu’ di 4000. (Nella tua macro l’ordine mi sembra ascendente, ma non penso sia un problema).
Mi sono posizionato sulla cella A1 del FOGLIO2 (dove deve essere visualizzato l’ordinamento) ed ho inserito la macro che mi hai proposto, con le modifiche del caso (spero siano corrette).
A parte l’errore che mi appare, non capisco nell’ultima riga la funzione =somma. Non e’ la stessa che si usa in excel per sommare il contenuto di celle?. Io non devo farlo, ma siccome e’ la prima macro che uso forse vi sono delle funzioni differenti abbi pazienza.

Sub Macro1()
'
' Macro1 Macro
'
'
Sheets("FOGLIO1").Select
Range("A1:A18").Select
Selection.Sort Key1:=Range("A1"), Order1:=xlAscending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal
Sheets("FOGLIO2").Select
Range("A18").Select

=SOMMA(FOGLIO1!A1:FOGLIO1!A18)


End Sub

Penso di averti tediato abbastanza ma vorrei tanto fare funzionare questa macro che mi sarebbe utilissima.
Grazie Alberto

ok, questa DEVE andare. Scherzo prova e fammi sapere.
Ciauuz

Sub Macro3()
'
' Macro3 Macro
' Macro registrata il 25/09/2007 da Zetagi
'
'
Sheets("FOGLIO1").Select

Range("A1:A18").Select
Selection.Sort Key1:=Range("A1"), Order1:=xlAscending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal

Sheets("FOGLIO2").Select

Range("A19").Select
Selection.FormulaR1C1 = "=sum(Foglio1!R[-18]C[-0]:Foglio1!R[-1]C[-0])"
Sheets("FOGLIO2").Select

End Sub

Penso che prima o poi mi manderai a quel paese !!!!!!!!!!!!!!
Provata la nuova routine, mi da il seguente errore

Errore di rountime "1004"
Errore definito dall'applicazione o dall'oggetto
Sempre grazie Alberto

Ciao Alberto,
scusa se non ti ho risposto prima ma non ho potuto.
Per la routine, io ho office xp e mi funziona perfettamente, non sò se su office 2003 che hai tu ci sia qualche parametrino diverso, ma non ho sottomano una macchina con quel software, in ogni caso appena mi capita ti faccio sapere, cerca di pazientare.
Ciauzz
Gino

Ciao Zetagi
Non sapevo che con versioni diverse di Excel i parametri delle istruzioni potessero cambiare.
La routine che mi hai dato io l'ho provata solo in ufficio dove ho Excel 2003 ma visto quello che mi dici la devo provare a casa dove ho Xp.
Non appena provo ti comunico i risultati.
Grazie Ciao