[Résolu]Pb de manipulation d’un champs date dans une macro suite

[jafa60]

Bonjour

Suite à ma précédente question la réponse fonctionne correctement si la date est saisie, par contre si la date n’est pas saisie la transformation provoque une erreur. Comment protéger la transformation et me permettre de renvoyer un message.
Ci joint le bout de code

IDcol = oSubForm.getByName(“Saisie”).getByName(“Real”) 'date de réalisation
dt_cal = IDCol.CurrentValue

Test dt_cal avant transformation de la date ?

 dt_real = CDateFromUnoDate(dt_cal)

Merci d’avance

[PYS]

Bonjour @jafa60

Ce qui est attendu est une structure, donc tu peux utiliser :

if  IsUnoStruct(IDCol.CurrentValue) then
	dt_prev = CDateFromUnoDate(dt_cal)
	msgbox "ok"
else	
	msgbox "ko"
end if 

Cordialement

[jafa60]

Bonjour,

Merci beaucoup cela fonctionne.
Cordialement