Neue Cursorbewegung
Zum Ausfüllen mehrerer Arbeitsblätter benötige ich eine Cursorbewegung, die die Auswahl nach Drücken der Enter-Taste auf der numerischen Tastatur zwei Zellen nach rechts und eine Zelle nach unten verschiebt. Ist das möglich?
Hierzu benötigen Sie ein kleines Makro: 1. Soll das Makro in allen Mappen zur Verfügung stehen, so blenden Sie Ihre PERSONL.XLS ein und erstellen ein neues Visual-Basic-Modul. 2. Geben Sie folgenden Text ein: Sub Laufrichtung() Anwendung.BeiTaste "{Eingabe}"; _ "LaufrichtungRelativ" Anwendung.BeiTaste "{Esc}"; _ "Ruecksetzen" Ende Sub Sub Ruecksetzen() Anwendung.BeiTaste "{Eingabe}" Ende Sub Sub LaufrichtungRelativ() Auswahl.Versetzen(1; 2).Aktivieren Ende Sub 3. Weisen Sie diesem Makro eine Symbolschaltfläche zu, so steht er Ihnen auf Knopfdruck zur Verfügung. Wenn Sie [ESC] drücken, deaktivieren Sie den Makro wieder. Falls Sie eine andere Cursorbewegung als den hier vorgeschlagene Rösselsprung wünschen, dann verändern Sie die Zahlen in den Klammern hinter Auswahl.Versetzen.
|