hat Workbook_Open Priorität ?

Bild

Betrifft: hat Workbook_Open Priorität ?
von: Peter Feustel
Geschrieben am: 13.03.2005 10:15:51
Hallo Excel Experten,
ich wollte einem Freund helfen und kann es nicht - schade.
Mit nachfolgendem Makro öffnet er aus einer Mappe heraus eine zweite Excel-Mappe.
Das klappt auch gut, aber .....
Er möchte in der zweiten Mappe das Tabellenblatt ERICH aktivieren und das geht nicht.
Im Workbook_Open der zweiten Mappe wird ein anderes Tabellenblatt der Mappe aktiviert und das kann ich nicht 'übertrumpfen'.
Wer weiß Abhilfe?
Gruß Peter


Sub Sparen05Oeffnen()
Const Lw = "C:\"
'Const Pfad = "C:\Eigene Dateien\Excel\Test- u. Übungsprogramme\"
Const Pfad = "C:\Dokumente und Einstellungen\Administrator\Eigene Dateien\Excel-Dateien\"
Const Datei = "Sparen05a.xls"
    
    ActiveWorkbook.Save                 ' die aktive Excel-Mappe sichern
    
    ChDrive Lw                          ' das Laufwerk wechseln
    ChDir Pfad                          ' das aktuelle Verzeichnis wechseln
    On Error Resume Next                ' bei Fehler nächster Befehl
    Workbooks.Open Datei                ' die angeforderte Datei öffnen
    Sheets("ERICH").Range("A2").Select  ' in der Datei das Blatt 'ERICH' aktivieren
    
End Sub

     Code eingefügt mit Syntaxhighlighter 2.5

Bild

Betrifft: pack den code ins workbook_beforeclose
von: ransi
Geschrieben am: 13.03.2005 10:22:11
hallo peter
"Im Workbook_Open der zweiten Mappe wird ein anderes Tabellenblatt der Mappe aktiviert.."
Versuch diese einstellung mal ins workbook_beforeclose zu packen.
Ist vom ergebniss her das gleiche, aber du hast nicht das problem das sich die 2 codes gegenseitig behindern.
ransi

Bild

Betrifft: AW: pack den code ins workbook_beforeclose
von: Peter Feustel
Geschrieben am: 13.03.2005 10:27:22
Hallo ransi,
ich darf aber an der 'Fremdmappe' nichts ändern.
Sie soll nur für eine kurze Prüfung des Tabellenblattes ERICH geöffnet werden
und wird dann wieder geschlossen.
Mit Klick auf den Tabellenblatt-Reiter lässt sich das Blatt ERICH aktivieren, aber es sollte 'automatisch' zur Verfügung stehen.
Hast du dafür nicht eine Lösung?

Viele Grüße Peter
Bild

Betrifft: AW: pack den code ins workbook_beforeclose
von: ransi
Geschrieben am: 13.03.2005 10:32:22
hallo peter
wenn wir schon mal am activaten und selecten sind, versuchs mal so:
.
.
Sheets("ERICH").activate
Range("A2").Select
.
.
ransi
Bild

Betrifft: AW: danke ransi, so löppt dat.
von: Peter Feustel
Geschrieben am: 13.03.2005 10:43:10
Viele Grüße Peter
Bild

Betrifft: AW: hat Workbook_Open Priorität ?
von: Hajo_Zi
Geschrieben am: 13.03.2005 10:24:28
Hallo Peter,
das Forum hat ein Klasse Archiv/ REcherche suche z.B. nach Autoopen

Bitte keine Mail, Probleme sollten im Forum gelöst werden.
Microsoft MVP für Excel
Das Forum lebt auch von den Rückmeldungen.
Betriebssystem XP Home SP2 und Excel Version 2003 SP1.


Bild

Betrifft: AW: hat Workbook_Open Priorität ?
von: Peter Feustel
Geschrieben am: 13.03.2005 10:33:46
Hallo Hajo,
der Recherche gilt immer meine erste Suche und auch mit Autoopen war ich bereits dort.
Aber für mein 'Problem' gab es dort nichts rechtes - meine ich.

Viele Grüße Peter
 Bild

Beiträge aus den Excel-Beispielen zum Thema "hat Workbook_Open Priorität ?"