wer kann mal schauen und korrigieren
If Dir("I:\AM33\PK22 Weiterbildung\01_Weiterbildung Allgemein und nach BKrFQG\01_Datenbanken und Teilnahmebescheinigung\BKrFQG\Kopie Führerscheine\" & UserForm1.Frame1.TextBox1) "" Then
TextBox84.BackColor = RGB(0, 255, 0)
End If
Gruß achim