Wie kann ich die letzte Zelle einer Tabelle bestimmen, also die, die man mit Ctrl+End erreicht?
Danke und Gruss, Lib
sCalc - letzte Zelle bestimmen
Moderator: Moderatoren
Hallo Stefan,
Du bist wunderbar!
Wo findest Du denn all die Wunderdinge?
Was ich festgestellt habe:
es wird jeweils die vorletzte Spalte+Zeile angegeben, Bsp:
letzte Zelle ist E4
das Sub gibt aus:
Zeile 3, Spalte 4
Funktion ZELLE findet:
Zeile 4, Spalte 5
wobei das kein Problem ist, wenn man's weiss
interessant wäre höchstens zu wissen, ob die Verschiebung von
GotoEndOfUsedArea(True)
bewirkt wird oder von
getRangeAddress.EndRow
Viele Grüsse und herzlichen Dank,
Lib
Du bist wunderbar!
Wo findest Du denn all die Wunderdinge?
Code: Alles auswählen
sub Letzte_Zelle
Doc = StarDesktop.CurrentComponent
oSheet = Doc.Sheets(0)
oCellCursor = oSheet.createCursor()
oCellCursor.GotoEndOfUsedArea(True)
letzte_Zeile = oCellCursor.getRangeAddress.EndRow
letzte_Spalte = oCellCursor.getRangeAddress.EndColumn
msgbox "Zeile: " & letzte_Zeile & CHR(13) & "Spalte: " & letzte_Spalte ,, "Letzte nicht leere Zelle ..."
end sub
es wird jeweils die vorletzte Spalte+Zeile angegeben, Bsp:
letzte Zelle ist E4
das Sub gibt aus:
Zeile 3, Spalte 4
Funktion ZELLE findet:
Zeile 4, Spalte 5
wobei das kein Problem ist, wenn man's weiss
interessant wäre höchstens zu wissen, ob die Verschiebung von
GotoEndOfUsedArea(True)
bewirkt wird oder von
getRangeAddress.EndRow
Viele Grüsse und herzlichen Dank,
Lib