Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1024to1028
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
Letzten Zeilenwert
18.11.2008 22:31:00
Andre´
Hallo alle zusammen,
wie kann ich den letzten Zeilenwert der 2.Zeile in einer MSGBox angeben also: 11.11.2008
(dazwischen sind leere Zellen)
Tabelle1

 ABCDEFG
1wee  dfgh   
2trtrt  recht  11.11.2008
3Uhuu  Prod  18:24:03


Excel Tabellen im Web darstellen >> Excel Jeanie HTML 4
Ich hoffe mir kann jemand helfen
Vielen Dank im Voraus!
MFG Andre

9
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Letzten Zeilenwert
18.11.2008 22:37:09
Hajo_Zi
Hallo Andre,
Dim LoLetzte As Integer
' unabhängig von Excelversion
LoLetzte = IIf(IsEmpty(Cells(2, Columns.Count)), Cells(2, Columns.Count).End(xlToLeft).Column, Columns.Count)
Msgbox Cells(2,Loletze)

AW: Letzten Zeilenwert
18.11.2008 22:42:00
Andre´
Hallo Hajo,
vielen Dank für die schnelle Antwort, funktioniert prima :-))
MFG Andre
AW: Letzte Zeile - kleine Korrektur
19.11.2008 01:00:00
Erich
Hallo André und Hajo,
damit das auch bei Zeilennummern über 32.767 klappt:
Dim LoLetzte As Long ' nicht: Integer (heißt ja auch LoLetzte)
Grüße von Erich aus Kamp-Lintfort
AW: Letzte Zeile - kleine Korrektur
19.11.2008 08:46:55
Hajo_Zi
Hallo Erich,
in Vesion 2003 gibt es nur 26 Spalten da reicht integer und selbst in 2007 sind es nur paar über 16 tausend, da reich auch integer.
Gruß Hajo
Anzeige
AW: Sorry! Wer lesen kann, ...
19.11.2008 09:49:00
Erich
Hi Hajo,
... ist klar im Vorteil!
Ich hatte übersehen, dass es um Columns und nicht um Rows geht - entschuldige bitte.
("damit das auch bei Zeilennummern über 32.767 klappt")
Hier reicht Integer natürlich aus. Zu empfehlen ist Long aber wohl auch für Spalten:
Nepumuks "Wort zum Sonntag" hier im Forum
Rückmeldung wäre nett! - Grüße von Erich aus Kamp-Lintfort
AW: Letzten Zeilenwert
18.11.2008 22:43:00
matthias
Hallo
probier mal:
Sub Andre() MsgBox Cells(2, Columns.Count).End(xlToLeft).Value End Sub


Gruß Matthias

Anzeige
AW: Letzten Zeilenwert
18.11.2008 22:45:23
Hajo_Zi
Hallo Mathias,
das hat nur den Nachteil falls die letzte Spalte belegt, wird der falsche Wert zurück gegeben.
Gruß Hajo
ja Danke, (an die Letzte denke ich zu selten) oT
18.11.2008 22:56:46
matthias
AW: ja Danke, (an die Letzte denke ich zu selten) oT
18.11.2008 23:22:00
Reinhard
Hallo Matthias,
an die Letzte nicht zu denken ist für deine Psyche sehr gut, für ihre vielleicht nicht, Problem sind deine dauernden Gedanken an die Vorletzte, das schlaucht :-)
UUps, Thema verwechselt *glaub*
Was ich nicht verstehe, MS muß doch wissen daß ExcelVbaler bei Xlup u.ä immer zwei Fehlerquellen abfangen müssen, entweder ist die Spalte völlig leer,oder die unterste Zelle ist belegt, in beiden Fällen bekommt man ein falsches Ergebnis.
Ich finde die hätten da schon längst sowas wie
FindfirstfreeCell(Spalte)
basteln können, mit Hinweis wenn die unterste Zelle nicht leer ist.
Gruß
Reinhard
Anzeige

308 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige