Hatte ich ganz am Anfang so Probiert.

Sobald ich das "Dim Lampe(22) as byte" drin habe:
Geht fehlerlos durch den Check aber er "verliert" die Alias Anbindung an den Port. Sprich an den Ports kommt nix mehr an.

Nehm ich das "Dim Lampe(22) as byte" wieder raus kommt wieder die Fahlermeldung bei "Lampe(i) = 1"...

Keine Ahnung wie das geht... Ich nehm jetzt die Aliasse alle raus und schreib mir eine Funktion die das dann per If Then auswertet.

Sonst fällt mir nichts ein.

Gruß
Matze