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

Forumthread: Anzahl Zeilen in Zelle ausgeben - woran liegts?

Anzahl Zeilen in Zelle ausgeben - woran liegts?
21.12.2006 15:09:13
asz
Hallo,
ich stehe mal wieder auf dem Schlauch: Nach einem automatischen Listenvergleich werden die doppelten Zeilen beide in ein neues Workbook+Worksheet gespielt. Ich möchte dann dort die gefüllten Zeilen zählen und deren Anzahl durch 2 teilen, um die Dublettenanzahl zu ermitteln. Dies habe ich mit
Dim zeilenzahl As Integer, dublettenzahl As Integer
zeilenzahl = wksZiel.Range("a65536").End(xlUp).Row
dublettenzahl = zeilenzahl / 2
wksZiel.Range("ae4") = dublettenzahl
versucht, bekomme aber Fehlermeldung 9, Index außerhalb des gültigen Bereichs. - Habe auch schon andere Lösungen aus diesem Forum mit count.cells etc. probiert, ich komme aber nicht weiter.
Leider klappt der Upload gerade nicht, sodass ich die Mappe nicht hochladen kann. Wer hat eine Idee, woran es liegen kann?
Vielen Dank im voraus!
asz
Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Anzahl Zeilen in Zelle ausgeben - woran liegts?
21.12.2006 15:26:11
Galenzo
Integer ist nur bis 32.767 definiert.
Dim zeilenzahl As Long, dublettenzahl As Long
Viel Erfolg!
/Galenzo
AW: Anzahl Zeilen in Zelle ausgeben - woran liegts
22.12.2006 09:08:16
asz
Hallo Galenzo,
ja, prima, ganz vielen Dank für die Hilfe und frohe Weihnachten!
asz
AW: Anzahl Zeilen in Zelle ausgeben - woran liegts?
21.12.2006 15:35:19
Jens
Hallo!

Sub test()
Dim zeilenzahl As Long, dublettenzahl As Long
Dim wksZiel As Worksheet
Set wksZiel = Sheets("Ziel")
zeilenzahl = Cells(Rows.Count, 1).End(xlUp).Row
'zeilenzahl = wksZiel.Range("a65536").End(xlUp).Row
dublettenzahl = zeilenzahl / 2
wksZiel.Range("ae4") = dublettenzahl
End Sub

Grüße,
Jens
Anzeige
AW: Anzahl Zeilen in Zelle ausgeben - woran liegts
22.12.2006 09:07:26
asz
Hallo Jens,
es klappt - ganz herzlichen Dank & frohe Weihnachten!
asz
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige