Office Forum
www.Office-Loesung.de
Access :: Excel :: Outlook :: PowerPoint :: Word :: Office
Startseite festlegen! Wie?
Gehe zu Seite 1, 2  Weiter
zurück: Zellenformatierung weiter: letzter Tag des aktuellen Monats ermitteln Unbeantwortete Beiträge anzeigen
Neues Thema eröffnen   Neue Antwort erstellen     Status: Feedback Facebook-Likes Diese Seite Freunden empfehlen
Zu Browser-Favoriten hinzufügen
Autor Nachricht
Mutz
Im Profil kannst Du frei den Rang ändern


Verfasst am:
17. Jul 2008, 17:20
Rufname:

Startseite festlegen! Wie? - Startseite festlegen! Wie?

Nach oben
       Version: Office 2003

Hallo.

Habe eine Tabelle mit mehreren Arbeitsblättern und möchte das beim öffnen der Tabelle das Arbeitsblatt "Übersicht" immer automatisch geöffnet wird. Das Arbeitsblatt "Übersicht" besteht aber aus mehreren Seite und es soll immer die 1. Seite oben geöffnet werden.
Ist das möglich, wenn wie?

Danke im vorraus.


Mutz
ae
Mein Name ist Ente


Verfasst am:
17. Jul 2008, 17:36
Rufname: Andreas
Wohnort: Reppenstedt bei Lüneburg


AW: Startseite festlegen! Wie? - AW: Startseite festlegen! Wie?

Nach oben
       Version: Office 2003

Hallo,
dazu kannst das Workbook_Open Ereignis nutzen

Dort den Code rein

Sheets("Übersicht").Range("A1").select

_________________
Gruß
Andreas E
------
Oh Mann, ich fühl mich heute wie =DATEDIF(DATUM(1961;6;12);HEUTE();"y") Jahre alt
Mutz
Im Profil kannst Du frei den Rang ändern


Verfasst am:
17. Jul 2008, 17:38
Rufname:

AW: Startseite festlegen! Wie? - AW: Startseite festlegen! Wie?

Nach oben
       Version: Office 2003

Ich kenne mich leider nicht so mit Excel aus.
Könntest du das mal bitte etwas genauer erklären was wo und wie rein muß.


Danke, Mutz
ae
Mein Name ist Ente


Verfasst am:
17. Jul 2008, 17:41
Rufname: Andreas
Wohnort: Reppenstedt bei Lüneburg

AW: Startseite festlegen! Wie? - AW: Startseite festlegen! Wie?

Nach oben
       Version: Office 2003

Hallo,

wie man Code in diese Arbeitsmappe einfügt hat Beate hier sehr schön beschrieben

Zitat:
Wie fügt man ein Makro in "dieseArbeitsmappe" ein?

während Excel aktiv ist, ist die Tastenkombination Alt + F11 zu drücken, damit öffnet sich das Fenster der Entwicklungsumgebung für VBA
mit Tastenkombination Strg + R den Projektexplorer öffnen und aktivieren
dort die gewünschte Datei per Doppelklick markieren, sie ist dann blau unterlegt
nun Doppelklick unterhalb dieser Datei auf "dieseArbeitsmappe"
nun ist in der rechten Fensterhälfte das Codefenster von "dieseArbeitsmappe". In diese kann der Code eingefügt werden
speichern und Visual Basic mit Tastenkombination Alt + F4 schließen
das Makro steht nun in der Datei zur Verfügung
Ausnahme: Worksheet_Open-Makros werden erst nach dem nächsten Dateiöffnen berücksichtigt


http://www.online-excel.de/excel/singsel_vba.php?f=44

Dein Code lautet

Code:
Private Sub Workbook_Open()
Sheets("Übersicht").Range("A1").select
End Sub

_________________
Gruß
Andreas E
------
Oh Mann, ich fühl mich heute wie =DATEDIF(DATUM(1961;6;12);HEUTE();"y") Jahre alt
Mutz
Im Profil kannst Du frei den Rang ändern


Verfasst am:
17. Jul 2008, 17:49
Rufname:


AW: Startseite festlegen! Wie? - AW: Startseite festlegen! Wie?

Nach oben
       Version: Office 2003

Funktioniert irgendwie noch nicht richt. Habe mal geschaut und das steht schon drin. Allerdings nicht beim öffnen, sondern beim schließen. Paßt mir ehrlich gesagt auch besser wenn vorm schließen die "Übersicht" und die 1. Seite oben aufgerufen wird.
Das steht schon drin. Wie und was muß denn noch dazu?

Private Sub Workbook_BeforeClose(Cancel As Boolean)
Application.DisplayAlerts = False
Worksheets("Übersicht").Activate
ThisWorkbook.Save
Application.DisplayAlerts = True
End Sub


