Office Forum
www.Office-Loesung.de
Access :: Excel :: Outlook :: PowerPoint :: Word :: Office :: Wieder Online ---> provisorisches Office Forum <-
Letzte beschriebene Zeile finden trotz Leerzellen
zurück: Excel VBA - Application ontime weiter: add-in und makros Unbeantwortete Beiträge anzeigen
Neues Thema eröffnen   Neue Antwort erstellen     Status: Feedback Facebook-Likes Diese Seite Freunden empfehlen
Zu Browser-Favoriten hinzufügen
Autor Nachricht
benearly
Im Profil kannst Du frei den Rang ändern


Verfasst am:
09. Okt 2009, 12:01
Rufname:

Letzte beschriebene Zeile finden trotz Leerzellen - Letzte beschriebene Zeile finden trotz Leerzellen

Nach oben
       Version: Office 2003

Hallo zusammen!

Ich weiß,d ass ich mir mit Range("C65536").End(xlUp).Row die letzte benutzte Zeile ausgeben alssen kann. Nur habe ich das Problem, dass von Zeile 1 bis 12 Leerzellen vorhanden sind. Hat jemand eine Idee den Bereich der Suche für die letzte beschriebene Zeile erst ab Zeile 13 beginnen zu lassen?

Danke schonmal für die Antworten!!!
Gast



Verfasst am:
09. Okt 2009, 12:09
Rufname:


AW: Letzte beschriebene Zeile finden trotz Leerzellen - AW: Letzte beschriebene Zeile finden trotz Leerzellen

Nach oben
       Version: Office 2003

vielleicht so:

Range("c12:C65536").End(xlUp).Row
Gast



Verfasst am:
09. Okt 2009, 12:27
Rufname:

AW: Letzte beschriebene Zeile finden trotz Leerzellen - AW: Letzte beschriebene Zeile finden trotz Leerzellen

Nach oben
       Version: Office 2003

Hi,
ich würde es so schreiben, ist dann versionsunabhängig Exclamation

Code:
Range(Cells(12, 3), Cells(Rows.Count, 3)).End(xlUp).Row
benearly
Im Profil kannst Du frei den Rang ändern


Verfasst am:
09. Okt 2009, 13:01
Rufname:

AW: Letzte beschriebene Zeile finden trotz Leerzellen - AW: Letzte beschriebene Zeile finden trotz Leerzellen

Nach oben
       Version: Office 2003

Leider geben mir beide Ansätze den wert 1 zurück und nciht wie gehofft die letzte Zeile. Vielleicht ist es interessant zu wissen, dass gleich die erste Zeile nicht beschrieben ist. Gibt es noch weitere Ideen?
MsgBox
VB(A)-Liebhaber


Verfasst am:
09. Okt 2009, 13:06
Rufname: Jens
Wohnort: Siegburg


AW: Letzte beschriebene Zeile finden trotz Leerzellen - AW: Letzte beschriebene Zeile finden trotz Leerzellen

Nach oben
       Version: Office 2003

Moin,

das mit 1 glaube ich nicht, wenn in der Spalte C Inhalte vorhanden sind. Wahrscheinlich hattest Du einfach nur das falsche Tabellenblatt aktiv. Gut ist da das direkte Adressieren, um sowas zu verhindern.

Bei Range("C65536").End(xlUp).Row ist es übrigens eigentlich relativ schnurzi, ob zwischendrin leere Zellen vorhanden sind. Sollte da ein Wert kleiner als 13 rausspringen, kannst Du darauf ja prüfen.

Sollten ab Zeile 13 keine Leerzellen mehr folgen wäre auch sowas wie Range("C13").End(xlDown).Row möglich.

Gruß

Jens

_________________
Bunte Libellen beißen nicht.
Vista / 7, Office XP / 2010, Lotus Notes 8.5.1
benearly
Im Profil kannst Du frei den Rang ändern


Verfasst am:
09. Okt 2009, 13:39
Rufname:

AW: Letzte beschriebene Zeile finden trotz Leerzellen - AW: Letzte beschriebene Zeile finden trotz Leerzellen

Nach oben
       Version: Office 2003

Hallo,
danke für die vielen Tipps, aber leider tuts immer noch nicht Sad

Ich habe das richtige Blatt adressiert. War mir zwar nicht sicher, aber habs nochmals überprüft.
Bei Range("C13").End(xlDown).Row gibt er mir als Zeile 65536 aus, obwohl die letzte beschriebene die Zeile 172 ist. Leerzellen nach C13 kommen auch nicht mehr.
In Zeile 65536 steht auch nichts.

Bei Range("C65536").End(xlUp).Row gibt er mir als Zeile 1 aus.
Ich in anderen Spalten funktioniert es leider nicht.

Selbst wenn ich in Zeile 1 etwas eintrage, wird diese mir immernoch ausgegeben.

Zwischen Zeile 10 und 172 befindet sich eine PivotTabelle. Ist das vielleicht der Grund, denn wenn ich dies auf einem anderen Tabellenblatt ohne PT mache, wird mir der richtige Wert ausgegeben?
Gast



Verfasst am:
09. Okt 2009, 14:47
Rufname:

AW: Letzte beschriebene Zeile finden trotz Leerzellen - AW: Letzte beschriebene Zeile finden trotz Leerzellen

Nach oben
       Version: Office 2003

Hi,

dafür gibt es nur eine Erklärung Exclamation

alle zellen sind leer (was ja wohl nicht ist), bzw alle zellen sind nicht leer z.B leerzeichen oder sonstige nicht druckbare zeichen.

Gruß
Peter
Kettenraucher (hust)
Im Profil kannst Du frei den Rang ändern


