Hallo,
folgendes Problem:
Ich habe als Eingabemaske eine UserForm erstellt, die die Eingaben untereinander in eine Tabelle schreibt, die dahinter liegt, aber nicht verdeckt ist.
Wenn die Werte unten den sichtbaren Bereich verlassen, soll die Tabelle nach jeder Eingabe um eine Zeile nach oben gescrollt werden.
Das versuchte ich mit folgendem code. Die Prüfung funktioniert, aber das "Then" erzeugt einen Fehler.
Kann mir jemand einen Tip geben, woran das liegt?
Vielen Dank, und Gruß Jörg
folgendes Problem:
Ich habe als Eingabemaske eine UserForm erstellt, die die Eingaben untereinander in eine Tabelle schreibt, die dahinter liegt, aber nicht verdeckt ist.
Wenn die Werte unten den sichtbaren Bereich verlassen, soll die Tabelle nach jeder Eingabe um eine Zeile nach oben gescrollt werden.
Das versuchte ich mit folgendem code. Die Prüfung funktioniert, aber das "Then" erzeugt einen Fehler.
Code:
If Sheets("Eingaben").Range("A65535").End(xlUp).Row > 30 Then
Sheets("Eingaben").ScrollRow = Sheets("Eingaben").Range("A65535").End(xlUp).Row - 2
End IfKann mir jemand einen Tip geben, woran das liegt?
Vielen Dank, und Gruß Jörg
