Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Arbeitsbuch oeffnen, Blatt suchen

Forumthread: Arbeitsbuch oeffnen, Blatt suchen

Arbeitsbuch oeffnen, Blatt suchen
19.02.2004 09:29:21
Alexej
Hallo nochmals!
Wie soll ein makro aussehen, wenn ich sagen will:
Oeffne die Datei, wessen Adresse sich in der Zelle C2 befindet und suche dort nach dem Arbeitsblatt Namen "xyz". Wenn dieses Arbeitsblatt nicht gefunden wurde, Fehlermeldung...
Viele Gruesse,
Alexej
Anzeige

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Arbeitsbuch oeffnen, Blatt suchen
19.02.2004 09:51:38
Mac4
Hallo Alexej,
das wäre eine Möglichkeit:

Sub test()
On Error GoTo Fehler
Workbooks.Open Filename:=Cells(1, 1)
Sheets("xyz").Activate
Fehler:
MsgBox "Tabellenblatt xyz  nicht vorhanden"
End Sub

Marc
Danke schoen :) k.T.
19.02.2004 10:54:17
Alexej
AW: Arbeitsbuch oeffnen, Blatt suchen
19.02.2004 10:00:13
AndreasS
Morgen,
noch ne Mgl:

Sub TabelleSuchen()
Dim blatt As Worksheet
Application.ScreenUpdating = False
Workbooks.Open Filename:=ActiveSheet.[a1], ReadOnly:=False
For Each blatt In ActiveWorkbook.Sheets
blatt.Activate
If blatt.Name <> "ABC" Then
MsgBox "Blatt wurde nicht gefunden"
Exit Sub
End If
Next blatt
Application.ScreenUpdating = True
End Sub

Gruß Andreas
Anzeige
Danke sehr :)) k.T.
19.02.2004 10:54:37
Alexej
Bitte, danke für die Rückmeldung
19.02.2004 10:58:09
AndreasS
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige