sCalc - letzte Zelle bestimmen

Programmierung unter AOO/LO (StarBasic, Python, Java, ...)

Moderator: Moderatoren

Lib
******
Beiträge: 606
Registriert: Mi, 06.08.2003 20:18

sCalc - letzte Zelle bestimmen

Beitrag von Lib »

Wie kann ich die letzte Zelle einer Tabelle bestimmen, also die, die man mit Ctrl+End erreicht?
Danke und Gruss, Lib
Lib
******
Beiträge: 606
Registriert: Mi, 06.08.2003 20:18

Beitrag von Lib »

Hallo Stefan,
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
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
Lib
******
Beiträge: 606
Registriert: Mi, 06.08.2003 20:18

Beitrag von Lib »

Anonymous hat geschrieben: Zelle A1 entspricht (0, 0) i.S. Zeile 0 Spalte 0
Jou, ZELLE fängt mit 1/1 an, alles klar.
Danke!
Antworten