[nl-users] Datefield in macro LibreOffice-Calc

Beste lezers,

Al jaren gebruik ik een LibreOffice Calc blad waarin diverse macro's en 
grafieken zijn opgenomen. De macro's zijn geschreven in LibreOffice Basic.

Met het installeren van Linux-ubuntu 13.10 is daarin tevens de nieuwe 
LibreOffice versie 4.1.2.3 verschenen met het gevolg dat mijn macro's, 
voor zover ik het tot nu toe heb ervaren, vastlopen op één onderdeel 
namelijk een Datefield. (datum)

Zowel met Ubuntu als met Windows werken de macro's moeiteloos met de 
voorgaande LibreOffice versies en ook met OpenOffice maar met de 
nieuwste versie LibreOffice 4.1.2.3. loopt het vast zowel onder Windows 
als met Ubuntu.

Het macrodeel waar het om gaat heb ik apart genomen en hieronder 
weergegeven.

----------------------------------

public datum as date

sub main

DialogLibraries.LoadLibrary( "Standard" )

oDialog1 = CreateUnoDialog(DialogLibraries.Standard.DialogA)

oDateField = oDialog1.GetControl("DateField1")

oDateField.date=clng(CDateToIso(date))'dit zet de huidige datum in het 
DateField

oDialog1.Execute()

datum=oDateField.text

if datum="00:00:00" then '(datum = 00:00:00 als DateField niet is gewijzigd)

datum=date

endif

end sub

----------------------------------


Na openen van het Calc blad kan de macro worden uitgevoerd met:

1.

   Menu / Extra / Macro's / Macro's beheren / LibreOffice Basic

2.

   In het venster "LibreOffice Basic-macro's" klik in het
   linkerschermdeel op het driehoekje links van "huidige datum in
   datefield.ods"

3.

   klik op het driehoekje links van Standard"

4.

   klik op "Modul1"

5.

   klik aan de rechterkant op de knop "Uitvoeren"

Door deze macro verschijnt een dialoogblad, zoals hieronder weergegeven, 
met daarop het Datefield waarin dan de huidige datum verschijnt. Met 
klikken op de omhoog/omlaag pijltjes kan de datum ook worden verzet naar 
eerder of later. De gekozen datum wordt verder in het programma gebruikt.


Dialoogblad "DialogA"




Weet iemand of dit kan worden opgelost?

Met vriendelijke groet,

Willem



--
Unsubscribe instructions: E-mail to users+unsubscribe@nl.libreoffice.org
Posting guidelines + more: http://wiki.documentfoundation.org/Netiquette
List archive: http://listarchives.libreoffice.org/nl/users/
All messages sent to this list will be publicly archived and cannot be deleted