OpenOffice.info

Hallo,
eine mögliche Variante:
Sub Main
Dim datum as long
odoc=thiscomponent
otab=odoc.currentcontroller.activesheet
ocur=otab.createcursor
ocur.gotoendofusedarea(false)
n=ocur.rangeaddress.startrow
obereich=otab.getcellrangebyposition(1,1,3,n)
adaten()=obereich.getdataarray
for i=0 to ...

Links sieht man wie die Spalte ausgegeben wird, rechts wie sie aussehen soll.

Nein, die Tabelle wird als xls ausgegeben, da muss ich gar nichts ändern. Mit dem Makro möchte ich das, was ich mit Spalte markieren -> Data -> Text in Spalten -> Auf Spalte klicken -> Spaltentyp: Datum (TMJ) händisch machen kann in einem Schritt erledigen.

Hallo,

ich muss mehrmals am Tag aus einer Datenbank eine Tabelle exportieren, bei der in 2 Spalten (B und D) die Zellinhalte als Dezimalzahl ausgegeben werden obwohl es sich eigentlich um Datumswerte handelt, also z.B. 4072018 anstatt 04.07.2018. Das geht technisch nicht anders. Mit Spalte ...