eine zelle nach rechts
11.11.2004 05:56:19
Sebastian
ich habe folgendes Anliegen:
Beim klick des buttons cmdFertig sucht VBA die letzte nicht leere zelle in spalte A und markiert die darauf folgende (Range("A3").End(xldown).Offset(1,0).Select).
Jetzt wird hier ein wert eingefügt (Selection=txtlfdNr). Als nächstes soll die Markierung um eine Zelle nach rechts gehen und dort den wert aus cmbTag eingefügt werden. Dann wieder nach rechts und txtBeschr einfügen. Zu guter letzt,
if cmbEinAus="Einnahme" then eine zelle nach rechts und txtBetrag einfügen und
if cmbEinAus="Ausgabe" then zwei zellen nach rechts und txtBetrag einfügen.
Danke für eure Mühen.
MfG
Sebastian