Re: Cursor (Zellzeiger)
05.11.2002 16:42:21
Raner Wittstock
Hallo Hans,
stimmt, ich habe ein wenig Kauderwelsch geschrieben.Meine ursprüngliche Frage war:
Hallo ihr Lieben,
befinden sich in einem Tabellenblatt Objekte (Buttons, Kontrollkästchen) und werden diese angeklickt, ist der Zellzeiger (schwarze Umrandung um Zellen) verschwunden.
Bei den Buttons gibt es die Möglichkeit (unter Eigenschaften: TakeFokusOnKlick = False) um den Fokus in der Tabelle zu lassen. Für Kontrollkästchen in einem Tabellenblatt gibt es diese Eigenschaft nicht.
Nun zu meinem Anliegen: gibt es eine Möglichkeit, per Code abzufragen wo sich der Zellzeiger im Tabellenblatt BEVOR der Ausführung eines Befehls befindet und ihn nach dem Befehl wieder an dieselbe Stelle zu setzen?
Ralf Sögel gab mir dann die Hilfestellung:
Dim aC as Range
...
Set aC = ActiveCell
Ich probierte das mit einem Kontrollkästchen und einem einfachen Makro (kopieren und einfügen) aus. Es klappte. Ich freute mich und spielte weiter mit der neugelernten Funktion bis ich erschrocken feststellte, dass alle meine 22 Kommentare "verschwunden" waren.
Ich schloss die Mappe ohne zu speichern, vielleicht konnte ich noch etwas retten. Als ich sie wieder öffnete, waren die Kommentare immer noch "verschwunden".
Ich wechselte in eine andere Mappe und wieder zurück - und siehe da, meine Kommentare waren wieder alle vorhanden.
Ich fand dann auch die Ursache und zwar im folgenden Befehl (der auch in einer ganz neuen Mappe funktioniert - oder besser gesagt diesen Fehler? verursacht):
Und jetzt klappt aus unerfindlichen Gründen Ralfs Funktion nicht mehr:
Dim aC as Range
...
Set aC = ActiveCell
Liebe Grüße von einem "ratlosen" Rainer