Hi Tobias,
Du hast auf Deiner Userform eine Progressbar mit z.B. dem Namen pro1 und definierst im Deklarationsabschnitt die Variable i:
Dim i as integer
Dann schreibst Du in Deinen Schleifencode in einer Programmzeile z.B.
pro1.value = i + 2 '***Die Ziffer solltest Du abhängig machen von der Anzahl der Schleifendurchläufe und in einem zweiten Schritt vielleicht noch eine Wenn-Abfrage etwa folgenden Inhalts einbauen: Wenn dieses oder jenes erreicht ist, dann pro1.value = 100 ***
und bei jedem Schleifendurchlauf füllt sich die Progressbar um den Wert i +2 bis die Progressbar voll ist.
VLG
Wilhelm