Seite 1 von 1
Textfeld per Button beschreiben
Verfasst: So 15. Jan 2012, 14:55
von debian
Sorry für die einfache Frage, aber ich will jetzt nicht extra ein Tutorial lesen und surf schon ne Weile ....
Wie kann ich das aktuelle Datum in ein bekanntes Datums-Textfeld setzen?
Ich dachte an sowas, kann aber die korrekte Syntax nicht finden:
document.tabelle1.text_datum.value= "Datum: " & date
Danke!
Re: Textfeld per Button beschreiben
Verfasst: So 15. Jan 2012, 22:48
von F3K Total
Hallo,
was genau meinst du mit Textfeld?
- Ein herkömmliches Textfeld? Dann ist wichtig zu wissen ob in Calc, Writer, Draw, Impress, Base:
- txt.png (1.3 KiB) 6603 mal betrachtet
- Die Zelle einer Tabelle in Calc?
- Ein Textkontrollfeld auf einem Formular (in Calc, Writer, Draw, Impress, Base)?
Gruß R
Re: Textfeld per Button beschreiben
Verfasst: Mo 16. Jan 2012, 16:11
von debian
Ich meine ein Textfeld aus den Steuerelementen mit dem Namen "text_datum".
Und das ganze soll in Calc geschehen.
Re: Textfeld per Button beschreiben
Verfasst: Mo 16. Jan 2012, 16:46
von Frieder
Hallo debian
Das geht nur dann per makro, wenn während das Makro läuft , auch die Tabelle im Vordergrund ist, auf der das Datumsfeld ist.
Hier der Code:
Code: Alles auswählen
oSheet1=ThisComponent.Sheets(0) 'erste Tabelle
oDatefild = ThisComponent.CurrentController.getControl(oSheet1.DrawPage.Forms(0).getByName("text_datum"))
'Ein datum einfügen, falls es ein echtes Textfeld ist
oDatefild.setText("01.02.2012")
'das aktuelle Datum einfügen falls es ein echtes Datumsfeld ist
oDatefild.setDate(CDateToIso(now))
Weitere Informationen erhälst du hier:
http://www.starbasicfaq.de/Formulare.html#Zweig86
Gruß Frieder
Re: Textfeld per Button beschreiben
Verfasst: Mo 16. Jan 2012, 17:42
von F3K Total
Frieder hat geschrieben:Das geht nur dann per makro ...
Hi, dem kann ich nicht ganz zustimmen:
Wenn Du in Zelle A1, die folgende Formal schreibst
und dann dem Textfeld im Entwurfsmodus, Reiter Daten, A1 als verknüpfte Zelle zuordnest, geht es auch.
Dieses Datum ändert sich aber mit einem neuen Aufruf des Dokumentes an einem anderen Tag. Ist wohl nicht, was Du möchtest?
Per Makro hätte ich noch diese Variante, die geht auch, wenn das Blatt nicht im Vordergrund ist.
Code: Alles auswählen
Sub s_set_date
osheet = thiscomponent.sheets.getbyname("Tabelle1")
oform = osheet.drawpage.forms.getbyname("Formular")'Standardname, falls nicht umbenannt
otxtdate = oform.getbyname("text_datum")
otxtdate.Text = "Datum: "& date
End Sub
Viel Erfolg
Gruß R
Re: Textfeld per Button beschreiben
Verfasst: Do 2. Feb 2012, 18:24
von debian
Olalah!
Sehr vielen Dank, das hat mich schon länger geärgert.