Witam.
Chciałbym ulepszyć troszeczkę makra które używam. Mianowicie mam w dialogu min. pole daty, ale po otwarciu nie ma w niej wpisanej daty. Chciałbym żeby znalazła się tam aktualna data. W załączniku zrobiłem nowy dialog z kodem takim jak w moim makrze. Bardzo proszę o jakieś sugestie.
Artur
Domyślna data w polu daty
Domyślna data w polu daty
- Załączniki
-
- AktualnaData.ods
- (11.87 KiB) Pobrany 303 razy
OpenOffice 4.0.1 Windows 8.1
Re: Domyślna data w polu daty
Sub StartDialog1
DialogLibraries.LoadLibrary( "Standard" )
oDialog1 = CreateUnoDialog( DialogLibraries.Standard.Dialog1)
oDialog1.getModel().getByName("DateField1").Date = CdateToIso(Date())'dopisz ten wiersz
oDialog1.Execute
End Sub
DialogLibraries.LoadLibrary( "Standard" )
oDialog1 = CreateUnoDialog( DialogLibraries.Standard.Dialog1)
oDialog1.getModel().getByName("DateField1").Date = CdateToIso(Date())'dopisz ten wiersz
oDialog1.Execute
End Sub