Hallo Liste,
ich würde gern in einem Base-Formular ein Datumsfeldmit dem aktuellen
Datum füllen und nutze dazu folgenden Code:
Sub Datum_schreiben()
Dim oCtrl as Object
Dim oDoc as Object
Dim oForm as Object
oDoc = StarDesktop.CurrentComponent
oForm = oDoc.Drawpage.Forms("frm_Eingabe")
oCtrl = oForm.GetByName("txt_Datum_aktuell")
oCtrl.BoundField.updateDate(CdateToIso(Date))
end Sub
Leider bekomme ich eine sehr allgemeine Fehlermeldung:
"Basic-Laufzeitfehler: Objektvariable nicht belegt".
Kann mir jemand weiter helfen?
Vielen Dank.
--
signatur *Ulrich Kleinknecht*
Waldstr. 9
65529 Waldems
T: 06087 758
F: 06087 919877
[email protected]
--
Informationen zum Abmelden: E-Mail an [email protected]
Probleme?
http://de.libreoffice.org/hilfe-kontakt/mailing-listen/abmeldung-liste/
Tipps zu Listenmails: http://wiki.documentfoundation.org/Netiquette/de
Listenarchiv: http://listarchives.libreoffice.org/de/users/
Alle E-Mails an diese Liste werden unlöschbar öffentlich archiviert
