Calc/excel delo s tabelo

Pozdrav..

Sam sem začel malo bolj podrobno spoznavat okolje calc-a oziroma excel-a.. (načeloma mora biti v calc-u) Sem začetnik zato bi rabil vašo pomoč.. Trenutno sem na tem problemu.. ;)

Zadeve morem rešit preko makrojev (basic -> programiranje)

Imam tabelo, kjer so celice naključno polne. Torej lahko imamo neko zaporedje cifer v stolpcu vmes pa je kakšna fraj. V celicah se lahko nahaja bilo katera vsebina (številke, text, formule itd)

Kako bi jaz sedaj šel povrsti in shranjeval vrednosti celic.. (jaz jih morem shranit v nek *.xml; ampak za začetek bi rad spoznal postopek kako zajeti podatke). Potrebujem neko zanko, ki bo šla v A1 pa vse do zadnje zapolnjene celice (kako dobiti 'row index' zadnje polne celice - vmes so lahko fraj, ne.. da bi lahko nek števec šel od 1 do naprimer vrstice 20), pa se potem prestavila v B1..

Sam se s tem nisem ukvarjal kaj dosti, z nekimi osnovami sem se seznanil pred letami, upam, da tistemu, ki zna ne bo težko pomagat pa odgovorit tudi če kaka 'neumesna' prileti.. ;)

Hvala za pomoč!

Lp.

getSheets().getByIndex( sheetNum).getCellByPosition(i,startLine).string="ss"
getSheets().getByIndex( sheetNum).getCellByPosition(i,startLine).formula="saas"

to je iz enga mojega programa, da dobiš mal občutka

uporabi if stavek, v njem pa ustrezne števce. npr.:

if cells(i,3).value<>"" then
st=st+1
end if

Očitno nimaš veliko znanja o programiranju.

pomotoma sem to dal v neko podobno temo, kjer je bilo podobno vprašanje.

Sub PodatkovVKoloni()
'
  Dim ZadnjaVrstica, ZadnjiStolpec, i, j As Integer
  Dim PodatkoVKoloni As Integer
  ZadnjaVrstica = ActiveCell.SpecialCells(xlCellTypeLastCell).Column
  ZadnjiStolpec = ActiveCell.SpecialCells(xlCellTypeLastCell).Row
  For i = 1 To ZadnjaVrstica
    PodatkoVKoloni = 0
    For j = 1 To ZadnjiStolpec
      If Not IsEmpty(Cells(j, i)) Then
        PodatkoVKoloni = PodatkoVKoloni + 1
      End If
    Next j
    Cells(j + 1, i).Value = PodatkoVKoloni
  Next i
End Sub

Pozdrav..

Imam vprašanje. Ali se da narediti form (na katero mečeš gumbe itd) v CALCu? V EXECLu imaš ob strani prikazano 'drevo' in imaš področje forms.. (pa tam ustvariš novo in se ti prikaže 'dizajner'..) Ko sem šel v basic urejevalnik v CALCu, pa je malo drugače..

Sub TextUtils
 'Print oTextUtilsDlg.getModel().getByName("UpperCButton").State 
If oTextUtilsDlg.getModel().getByName("UpperCButton").State = 1 Then Call UpperC 
ElseIf oTextUtilsDlg.getModel().getByName("LowerCButton").State = 1 Then Call LowerC 
ElseIf oTextUtilsDlg.getModel().getByName("ProperCButton").State = 1 Then Call ProperC End 
If End Sub 

čak OOO calc ima VB kot makro jezik? zakaj pa to?

ne vem, nisem teh form nikoli delov. malo pogooglaj, boš ziher velik našel.