Immer gleises Register öffnen

Bild

Betrifft: Immer gleises Register öffnen
von: Baumi
Geschrieben am: 18.02.2005 18:07:56
Hallo
Möchte gerne, dass beim öffnen einer Excel-Datei immer das gleiche Register geöffnet wird. Standartmässig wird immer das zuletzt benötigte Register geöffnet, dies kann ich aber nicht brauchen, ich möchte immer das Titelblatt zu vorderst, egal was als letztes verwendet wurde.
Hoffe ihr könnt mir helfen, ist sicher nur irgendwo wiedermal ein kleines Kreuzchen, aber wo??
Grüsse und MERCI
Baumi

Bild

Betrifft: AW: Immer gleises Register öffnen
von: Tim
Geschrieben am: 18.02.2005 18:10:51

Private Sub Workbook_Open()
Sheets("Titelblatt").Activate
End Sub

Tim
Bild

Betrifft: AW: Immer gleises Register öffnen
von: Baumi
Geschrieben am: 18.02.2005 18:12:14
Und wo gebe ich das ein?
Wir danach automatisch das gleiche Register geöffnet, ohne dass ich da noch etwas machen muss?
Bild

Betrifft: AW: Immer gleises Register öffnen
von: ransi
Geschrieben am: 18.02.2005 18:12:13
hallo baumi
nur mit kleinem kreuz leider nicht.
versuchs mal so:

Private Sub Workbook_BeforeClose(Cancel As Boolean)
Worksheets("Titelblatt").Activate
End Sub

oder:

Private Sub Workbook_Open()
Worksheets("Titelblatt").Activate
End Sub

ransi
Bild

Betrifft: AW: Immer gleises Register öffnen
von: Baumi
Geschrieben am: 18.02.2005 18:14:53
Danke auch dir Ransi für die schnelle Antwort, aber muss ich den das eingeben?
Möchte, dass die Datei "normal" geschlossen und auch "normal" geöffnet werden kann, ohne dass dazu ein spezieller Button angeklickt werden muss....
Bild

Betrifft: code anzeigen
von: ransi
Geschrieben am: 18.02.2005 18:19:39
hallo baumi
versuch mal so:
rechte maus auf einen Tabellenreiter.
code anzeigen
dann kommt links so eine Art explorer.
doppelklick auf DieseArbeitsmappe.
dann öfffnet sich ein fenster.
da kopierst du den code rein.
Code heisst aber Makro.
D.h. du bekommst beim öffnen der datei evtl. die makrowarnung.
ransi
Bild

Betrifft: AW: Immer gleises Register öffnen
von: Baumi
Geschrieben am: 18.02.2005 18:24:49
Habe dies in wie beschrieben bei "Titelblatt" eingefügt, geht nicht
dann habe ich es noch in einer anderen Mappe eingefügt, geht auch nicht
muss es in allen Mappen sein oder nur in der Mappe Titelblatt
hmm?
Bild

Betrifft: AW: Immer gleises Register öffnen
von: ransi
Geschrieben am: 18.02.2005 18:27:52
hallo baumi
weder noch.
der code muss in "DieseArbeitsmappe".
ransi
Bild

Betrifft: Funktioniert!
von: Baumi
Geschrieben am: 18.02.2005 18:31:33
DANKE, sorry, habs falsch verstanden - jetzt gehts, genial merci!!
Wäre nun noch cool, wenn es immer oben links wäre, also im Feld A1, kann man das auch noch ergänzen?
(kleiner Finger, ganze Hand - das ist aber die letzte Frage... merci!)
Bild

Betrifft: AW: Funktioniert!
von: ransi
Geschrieben am: 18.02.2005 18:42:41
hallo baumi
könnte so gehn:
Option Explicit

Private Sub Workbook_BeforeClose(Cancel As Boolean)
Sheets("Titelblatt").Activate
ActiveSheet.Range("A1").Select
End Sub

oder:

Private Sub Workbook_Open()
Sheets("Titelblatt").Activate
ActiveSheet.Range("A1").Select
End Sub

ransi
Bild

Betrifft: Genial, Merci!
von: Baumi
Geschrieben am: 18.02.2005 18:47:28
Danke für die geniale und schnelle Hilfe, Problem gelöst, danke!
Bild

Betrifft: etwas kuerzer
von: th.heinrich
Geschrieben am: 18.02.2005 19:10:02
hallo Baumi u. Ransi,

Private Sub Workbook_Open()
Sheets("Titelblatt").Range("a1").Select
End Sub

gruss thomas
Bild

Betrifft: AW: etwas kuerzer
von: einfach genial ;-)
Geschrieben am: 18.02.2005 19:19:59

Bild

Betrifft: AW: etwas kuerzer
von: Claus Bauer
Geschrieben am: 18.02.2005 19:33:23
Hallole,
Klasse, das hab ich bei mir auch gleich gemacht, in meiner Datei, die ich jeden Tag öffne und so allerhand Links und Notizen und Stempelzeiterfassung etc. drin ist.
Allerdings mit dem etwas längeren Code von Ransi, mit dem gekürzten Code von Thomas hat´s bei mir nicht geklappt.
Vielen Dank und freundliche Grüße
Claus
Bild

Betrifft: etwas kürzer kam 1004
von: ransi
Geschrieben am: 18.02.2005 22:50:39
hallo thomas
das hatte ich als erstes probiert.
da kam die 1004.
warum...?
keine ahnunug
sheets("Titelblatt")war da und die range("a1") sowieso.
darum hab ich activatet und selected wie ein großer...
ransi
Bild

Betrifft: AW: etwas kürzer kam 1004
von: th.heinrich
Geschrieben am: 19.02.2005 00:04:35
hallo Ransi,
da wollte ich endlich mal was zusammenfassen geht in diesem fall aber nicht. hab's zwar "getestet", aber beim schliessen war Titelblatt aktiv.
sorry wollte Dir nicht zu nahe treten.
gruss thomas
Bild

Betrifft: wie immer gehst du auf die Nerven
von: Katrin
Geschrieben am: 19.02.2005 09:21:47
Reine Nervensache!
Wenn das Leitsystem versagt..
Bild

Betrifft: AW: etwas kürzer kam 1004
von: ransi
Geschrieben am: 19.02.2005 10:34:45
hallo thomas
"zu nahe treten" ???
LOL !!
deine antworten haben zu 99,999% hand und fuß.
ransi
Bild

Betrifft: danke fuer Deine rueckmeldung :-)) ot.
von: th.heinrich
Geschrieben am: 19.02.2005 13:40:58

Bild

Betrifft: AW: danke misst ot.
von: ss
Geschrieben am: 19.02.2005 15:03:10
nur sc............eee
 Bild

Beiträge aus den Excel-Beispielen zum Thema "format verknüpfungen"