Inhaltsverzeichnis
Testen Sie, ob die Arbeitsmappe geöffnet ist
Hier ist ein echter grundlegender Code zum Testen, ob eine Arbeitsmappe derzeit geöffnet ist, indem Sie den Namen einer Arbeitsmappe testen, nicht den vollständig qualifizierten Namen einschließlich des Pfads.
Ich habe Code in einer Tabellenkalkulation geschrieben, die Blätter in einer anderen Arbeitsmappe verändert, und wollte sicherstellen, dass Arbeitsmappe 2 geöffnet ist, bevor der Code in Arbeitsmappe 1 ausgeführt wird.
Sub TestByWorkbookName() Dim wb As Workbook For Each wb In Workbooks If wb.Name = "New Microsoft Excel Worksheet.xls" Then MsgBox "Found it" Exit Sub 'Aufrufcode hier, wir werden erst einmal beenden End If Next End Sub