ho corretto la funzione così altrimenti non funziona:

codice:
Function aggiungiZeri (numero)
   if cint(numero) < 10 then
     numero = "000"&numero
   elseif cint(numero) < 100 then
     numero = "00"&numero
   elseif cint(numero) < 1000 then
     numero = "0"&numero
   end if
   aggiungiZeri=numero
End Function
GRAZIE!