Tut mir leid bin gerade leider etwas in eile ....
Tatsache If PINB.1 = 1 Then funktionert vielen dank

So einfach und doch so große auswirkungen ... -.-

Einfach klasse das Forum danke