Stringa + numero ma con zero precedenti

[Luca1317]

Devo creare e far incrementare di ogni unità un codice prodotto

il codice prodotto è composto da 2 parti, la prima in lettere e l'altra in numeri:

FAV000163

FAV è sempre identico mentre la parte numerica cambia incrementando di 1 in 1:

FAV000163
FAV000164
FAV000165

Lo creo in questo modo:

Testo = "FAV"

Num = 000165

'quando però vado ad incrementare di 1 mi elimina la parte degli 0 inclusa inclusa tra FAV E 166:
Testo + NUM +1

e invece di avere questo risultato: FAV000166

ho FAV166

come risolvo?

[optime]

Testo+Right("000000"+Cstr(Num+1),6)

[Luca1317]

Perfetto, grazie.

[optime]

optime!