Translations:Macros/Writer/001/8/fr
With oDateTime ' com.sun.star.util.DateTime
.Minutes = 20 .Hours = 12 .Day = 20 .Month = 12 .Year = 2012 End With With oAnnot ' com.sun.star.text.textfield.Annotation .Author = "Auteur du commentaire" .Content = "Texte du commentaire" .DateTimeValue = oDateTime End With