Úprava buňky

(Rozdíly mezi verzemi)

Verze z 12. 2. 2009, 06:55

Vloží do buňky číslo nebo řetězec.

deklarace proměnných

Dim oSheet
Dim i

načtení listu do proměnné

oSheet = thisComponent.Sheets(0)

naplnění buněk A1 až A3 hodnotami 1, 2, 3

for i = 1 to 3
   oSheet.getCellRangeByName("$A$"+Val(i)).Value = i
next i

zvýšení hodnoty buňky A4 o jednu

oSheet.getCellRangeByName("$A$4").Value = oSheet.getCellRangeByName("$A$4").Value + 1

vloží řetězec do buňky B1

oSheet.getCellRangeByName("$B$1").Value = "abc"

Vloží do buňky řetězec.

V obou případech bude vložen text

oSheet.getCellRangeByName("$B$2").String = "123"
oSheet.getCellRangeByName("$B$3").String = "efg"

Vloží do buňky vzorec.

oSheet.getCellRangeByName("$A$5").Formula = "=SUM($A$1:$A$4)"

@@ Řádka 1: / Řádka 1: @@
 == .Value ==
+Vloží do buňky číslo nebo řetězec.
 deklarace proměnných
@@ Řádka 10: / Řádka 12: @@
   oSheet = thisComponent.Sheets(0)
-naplnění polí A1 až A3 hodnotami 1, 2, 3
+naplnění buněk A1 až A3 hodnotami 1, 2, 3
   for i = 1 to 3
@@ Řádka 16: / Řádka 18: @@
   next i
-zvýšení hodnoty pole A4 o jednu
+zvýšení hodnoty buňky A4 o jednu
   oSheet.getCellRangeByName("$A$4").Value = oSheet.getCellRangeByName("$A$4").Value + 1
+vloží řetězec do buňky B1
+ oSheet.getCellRangeByName("$B$1").Value = "abc"
+== .String ==
+Vloží do buňky řetězec.
+V obou případech bude vložen text
+ oSheet.getCellRangeByName("$B$2").String = "123"
+ oSheet.getCellRangeByName("$B$3").String = "efg"
+== .Formula ==
+Vloží do buňky vzorec.
+ oSheet.getCellRangeByName("$A$5").Formula = "=SUM($A$1:$A$4)"
 [[Kategorie:Programování]]