VBA funzione MID con ciclo do while

[oregon]

i = 1
riga = 1


Do While Cells(i, 1) <> ""
If Mid(Cells(i, 1), 1, 2) = "07" Then

ora dovrebbe startare dal carattere 8 , 2 = "09"
e riportarlo su un altro foglio excel

Ma dov'è il codice che legge dal file?

[cheta]

Ma dov'è il codice che legge dal file?

scusa lavorando da un foglio excel apro l'editor vba creo un modulo e una funzione al suo interno.

---

111.jpg
il risultato che dovrei ottenere è questo
ma sono un po niubbo di vba..