Zellbereich ermitteln

Antwort erstellen


BBCode ist eingeschaltet
[img] ist ausgeschaltet
[url] ist eingeschaltet
Smileys sind ausgeschaltet

Die letzten Beiträge des Themas
   

Ansicht erweitern Die letzten Beiträge des Themas: Zellbereich ermitteln

von Wolfgang Lampert » Do, 03.06.2004 15:16

Habe doch noch Lösung geschafft; funktioniert - sollte es jedoch noch sinnvollere Lösungen geben, bitte Info
sub Bereich_identifizieren
Dim oDoc as Object, oSheet as Object 'Identifizierung Spreadsheet + Tabelle
dim oBereich as object 'Identifizierung des aktivierten Zellbereiches
oDoc = StarDesktop.CurrentComponent
oBereich = oDoc.getCurrentSelection().getRangeAddress() 'aktive Cursorposition identifizieren
msgbox "Spalte AB: " +oBereich.StartColumn 'TestAusgabe
msgbox "Spalte BIS: " +oBereich.EndColumn
msgbox "Zeile AB: " + oBereich.StartRow
msgbox "Zeile BIS: " + oBereich.EndRow
end sub
gruss Wolf

Zellbereich ermitteln

von Wolfgang Lampert » Do, 03.06.2004 12:16

Hi,
ich möchte einen Zellbereich markieren und diesen dann per Makro bearbeiten.
Leider schaffe ich nicht, die Informationen
.StartColumn
.StartRow
.EndColumn
.EndRow
zu ermitteln.
mfg
Wolf

Nach oben