Hallo Richard.

Hast natürlich Recht. Durch das ewige rumprobieren wird die gar nicht mehr aufgerufen.
Sorry mein Fehler.

Sollte so sein.
Sie wird als erstes in der Do-Loop aufgerufen.

Wie füge ich hier Code als Code ein?

Sub Us_test()
Call Burst(10)
If Us_eingang = 1 Then
Status_led = 1
' Call Vollbremsung()
Else
Status_led = 0
End If
End Sub

Gruß
Thomas