Discussion :

[niclalex]

Bonjour a tous,
J'utilise un formulaire pour enregistrer des données dans un fichier excel et notamment des dates via des contrôles dtpicker.

Ces données sont stockées dans un classeur fermé situé sur un serveur de partage.

(connexion à la feuille de données par ADODB=> pas de pb jusque là)

Mon problème est le suivant :
Je souhaite afficher dans mon formulaire les données d'un enregistrement précis.
j'ai donc un recordset qui contient les données (jusque là ça va aussi)

par contre je n'arrive pas à afficher les données de date dans mes dtpickers du formulaire (message une erreur est survenue loirs de l'appel au controle Windows Date and Time Picker)
J'ai pourtant, afin d'etre dur de passer une date converti les données contenues dans mon recordset :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
Set rst = New ADODB.Recordset
rst.Open texteSQL, Cn, adOpenStatic
txt_sge.Value = rst.Fields("sge")
DT_pose_prevue = DateSerial(Year(rst.Fields(3)), Month(rst.Fields(3)), Day(rst.Fields(3)))
DT_retour_engagement.Value = DateDt(rst.Fields(4))
DT_pose_realisee.Value = DateDt(rst.Fields(5))
DT_depose_prevue.Value = DateDt(rst.Fields(6))
DT_relance.Value = DateDt(rst.Fields(7))
DT_depose_realisee.Value = DateDt(rst.Fields(8))

dans la fenetre exécution rst.fields(3) contient bien une date

Bref si quelqu’un à des sugestions.
je vous remercie

Christophe

[Daniel.C]

dans la fenetre exécution rst.fields(3) contient bien une date

qu'est-ce que retourne Year(rst.fields(3)) ?

[niclalex]

Bonjour daniel,
Year(rst.fields(3)) retourne 2012.

Cdt

[niclalex]

J'ai trouvé.
En fait le pb venait du fait que les contrôles n'étaient pas visibles dans le formulaire (j'utilise le même formulaire pour plusieurs fonctions).

Donc en affichant les controles dtpickers je peux passer dedans les valeurs issues de mon rst.