Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
736to740
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
736to740
736to740
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Max Wert suchen in mehreren Tabellenblättern

Max Wert suchen in mehreren Tabellenblättern
01.03.2006 00:34:29
Stephen
Aloha Forum!
Dank des Forums konnte ich den MaxWert der Spalte B des letzten Tabellenblattes ermitteln.
Cells(11, 2) = Application.WorksheetFunction.Max(Sheets(Worksheets.Count).[B:B]) + 1
Jetzt möchte ich die Suche auf alle Tabellenblätter mit dem Format MM.YYYY erweitern.
Habe es schon einige Stunden mit For Each probiert, komme aber nicht weiter :(
Danke
Stephen

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Max Wert suchen in mehreren Tabellenblättern
01.03.2006 07:33:12
ede
hallo stephan,
dann versuch mal so:

Sub alle_maxWerte()
Dim i As Integer
Worksheets.Add.Move after:=Worksheets(Worksheets.Count)
For i = 1 To Worksheets.Count - 1
Cells(i, 1) = Sheets(i).Name
Cells(i, 2) = Application.WorksheetFunction.Max(Sheets(i).[B:B]) + 1
Next i
End Sub

gruss
Anzeige

304 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige