Abbruch eines Codes wenn AM nicht geöffnet

Forumthread: Abbruch eines Codes wenn AM nicht geöffnet
4 Beiträge zu diesem Forumthread
Anzeige
VBA Beispiele zu verwandten Themen

Forumthread: Abbruch eines Codes wenn AM nicht geöffnet

14.05.2008 08:54:00

Josef

Guten Morgen!
Wenn eine Arbeitsmappe welche in einem Makro in einem Addin angesprochen wird, nicht geöffnet ist, soll das Makro abgebrochen werden.
Wie würde hier bitte eine VBA lösung lauten?
Danke
Josef

4
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: Abbruch eines Codes wenn AM nicht geöffnet

14.05.2008 09:11:32

Gerd
AW: Abbruch eines Codes wenn AM nicht geöffnet

14.05.2008 09:30:00

Josef
AW: Abbruch eines Codes wenn AM nicht geöffnet

14.05.2008 09:38:06

Hoffi
AW: Abbruch eines Codes wenn AM nicht geöffnet

14.05.2008 09:57:00

Josef

AW: Abbruch eines Codes wenn AM nicht geöffnet

14.05.2008 09:11:32

Gerd

Hallo Josef,
beispielsweise so.
For each wb in Application.Workbooks
If wb.name = "MeineDatei.xls" then
blnWeiter= true
Exit For
Next
iF not blnWeiter then exit sub
Gruß Gerd

AW: Abbruch eines Codes wenn AM nicht geöffnet

14.05.2008 09:30:00

Josef

Hallo Gerd!
Danke für Deine Antwort. Habe jetzt getestet und bekomme den Fehler
Next ohne For
Aber for ist ja da oder?
Dim wb
Dim blnWeiter
For Each wb In Application.Workbooks
If wb.Name = "Masterfile.xls" Then
blnWeiter = True
Exit For
Next
If Not blnWeiter Then Exit Sub
Josef

AW: Abbruch eines Codes wenn AM nicht geöffnet

14.05.2008 09:38:06

Hoffi

Hallo,
da fehlt ein end if:
Dim wb As Workbook
Dim blnWeiter As Boolean
For Each wb In Application.Workbooks
If wb.Name = "Masterfile.xls" Then
blnWeiter = True
Exit For
End If
Next
If Not blnWeiter Then Exit Sub
Grüße

AW: Abbruch eines Codes wenn AM nicht geöffnet

14.05.2008 09:57:00

Josef

Hallo Hoffi!
Danke für Deine Antwort und Deine Hilfe.
Josef