Gruppen
- Top Gruppen
- Betriebsysteme
- Windows classik
- Linux
- BS-Sonstige
- Software
- Datenbanken
- Bildbearbeitung
- Audio/mp3/Video
- Security/Viren
- SW-Sonstige
- Hardware
- Mainboard/CPU
- Grafikkarten
- Peripherie
- Laptop/Notebook
- HW-Sonstiges
- Netzwerk
- Telefon,ISDN,Modem
- W-Lan
- NW-Sonstiges
- Programmierung
- PHP,ASP,Perl...
- Java,C++...
- Webseiten/HTML
- Sonstiges
- PC-Sonstiges
- Plauderecke
- SN Intern
- Test
/ Forum / Tabellenkalkulation
Tabellenkalkulation
Fragevon Tomschi vom 04.10.2019, 06:58 Options
VBA - zurück zum letzten Blatt
Guten Morgen!
Vor dem Speichern einer Arbeitsmappe halte ich das aktuelle Datum inkl. Uhrzeit im Blatt "Protokollierung" fest.
--> Private Sub Workbook_BeforeSave
Die Arbeitsmappe selbst umfasst ca. 20 Blätter
(Test01, Test02, ..., Protokollierung).
Nun ist es so, dass beim nächsten Öffnen der Cursor auf dem Blatt "Protokollierung" steht.
Ist es möglich, nach der "Protokollierung" wieder auf das zuletzt verwendete Blatt zurückzukehren?
Beispiel:
Cursor steht auf Test02 --> speichern (inkl. "Protokollierung") + schließen --> Datei öffnen = Cursor wieder auf Test02.
Thanx
Tom
Vor dem Speichern einer Arbeitsmappe halte ich das aktuelle Datum inkl. Uhrzeit im Blatt "Protokollierung" fest.
--> Private Sub Workbook_BeforeSave
Die Arbeitsmappe selbst umfasst ca. 20 Blätter
(Test01, Test02, ..., Protokollierung).
Nun ist es so, dass beim nächsten Öffnen der Cursor auf dem Blatt "Protokollierung" steht.
Ist es möglich, nach der "Protokollierung" wieder auf das zuletzt verwendete Blatt zurückzukehren?
Beispiel:
Cursor steht auf Test02 --> speichern (inkl. "Protokollierung") + schließen --> Datei öffnen = Cursor wieder auf Test02.
Thanx
Tom
Antwort 1 von Hajo_Zi vom 04.10.2019, 09:19 Options
Hallo Nick,
atbeite nicht mit Activate und select und Du hast das Problem nicht.,
Gruß Hajo
atbeite nicht mit Activate und select und Du hast das Problem nicht.,
Gruß Hajo
Antwort 2 von M.O. vom 04.10.2019, 09:22 Options
Hallo Tom,
schreibe folgende Codezeile als erste in dein Makro:
Als letzte Zeile vor End Sub schreibst du:
Das sollte dein Problem lösen.
Gruß
M.O.
schreibe folgende Codezeile als erste in dein Makro:
asn = ActiveSheet.NameAls letzte Zeile vor End Sub schreibst du:
Worksheets(asn).ActivateDas sollte dein Problem lösen.
Gruß
M.O.
Antwort 3 von Tomschi vom 04.10.2019, 10:03 Options
Hi!
Hm, das mit
arbeite nicht mit Activate und select und Du hast das Problem nicht.
habe ich jetzt nicht kapiert.
Vielleicht bezieht sich die Antwort auch auf eine andere Frage.
--> Hallo Nick = ungleich mein Name
DANKE M.O., Deine Antwort war sehr hilfreich für mich.
Ciao
Tom
Hm, das mit
arbeite nicht mit Activate und select und Du hast das Problem nicht.
habe ich jetzt nicht kapiert.
Vielleicht bezieht sich die Antwort auch auf eine andere Frage.
--> Hallo Nick = ungleich mein Name
DANKE M.O., Deine Antwort war sehr hilfreich für mich.
Ciao
Tom
Antwort 4 von Hajo_Zi vom 04.10.2019, 10:09 Options
Hallo Tom,
meine Antwort bezog sich schon auf Deine Frage, wenn Du in Deinen Code schaust wird Dir aufffallken das Du Activate und oder select verwenbdest. Der Cursur ist kein Hund der überall rumgeführt werden muss..
Endschuldigung mit der Anrede war ein versehen.
Gruß hajo
meine Antwort bezog sich schon auf Deine Frage, wenn Du in Deinen Code schaust wird Dir aufffallken das Du Activate und oder select verwenbdest. Der Cursur ist kein Hund der überall rumgeführt werden muss..
Endschuldigung mit der Anrede war ein versehen.
Gruß hajo
Antwort 5 von Tomschi vom 04.10.2019, 11:39 Options
Hallo Hajo!
Danke für die Aufklärung.
In der Tat habe ich
Sheets("Protokollierung").Activate
eingebaut.
Wenn ich Activate weglasse, dann funktioniert das Makro auch ohne Probleme?
Wann genau soll man dann Activate verwenden bzw. weglassen?
Bye
Tom
P.S.:
Kein Problem wegen der Anrede.
Hat mich eben nur ein wenig verwirrt.
Danke für die Aufklärung.
In der Tat habe ich
Sheets("Protokollierung").Activate
eingebaut.
Wenn ich Activate weglasse, dann funktioniert das Makro auch ohne Probleme?
Wann genau soll man dann Activate verwenden bzw. weglassen?
Bye
Tom
P.S.:
Kein Problem wegen der Anrede.
Hat mich eben nur ein wenig verwirrt.
Antwort 6 von Hajo_Zi vom 04.10.2019, 11:42 Options
Hallo Tom,
in VBA kann zu 99,9% auf select und Activate verzichtet werden.
Gruß Hajo
in VBA kann zu 99,9% auf select und Activate verzichtet werden.
Gruß Hajo
Antwort 7 von M.O. vom 04.10.2019, 13:28 OptionsLösung
Hallo Tom,
einfach Activate oder Select weglassen kannst du natürlich nicht.
Du musst den Code entsprechend anpassen.
Statt z.B.
schreibst du:
Gruß
M.O.
einfach Activate oder Select weglassen kannst du natürlich nicht.
Du musst den Code entsprechend anpassen.
Statt z.B.
Worksheets("Protokollierung").Activate
Cells(1, 1) = Nowschreibst du:
Worksheets("Protokollierung").Cells(1, 1) = NowGruß
M.O.
Ähnliche Themen
Ferientermine in Excel
090365 01.01.2007 - 108 Hits - 7 Antworten
VBA: Bei Select-Methode soll Blatt nicht aufgerufen werden
Catze81 03.05.2007 - 74 Hits - 5 Antworten
Excel daten in regelmäßigen abständen erfassen lassen
GuntramTreder 09.11.2007 - 117 Hits - 3 Antworten
sverweis mit vba
Kalmi 15.02.2008 - 197 Hits - 4 Antworten
nachtstunden in mehren bereichen ausrechnen????
dieter2000 04.04.2008 - 78 Hits - 1 Antwort
Hinweis
Diese Frage ist schon etwas älter, Sie können daher nicht mehr auf sie antworten. Sollte Ihre Frage noch nicht gelöst sein, stellen Sie einfach eine neue Frage im Forum..
Neue Einträge
