Text und formatiertes Datum einfügen (Verketten)

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: Text und formatiertes Datum einfügen (Verketten)

Re: Text und formatiertes Datum einfügen (Verketten)

von juup » Mi, 15.01.2014 12:06

Erledigt:

Code: Alles auswählen

 Format(now(),"DD.MM.YY")

Text und formatiertes Datum einfügen (Verketten)

von juup » Mi, 15.01.2014 10:39

Hallo zusammen,

ich versuche mich derzeit an meinen ersten Makros und scheitere leider schon bei einer einfachen Verkettung. Ziel ist in eine Zelle einen Text plus das aktuelle Datum zu schreiben, z.B. "Ort, den 15.01.2024".

Mit folgendem Code kann ich das Datum unformatiert mit dem Text anhängen:

Code: Alles auswählen

Sub Main

oDoc   = ThisComponent
oSheets = oDoc.Sheets
oSheet = oSheets.getByName("Tabelle1")
oCell = oSheet.getCellByPosition(0,0)
oCell.setString("Ort, den " & now())
Mit diesem bekomme ich eine Zelle entsprechend formatiert:

Code: Alles auswählen

oCell2 = oSheet.getCellByPosition(1,0)
oCell2.value = now()
oCell2.NumberFormat = 30

End Sub
Wie geht beides ohne extra eine Zelle mit dem Datum zu befüllen?

Vielen Dank
juup

Nach oben