Frage eines Anfängers zu Zellbereich
Verfasst: Do, 05.07.2012 20:12
Hallo,
nachdem ich mich durchgerungen und wieder nach etlichen Jahren angfangen habe, in die Programmierung einzusteigen,
tauchen prompt einige Fragen auf (ja, ich habe Google und die SuFu genötigt, habe aber nichts gefunden, daß mir als Quasi-Anfänger
weiter helfen konnte).
Nun zu meinem aktuellen Prob:
Dieser Code sollte es nach Michael Dannenhofer (vielen Dank noch für die gute Dokumentation) ermöglichen,
in den angegebenen Koords Hallo Welt zu schreiben.
Es tritt jedoch ein Basic-Laufzeitfehler bei Zeile 5 auf: "Eigenschaft oder Methode nicht gefunden: string."
Gebe ich jedoch ein, funktioniert es.
Habe ich hieraus:
LG
nachdem ich mich durchgerungen und wieder nach etlichen Jahren angfangen habe, in die Programmierung einzusteigen,
tauchen prompt einige Fragen auf (ja, ich habe Google und die SuFu genötigt, habe aber nichts gefunden, daß mir als Quasi-Anfänger
weiter helfen konnte).
Nun zu meinem aktuellen Prob:
Code: Alles auswählen
sub ZellenInTabellen
mydoc = thisComponent
mysheet = mydoc.sheets(0)
mycell = mysheet.getCellRangeByName("A1:B5")
mycell.string = "Hallo Welt"
end subin den angegebenen Koords Hallo Welt zu schreiben.
Es tritt jedoch ein Basic-Laufzeitfehler bei Zeile 5 auf: "Eigenschaft oder Methode nicht gefunden: string."
Gebe ich jedoch
Code: Alles auswählen
mycell = mysheet.getCellRangeByName("$A$1")Habe ich hieraus:
Es wäre toll, wenn man mir auf die Sprünge helfen könnte.Es gibt zwei Wege:
getCellByPosition und getCellRangeByName
Mit getCellByPosition kommt man an die Zelle über die absolute
Positionsangabe, wobei diese über die Spalten- und Zeilenangabe
erfolgt.
myDoc = stardesktop.currentcomponent
mySheet = myDoc.sheets(0)
mycell=mySheet.getCellByPosition(1,1) = B1
Die Zählung fängt dabei bei 0 an A1 ist also 0,0
Mit getCellRangeByName kann man die Zelle direkt mit den Namen
ansprechen oder Bereiche auswählen.
getCellRangeByName("$A$1") ergibt dann die Zelle A1
getCellRangeByName("A1:B5") ergibt dann den Bereich A1:B5
sub ZellenInTabellen
' Dieses Makro in einer geöffnetten Tabelle starten
myDoc = stardesktop.currentcomponent
mySheet = myDoc.sheets(0)
mycell = mysheet.getCellByPosition(0,0)
mycell.string = "Hallo Welt"
mycell = mysheet.getCellRangeByName("$C$1")
mycell.string = "Hallo Welt"
end sub
LG