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

VBA Zählen

Forumthread: VBA Zählen

VBA Zählen
19.05.2009 07:55:41
Einzel
Hallo,
habe folgenden VBA Code:

Sub Zaehlen()
Dim zeilen As Integer
Range("B2").Select
zeilen = Selection.CurrentRegion.Rows.Count - 4 'die ersten 4 Zellen abziehen
MsgBox "Anzahl aufgenommene Zeichnungen: " & zeilen, vbOKOnly, "ZEICHNUNGSANZAHL"
End Sub


Dieser Zählt immer die Anzahl der ausgefülten Zellen in der Spalte, wo die meisten Einträge stehen.
Ich möchte den Code aber haben das er nur in Spalte A Zählt. Wer weis um Rat
Mfg
Stephan

Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: VBA Zählen
19.05.2009 08:07:17
Tino
Hallo,
vielleicht gehts so.

Sub Zaehlen()
Dim zeilen As Long
zeilen = Range("A6", Cells(Rows.Count, 1).End(xlUp)).Rows.Count
MsgBox "Anzahl aufgenommene Zeichnungen: " & zeilen, vbOKOnly, "ZEICHNUNGSANZAHL"
End Sub


Gruß Tino

Anzeige
AW: VBA Zählen
19.05.2009 08:33:02
Einzel
Ja genau so sollte es sein.
Danke und spitze.
MfG
Stephan
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige