Oltre al suggerimento dettagliato i Flash, suggerisco (a grandi linee):
-ti crei una Userform su cui inserisci una "Cornice" (es Frame1)
-dentro questo frame inserisci una "Etichetta" (es Label1)
-poi dopo che hai ricalcolato l' avanzamento usi qualcos come
- Codice: Seleziona tutto
Label1.Width = (Frame1.Width + 10) * progress
Frame1.Caption = Format(progress, "0%")
Nell' esempio progress e' una variabile che contiene un valore variabile tra 0 e 1 che rappresenta il % di avanzamento.
Aprirai la form in modalita' "vbModeless", per poi nasconderla a fine macro.
Se questo livello di informazioni non basta posta ancora spiegando dove sei arrivato.
Ciao