Verfasst am:
09. Okt 2009, 23:32
Rufname:

AW: Letzte beschriebene Zeile finden trotz Leerzellen - AW: Letzte beschriebene Zeile finden trotz Leerzellen

Nach oben
       Version: Office 2003

Hallo,

Zitat:
Ich habe das richtige Blatt adressiert.
Wie hast Du adressiert? Bisschen mehr Code oder Mappe hochladen könnte Licht ins Dunkel bringen.

Gruß
KR
Phelan XLPH
Fortgeschritten


Verfasst am:
10. Okt 2009, 11:19
Rufname: Phelan

AW: Letzte beschriebene Zeile finden trotz Leerzellen - AW: Letzte beschriebene Zeile finden trotz Leerzellen

Nach oben
       Version: Office 2003

Trick 17:

Code:
Sub x()
Dim lngLetzteZeile As Long
On Error Resume Next
lngLetzteZeile = Range("A:A").Find("*", , xlValues, xlWhole, , xlPrevious).Row
On Error GoTo 0
If lngLetzteZeile <= 12 Then lngLetzteZeile = 12
MsgBox lngLetzteZeile
End Sub

_________________
Was vorstellbar ist, ist auch machbar. - Albert Einstein
benearly
Im Profil kannst Du frei den Rang ändern


Verfasst am:
10. Okt 2009, 13:14
Rufname:


AW: Letzte beschriebene Zeile finden trotz Leerzellen - AW: Letzte beschriebene Zeile finden trotz Leerzellen

Nach oben
       Version: Office 2003

Hallo zusammen,

ich habe das Problem gelöst bekommen, indem ich UsedRange.Rows.Count genutzt habe. Aber ich muss doch zugeben, dass ich das Blatt nicht richtig adressiert hatte, da ich es mit Sheet(2) angesprochen habe, mir aber nicht bewusst war, dass ich bei einer PivotTabelle versteckte Blätter habe, welche im Hintergrund arbeiten. An der Stelle meines Codes hat das direkte adressieren aber noch nicht geklappt, da ich den falschen Namen benutzt habe. Das Blatt wird nämlich erst später umbenannt. Vielen Dank für die vielen Hilfreichen Tipps!!! Ich muss sagen, das Forum ist echt klasse!
Neues Thema eröffnen   Neue Antwort erstellen Alle Zeiten sind
GMT + 1 Stunde

Diese Seite Freunden empfehlen

Seite 1 von 1
Gehe zu:  
Du kannst Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.
Du kannst Dateien in diesem Forum nicht posten
Du kannst Dateien in diesem Forum herunterladen

Verwandte Themen
Forum / Themen   Antworten   Autor   Aufrufe   Letzter Beitrag 
Keine neuen Beiträge Excel Formeln: Duplikat + Original finden und markieren 4 Dennis41085 1536 09. Nov 2005, 09:08
Dennis41085 Duplikat + Original finden und markieren
Keine neuen Beiträge Excel Formeln: Zahlen in einer Zeile auswerten nach den Größtwerten 11 Nicole-Fun 908 26. Okt 2005, 09:44
ransi Zahlen in einer Zeile auswerten nach den Größtwerten
Keine neuen Beiträge Excel Formeln: Frage zu Spalte ==> Zeile 2 Sven 15 519 23. Sep 2005, 11:03
Sven 15 Frage zu Spalte ==> Zeile
Keine neuen Beiträge Excel Formeln: bedingte Formatierung ganze Zeile enfärben 2 skyblue 2516 06. Sep 2005, 12:41
skyblue bedingte Formatierung ganze Zeile enfärben
Keine neuen Beiträge Excel Formeln: [Excel 2003] Wenn zeile D8-D38 1 dann wert +1 1 quicksilver 728 22. Aug 2005, 11:15
KingPing [Excel 2003] Wenn zeile D8-D38 1 dann wert +1
Keine neuen Beiträge Excel Formeln: Suchen und übereinstimmung in neue Zeile 2 Sternenhimmel75 821 03. Aug 2005, 08:27
Sternenhimmel75 Suchen und übereinstimmung in neue Zeile
Keine neuen Beiträge Excel Formeln: Formel finden! 2 ekon 692 22. Jul 2005, 15:48
Sabine23 Formel finden!
Keine neuen Beiträge Excel Formeln: Formatierung einer Zeile wenn das Wort CL vorkommt 13 Kemal76 2055 22. Jul 2005, 14:55
Kemal76 Formatierung einer Zeile wenn das Wort CL vorkommt
Keine neuen Beiträge Excel Formeln: zuletzt befüllte Zeile anzeigen 1 michi1234 949 29. März 2005, 13:54
fridgenep zuletzt befüllte Zeile anzeigen
Keine neuen Beiträge Excel Formeln: Formel für Zusammenzählen jeder zweiten Zelle einer Zeile 2 toto_225 814 11. März 2005, 12:04
toto_225 Formel für Zusammenzählen jeder zweiten Zelle einer Zeile
Keine neuen Beiträge Excel Formeln: Summe mit automat. Hochzählen der Zeile 7 Excellehrling_Tom 1544 09. März 2005, 15:40
Excellehrling_Tom Summe mit automat. Hochzählen der Zeile
Keine neuen Beiträge Excel Formeln: Erste und Letzte Zelle einer Zahlenreihe ermitteln 3 steve1da 1124 16. Feb 2005, 12:41
rainberg Erste und Letzte Zelle einer Zahlenreihe ermitteln
 

----> Diese Seite Freunden empfehlen <------ Impressum - Besuchen Sie auch: HTML CSS