Anzeige
Archiv - Navigation
180to184
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
180to184
180to184
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Anzahl von Spalten ermitteln

Anzahl von Spalten ermitteln
21.11.2002 09:47:38
Sebastian
Hallo VBA-Spezialisten,

mit dem folgenden Makro kann ich die Anzahl der Zeilen ermitteln , in den Einträge sind und als Variable setzen:

Sub AnzahlZeilenErmitteln()

Dim AnzZeilen as Integer
AnzZeilen = Cells(Rows.Count, 1).End(xlUp).Row

End Sub
---------

Nun meine Frage:

Wie funktioniert das mit Spalten? Ich habe mal probiert, aber es hat nicht funktioniert.

Viele Grüße,

Sebastian

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

Betreff
Datum
Anwender
Anzeige
Re: Anzahl von Spalten ermitteln
21.11.2002 09:53:45
JRobert
Hallo Sebastian

Eine letzte suchen:
TestZeile = 1
letzte_spalte = ActiveSheet.Cells(TestZeile, Columns.Count).End(xlToLeft).Column
TestSpalte = 1
letzte_zeile = ActiveSheet.Cells(Rows.Count, TestSpalte).End(xlUp).Row

grüß Robert

Re: Anzahl von Spalten ermitteln
21.11.2002 09:54:16
Boris
Hallo Sebastian,

bezogen auf den letzten Eintrag in Zeile 1:

Cells(1, Columns.Count).End(xlToLeft).Column

Gruß Boris

Re: Anzahl von Spalten ermitteln
21.11.2002 21:55:41
Sebastian
Hallo Robert,

vielen Dank, funktioniert super.

Sebastian

Anzeige

90 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige