Inserire numero progressivo riferito a file esterno

[Alea]

Ciao a tutti
nuova richiesta:
devo inserire nella cella unita HI3 del foglio QGL10.03b il numero progressivo delle offerte che faccio:
la formattazione della cella è tipo: xx/anno (10/12 oppure 180/12).

Per identificare il numero progressivo da inserire devo però fare una ricerca su un altro file. Su questo nuovo file chiamato "Elenco" e situato nella cartella "G:\OFFERTE\ELENCO" esistono tanti fogli che hanno come nome l'anno in corso.
Quindi nel foglio "2012" del file "Elenco" a cominciare dalla cella A3 avrò il numero di offerta "01"; A4 - 02 etc...
Si dovrebbe trovare nella colonna A l'ultima cella occupata, riconoscere il numero ed inserire nella cella unita HI3 del foglio QGL10.03b il numero successivo.
E' possibile effettuare questo tipo di inserimento?

Grazie Ivan

[Flash30005]

Prova

Codice: Seleziona tutto

Sub CopiaNO()
Anno = Mid(Year(Range("N5").Value), 1, 4)
PA = Right(Anno, 2)
Perc = "C:\Temp"  '<<<< cambiare con G:\Offerte o con tua directory
Workbooks.Open Filename:=Perc & "\Elenco.xls"
Sheets(Anno).Select
URO = Range("A" & Rows.Count).End(xlUp).Row
NO = Range("A" & URO).Value
Workbooks("Elenco.xls").Close SaveChanges:=False
Range("H3").Value = NO+1 & "/" & PA
End Sub

Ciao

[Alea]

Grazie mille Flash è perfetta