Methode 1: Z\u00e4hlen Sie die Anzahl der Bl\u00e4tter in der aktiven Arbeitsmappe<\/strong><\/span><\/p>\n Methode 2: Z\u00e4hlen Sie die Anzahl der Bl\u00e4tter in einer ge\u00f6ffneten Arbeitsmappe<\/strong><\/span><\/p>\n Methode 3: Z\u00e4hlen Sie die Anzahl der Bl\u00e4tter in einem geschlossenen Ordner<\/strong><\/span><\/p>\n Die folgenden Beispiele zeigen, wie jede dieser Methoden in der Praxis angewendet werden kann.<\/span><\/p>\n Nehmen wir an, wir haben die folgende Excel-Arbeitsmappe ge\u00f6ffnet und sehen sie uns an:<\/span> <\/p>\n Mit dem folgenden Makro k\u00f6nnen wir die Gesamtzahl der Bl\u00e4tter in dieser Arbeitsmappe z\u00e4hlen und die Zahl in Zelle A1 anzeigen:<\/span><\/p>\n Wenn wir dieses Makro ausf\u00fchren, erhalten wir die folgende Ausgabe:<\/span> <\/p>\n Beachten Sie, dass Zelle A1<\/b> den Wert 6<\/strong> enth\u00e4lt.<\/span><\/p>\n Dies sagt uns, dass diese Arbeitsmappe 6 Bl\u00e4tter enth\u00e4lt.<\/span><\/p>\n Nehmen wir an, wir haben eine Excel-Arbeitsmappe namens my_data.xlsx<\/strong> mit zwei ge\u00f6ffneten Bl\u00e4ttern, die wir aber derzeit nicht anzeigen.<\/span><\/p>\n Mit dem folgenden Makro k\u00f6nnen wir die Gesamtzahl der Bl\u00e4tter in dieser Arbeitsmappe z\u00e4hlen und die Zahl in Zelle A1 der aktiven Arbeitsmappe anzeigen:<\/span><\/p>\n Wenn wir dieses Makro ausf\u00fchren, erhalten wir die folgende Ausgabe:<\/span> <\/p>\n Beachten Sie, dass Zelle A1<\/b> den Wert 2<\/strong> enth\u00e4lt.<\/span><\/p>\n Dies sagt uns, dass es in der ge\u00f6ffneten Arbeitsmappe zwei Bl\u00e4tter mit dem Namen my_data.xlsx<\/strong> gibt.<\/span><\/p>\n Nehmen wir an, wir haben eine Excel-Arbeitsmappe namens my_data.xlsx<\/strong> mit zwei Bl\u00e4ttern, die derzeit nicht ge\u00f6ffnet sind, sich aber am folgenden Dateispeicherort befinden:<\/span><\/p>\n C:\\Benutzer\\Bob\\Desktop\\my_data.xlsx<\/strong><\/span><\/p>\n Mit dem folgenden Makro k\u00f6nnen wir die Gesamtzahl der Bl\u00e4tter in dieser Arbeitsmappe z\u00e4hlen und die Zahl in Zelle A1 des ersten Blatts der aktiven Arbeitsmappe anzeigen:<\/span><\/p>\n Wenn wir dieses Makro ausf\u00fchren, erhalten wir die folgende Ausgabe:<\/span> <\/p>\n Beachten Sie, dass Zelle A1<\/b> den Wert 2<\/strong> enth\u00e4lt.<\/span><\/p>\n Dies sagt uns, dass es in der geschlossenen Arbeitsmappe zwei Bl\u00e4tter mit dem Namen my_data.xlsx<\/strong> gibt.<\/span><\/p>\n Hinweis<\/strong> : Im Code weist Application.DisplayAlerts=False<\/strong> VBA an, den Vorgang des \u00d6ffnens der geschlossenen Arbeitsmappe, des Z\u00e4hlens der Bl\u00e4tter und des anschlie\u00dfenden Schlie\u00dfens der Arbeitsmappe nicht anzuzeigen.<\/span><\/p>\n Die folgenden Tutorials erkl\u00e4ren, wie Sie andere h\u00e4ufige Aufgaben in VBA ausf\u00fchren:<\/span><\/p>\n VBA: So z\u00e4hlen Sie die Anzahl der Zeilen im Bereich<\/a> Sie k\u00f6nnen die folgenden Methoden verwenden, um die Anzahl der Bl\u00e4tter in einer Arbeitsmappe in Excel zu z\u00e4hlen: Methode 1: Z\u00e4hlen Sie die Anzahl der Bl\u00e4tter in der aktiven Arbeitsmappe SubCountSheetsActive () Range(“ A1 „) = ThisWorkbook.Worksheets.Count End Sub Methode 2: Z\u00e4hlen Sie die Anzahl der Bl\u00e4tter in einer ge\u00f6ffneten Arbeitsmappe SubCountSheetsOpen () Range(“ A1 […]<\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[11],"tags":[],"yoast_head":"\n SubCountSheetsActive<\/span> ()\n Range(\" A1<\/span> \") = ThisWorkbook.Worksheets.Count<\/span>\nEnd Sub\n<\/span><\/strong><\/span><\/pre>\n SubCountSheetsOpen<\/span> ()\n Range(\" A1<\/span> \") = Workbooks(\" my_data.xlsx<\/span> \").Sheets.Count\nEnd Sub<\/span><\/strong><\/span><\/pre>\n SubCountSheetsClosed<\/span> ()\n Application.DisplayAlerts = False\n Set wb = Workbooks.Open(\" C:\\Users\\Bob\\Desktop\\my_data.xlsx<\/span> \")\n \n 'count sheets in closed workbook and display count in cell A1 of current workbook<\/span>\n ThisWorkbook.Sheets(1).Range(\" A1<\/span> \").Value = wb.Sheets.Count\n\n wb.Close SaveChanges:=True\n Application.DisplayAlerts = True\nEnd Sub<\/span><\/strong><\/span><\/pre>\n Beispiel 1: Z\u00e4hlen Sie die Anzahl der Bl\u00e4tter in einer aktiven Arbeitsmappe<\/strong><\/span><\/h2>\n
![\"\"](\"https:\/\/statorials.org\/wp-content\/uploads\/2023\/08\/vbasheets1.jpg\")
<\/p>\n SubCountSheetsActive<\/span> ()\n Range(\" A1<\/span> \") = ThisWorkbook.Worksheets.Count\nEnd Sub<\/span><\/strong><\/span><\/pre>\n![\"\"](\"https:\/\/statorials.org\/wp-content\/uploads\/2023\/08\/vbasheets2.jpg\")
<\/p>\n Beispiel 2: Z\u00e4hlen Sie die Anzahl der Bl\u00e4tter in einem offenen Ordner<\/strong><\/span><\/h2>\n
SubCountSheetsOpen<\/span> ()\n Range(\" A1<\/span> \") = Workbooks(\" my_data.xlsx<\/span> \").Sheets.Count\nEnd Sub<\/span><\/strong><\/span><\/pre>\n![\"\"](\"https:\/\/statorials.org\/wp-content\/uploads\/2023\/08\/vbasheets3.jpg\")
<\/p>\n Beispiel 3: Z\u00e4hlen der Anzahl der Bl\u00e4tter in einem geschlossenen Ordner<\/strong><\/span><\/h2>\n
SubCountSheetsClosed<\/span> ()\n Application.DisplayAlerts = False\n Set wb = Workbooks.Open(\" C:\\Users\\Bob\\Desktop\\my_data.xlsx<\/span> \")\n \n 'count sheets in closed workbook and display count in cell A1 of current workbook<\/span>\n ThisWorkbook.Sheets(1).Range(\" A1<\/span> \").Value = wb.Sheets.Count\n\n wb.Close SaveChanges:=True\n Application.DisplayAlerts = True\nEnd Sub<\/span><\/strong><\/span><\/pre>\n<\/p>\n Zus\u00e4tzliche Ressourcen<\/strong><\/span><\/h2>\n
VBA: So z\u00e4hlen Sie Zellen mit bestimmtem Text<\/a>
VBA: So schreiben Sie COUNTIF- und COUNTIFS-Funktionen<\/p>\n","protected":false},"excerpt":{"rendered":"