VBScript für die verwendeten Zellen

KleinerPinguin · 27.01.2005

Hallo,

wollte ein Script schreiben, das automatisch Daten aus Excel exportiert und fand keine Methode oder Eigenschaft, die mir sagt, welche oder wieviele Zellen verwendet werden. Ich will es auch nicht von Konventionen abhängig machen wie Script läuft nur, wenn keine Leerzeilen/-spalten innnerhalb der Daten.

So was wie

Code:

maxr = mySheet.Rows.Count
maxc = mySheet.Columns.Count

liefert immer nur die max. möglichen Werte (65536 und 256). Wenn ich damit eine Schleife baue, kann ich erstmal->nen Kaffee trinken gehen! (600 Mhz).

Hat jemand einen Tipp für->ne elegante Lösung?
Vielen Dank
Der K. P.

Matjes · 27.01.2005

Hi KleinerPinguin,

Code:

  Dim l_r As Long
  
 ->letzte Zeile des benutzten Bereichs
  l_r = ActiveSheet.UsedRange.Rows.Count
 ->oder
  l_r = ActiveSheet.Cells.SpecialCells(xlCellTypeLastCell).Row
 ->Excel hat hier eine Macke
 ->Hat man aus Spaß mal in Zeile 65500 einen Wert eingetragen
 ->und ihn dann wieder gelöscht, geht der benutzte Bereich
 ->bis zu dieser Zeile
  
 ->Genau wird es dann mit der Bestimmung aus einer Spalte:
 ->letzte Zeile in Spalte C mit Wert
  l_r = ActiveSheet.Cells(ActiveSheet.Rows.Count, 3).End(xlUp).Row

Gruß Matjes

KleinerPinguin · 28.01.2005

Danke Dir!
Das war's was ich suchte,
hatte ich einfach noch nicht gefunden, die richtige Methode

KleinerPinguin

VBScript für die verwendeten Zellen

KleinerPinguin

Matjes

KleinerPinguin

VBScript für die verwendeten Zellen

ANGEBOTE & SPONSOREN

Neueste Themen

Statistik des Forums