Mutz
ae
Mein Name ist Ente


Verfasst am:
17. Jul 2008, 17:53
Rufname: Andreas
Wohnort: Reppenstedt bei Lüneburg

AW: Startseite festlegen! Wie? - AW: Startseite festlegen! Wie?

Nach oben
       Version: Office 2003

Hallo,
wenn es so schon drin steht passt es doch schon
Ob beim Schliessen oder beim Öffnen ist egal

_________________
Gruß
Andreas E
------
Oh Mann, ich fühl mich heute wie =DATEDIF(DATUM(1961;6;12);HEUTE();"y") Jahre alt
Mutz
Im Profil kannst Du frei den Rang ändern


Verfasst am:
17. Jul 2008, 17:59
Rufname:

AW: Startseite festlegen! Wie? - AW: Startseite festlegen! Wie?

Nach oben
       Version: Office 2003

Das ist so weit gut. Aus der Übersicht komme ich über Links in die einzelnen Arbeitsblätter; habe ich jetzt aber z.B. Seite 4 in der Übersicht und gehe dort über einen Link in ein Arbeitsblatt, wird beim schließen zwar wieder auf die Übersicht gesprungen, allerdings auf Seite 4. Wie kann man das noch ändern das es dann auch noch auf Seite 1 springt. Was muss denn da noch dazu?


Mutz
Mutz
Im Profil kannst Du frei den Rang ändern


Verfasst am:
17. Jul 2008, 18:03
Rufname:

AW: Startseite festlegen! Wie? - AW: Startseite festlegen! Wie?

Nach oben
       Version: Office 2003

Das stimmt. Ich komme aus der Übersicht über verschiedene Links in die einzelnen Arbeitsblätter. Bin ich nun in der Übersicht z.B. auf Seite 4 und gehe dort über Link in das Arbeitsblatt, wird zwar beim schließen die Übersicht wieder geöffnet, allerdings Seite 4. Wie kann ich das machen das auch die 1. Seite geöffnet wird?


Mutz
ae
Mein Name ist Ente


Verfasst am:
17. Jul 2008, 18:25
Rufname: Andreas
Wohnort: Reppenstedt bei Lüneburg

AW: Startseite festlegen! Wie? - AW: Startseite festlegen! Wie?

Nach oben
       Version: Office 2003

Hallo,

Sheets("Übersicht").Range("A1").select

statt

Worksheets("Übersicht").Activate

_________________
Gruß
Andreas E
------
Oh Mann, ich fühl mich heute wie =DATEDIF(DATUM(1961;6;12);HEUTE();"y") Jahre alt
Mutz
Im Profil kannst Du frei den Rang ändern


Verfasst am:
17. Jul 2008, 18:42
Rufname:

AW: Startseite festlegen! Wie? - AW: Startseite festlegen! Wie?

Nach oben
       Version: Office 2003

Funktioniert irgendwie noch nicht, oder ich habe etwas verkehrt gemacht. Das steht momentan drin:

Private Sub Workbook_BeforeClose(Cancel As Boolean)
Application.DisplayAlerts = False
Sheets("Karte").Range("A1").Select
ThisWorkbook.Save
Application.DisplayAlerts = True
End Sub

Es kommt aber folgende Fehlermeldung:

Fehler beim Kompilieren


Mutz
ae
Mein Name ist Ente


Verfasst am:
17. Jul 2008, 19:15
Rufname: Andreas
Wohnort: Reppenstedt bei Lüneburg

AW: Startseite festlegen! Wie? - AW: Startseite festlegen! Wie?

Nach oben
       Version: Office 2003

Hallo,
machs mal so

Private Sub Workbook_BeforeClose(Cancel As Boolean)
Application.DisplayAlerts = False
Sheets("Karte").Activate
Range("A1").Select
ThisWorkbook.Save
Application.DisplayAlerts = True
End Sub

dann wähle ein beliebiges Tabellenblatt aus - nicht das sheet Karte !
Schliessen und neu öffnen

_________________
Gruß
Andreas E
------
Oh Mann, ich fühl mich heute wie =DATEDIF(DATUM(1961;6;12);HEUTE();"y") Jahre alt
Mutz
Im Profil kannst Du frei den Rang ändern


Verfasst am:
17. Jul 2008, 20:11
Rufname:

AW: Startseite festlegen! Wie? - AW: Startseite festlegen! Wie?

Nach oben
       Version: Office 2003

Habe das so gemacht, allerdings springt es in der Übersicht wieder auf die Seite die ich zuletzt hatte.


Mutz
ae
Mein Name ist Ente


Verfasst am:
17. Jul 2008, 20:14
Rufname: Andreas
Wohnort: Reppenstedt bei Lüneburg

AW: Startseite festlegen! Wie? - AW: Startseite festlegen! Wie?

Nach oben
       Version: Office 2003

Hallo Mutz,
hast Du denn noch im Open irgendwas stehen ?
Bei mir steht dann immer die Tabelle Karte mit A1 selektiert zur Verfügung

_________________
Gruß
Andreas E
------
Oh Mann, ich fühl mich heute wie =DATEDIF(DATUM(1961;6;12);HEUTE();"y") Jahre alt
Mutz
Im Profil kannst Du frei den Rang ändern


Verfasst am:
17. Jul 2008, 20:27
Rufname:

AW: Startseite festlegen! Wie? - AW: Startseite festlegen! Wie?

Nach oben
       Version: Office 2003

Bei mir steht dann nur das:
Private Sub Workbook_Open()

End Sub
ae
Mein Name ist Ente


Verfasst am:
18. Jul 2008, 06:06
Rufname: Andreas
Wohnort: Reppenstedt bei Lüneburg


AW: Startseite festlegen! Wie? - AW: Startseite festlegen! Wie?

Nach oben
       Version: Office 2003

Hallo,
dann schreib mal ins Open

Sheets("Karte").Activate
Range("A1").Select

ud dein BeforeClose lösche mal bitte

_________________
Gruß
Andreas E
------
Oh Mann, ich fühl mich heute wie =DATEDIF(DATUM(1961;6;12);HEUTE();"y") Jahre alt
Neues Thema eröffnen   Neue Antwort erstellen Alle Zeiten sind
GMT + 1 Stunde

Gehe zu Seite 1, 2  Weiter
Diese Seite Freunden empfehlen

Seite 1 von 2
Gehe zu:  
Du kannst Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.
Du kannst Dateien in diesem Forum nicht posten
Du kannst Dateien in diesem Forum herunterladen

Verwandte Themen
Forum / Themen   Antworten   Autor   Aufrufe   Letzter Beitrag 
Keine neuen Beiträge Excel Formeln: MITTELWERTWENN Kriterienbereich per Formel festlegen 3 Jayman_D 118 25. Nov 2013, 14:18
Gast MITTELWERTWENN Kriterienbereich per Formel festlegen
Keine neuen Beiträge Excel Formeln: Problem beim Druckbereich festlegen, da dynamisch (SAP) 39 roody1402 8466 05. Nov 2013, 18:14
snuppi69 Problem beim Druckbereich festlegen, da dynamisch (SAP)
Keine neuen Beiträge Excel Formeln: Druckbereich über Zellenwert festlegen 6 david2244 1257 26. Aug 2011, 11:24
david2244 Druckbereich über Zellenwert festlegen
Keine neuen Beiträge Excel Formeln: Bereich dynamisch festlegen 10 Judas86 2831 18. Okt 2010, 09:05
< Peter > Bereich dynamisch festlegen
Keine neuen Beiträge Excel Formeln: Reiter (Tab)namen durch Zellbezug festlegen 2 Metayrie 1522 04. Aug 2010, 10:21
Metayrie Reiter (Tab)namen durch Zellbezug festlegen
Keine neuen Beiträge Excel Formeln: Namen festlegen für Variablen, wenn Anzahl unbekannt 7 Staatsi 707 12. Jul 2010, 12:08
Staatsi Namen festlegen für Variablen, wenn Anzahl unbekannt
Keine neuen Beiträge Excel Formate: Seitenformat für alle Arbeitsblätter einer Mappe festlegen 5 One-Termer 6381 23. Jan 2010, 10:36
Thomas Ramel Seitenformat für alle Arbeitsblätter einer Mappe festlegen
Keine neuen Beiträge Excel Formate: Druckbereich festlegen 2 Angie-Gast 720 25. Nov 2009, 11:00
Angie-Gast_ Druckbereich festlegen
Keine neuen Beiträge Excel Formate: Tabellenblatt festlegen 0 florian1 610 15. Sep 2009, 06:36
florian1 Tabellenblatt festlegen
Keine neuen Beiträge Excel Formeln: Formel für Feld festlegen 1 manuel_bo 807 07. Nov 2008, 14:09
Lucy77 Formel für Feld festlegen
Keine neuen Beiträge Excel Formeln: Scrollbereich festlegen 4 x16 5156 17. Okt 2008, 11:42
x16 Scrollbereich festlegen
Keine neuen Beiträge Excel Formeln: Maximalen Eintragewert festlegen 3 Daniel2 293 06. März 2008, 19:25
Zero Maximalen Eintragewert festlegen
 

----> Diese Seite Freunden empfehlen <------ Impressum - Besuchen Sie auch: Web Editor Forum