OpenOffice.info

sondern das datum angeführt von einem hochstrich, also so:
'24.04.2009
wie kann ich meinem makro nahebringen, diesen hochstrich wegzulassen?

Hallo Karo,

Der Frager schrieb:
[code]sondern das datum angeführt von einem hochstrich, also so:
'24.04.2009
wie kann ich meinem makro nahebringen, diesen hochstrich wegzulassen?[/code]
also bin ich davon ausgegangen das er das Format wünscht. Was natürlich nicht wirklich explixit ist :D

Und wenn man ein bestimmtes Format haben will ist es egal ob man Formulalocal oder Value nimmt (nur String geht nicht). Man muß das Format selber festlegen, sonst kommt das Standardformat.

mfg
Michael

Hallo Michael
[quote="ykcim"]Es ist egal ob Du

ThisComponent.Sheets(0).getCellByPosition(6, 22).value=DATE
oder
ThisComponent.Sheets(0).getCellByPosition(6, 22).formulalocal = DATE

nimmst. Um dann das gewünschte Format (tt.mm.jjjj) zu erhalten muss man in beiden Fällen Numberformat setzten.[/quote]

Ich sehe nirgends das explizit das Format "tt.mm.jjjj" gewünscht ist? - mit ...formulalocal erfolgt automatisch eine Ausgabe im Standarddatumsformat (hier: tt.mm.jj) - mit ...value muss das Format extra gesetzt werden (falls keine Ganzzahlausgabe gewünscht wird)

Gruß Karo

Es ist egal ob Du

ThisComponent.Sheets(0).getCellByPosition(6, 22).value=DATE
oder
ThisComponent.Sheets(0).getCellByPosition(6, 22).formulalocal = DATE

nimmst. Um dann das gewünschte Format (tt.mm.jjjj) zu erhalten muss man in beiden Fällen Numberformat setzten.

mfg
Michael

sub datum_setzen
ThisComponent.Sheets(0).getCellByPosition(6, 22).formulalocal = DATE
end sub

Hallo
Warum nicht:
[code]sub datum_setzen
ThisComponent.Sheets(0).getCellByPosition(6, 22).formulalocal = DATE
end sub[/code]
?
Gruß Karo

Sub aktuelles_datum

ThisComponent.Sheets(0).getCellByPosition(6, 22).value = DATE
ThisComponent.Sheets(0).getCellByPosition(6, 22).Numberformat=36

End Sub

Hallo,

Du schreibst den Wert als String in die Zelle, daher auch das Hochkomma.
Um den Wert als Datum reinzuschreiben mußt Du ihn als Value reinschreiben und das Zellenformat auf Datum stellen.

[code]
Sub aktuelles_datum

ThisComponent.Sheets(0).getCellByPosition(6, 22).value = DATE
ThisComponent.Sheets(0).getCellByPosition(6, 22).Numberformat=36

End Sub
[/code]

36 ist der Code für "TT.MM.JJJJ" andere Codes muß man einstellen und auslesen.


mfg
Michael


Korregierte Fassung :-) Statt string -> value

Sub aktuelles_datum

ThisComponent.Sheets(0).getCellByPosition(6, 22).string = DATE

End Sub

hallo, ich habe vor einiger zeit ein makro erstellt, das mir erlaubt, auf druck eines buttons das aktuelle datum in eine zelle eines calc dokuments einzufügen.
[code]Sub aktuelles_datum

ThisComponent.Sheets(0).getCellByPosition(6, 22).string = DATE

End Sub[/code]

nun wollte ich aneiner anderen stelle im dokument per "ARBEITSTAG" funktion einen bezug zu diesem datum stellen, was nicht funktionierte. wenn ich die datumszelle anklicke wird in der eingabezeile auch nicht das korrekte datumsformat angezeigt, sondern das datum angeführt von einem hochstrich, also so:
[b]'[/b]24.04.2009
wie kann ich meinem makro nahebringen, diesen hochstrich wegzulassen? dann funktionierts nähmlich auch....