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

Tabellenblätter zählen

Forumthread: Tabellenblätter zählen

Tabellenblätter zählen
08.10.2004 10:27:06
Trappi
hallo zusammen,
kann ich per button-click die anzahl der in der aktuellen mappe befindlichen tabellenblätter zählen und ins "A1" und "A2" jeder tabelle die seitenzahl und die anzahl aller tabellen ausgeben?
vielen dank für eure hilfe
grüsse aus der schweiz
trappi
Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Tabellenblätter zählen
08.10.2004 10:43:05
grumble
hi
also
dim x,i as integer
x = worksheets.count
for i = 1 to x
Worksheets(i).Activate
range("A1").value=x
range("A2").value=x
next i
aber ungestestet
AW: Tabellenblätter zählen
geri
kleine Anpassung

Sub Verzeichnis()
Dim x, i As Integer
x = Worksheets.Count
For i = 1 To x
Worksheets(i).Activate
Range("A1").Value = i
Range("A2").Value = x
Next i
End Sub

gruss geri aus CH
Anzeige
AW: Tabellenblätter zählen
08.10.2004 10:43:13
Gert
Hallo trappi,
geh mal im oberen Menü dieser Seite auf: Services ---&gt Excel-Recherche ---&gt
und schreibe ins erste "Suchfeld" "Inhaltsverzeichnis in Mappe", dort
findest Du VBA-Module.
mfg
Gert
Es gibt nicht gutes, außer man tut es.

Forumthreads zu verwandten Themen

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige