Discussion :

[youri007]

Bonjour,

Pourquoi ma nouvelle version d'Excel 2007 ne trouve-t-elle plus la fonction Date?

Le code développé sous Excel 2002 fonctionne à merveille, mais la version 2007 ne reconnait plus la fonction Date déclarant que le projet ou la bibliothèque est introuvable. Ce qui par ailleurs est bizarre puisque je les trouve dans l'explorateur d'objet...

Le code se trouve à l'initialisation d'un dialogue et est le suivant:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Private Sub UserForm_Initialize()
 
Dim Echeance As Date
Dim Date_de_Facturation As Date
 
    III_Dlg_DG.Etiquette_Date_Echeance.Visible = True
    Date_de_Facturation = Date + 1
    Echeance = Date_de_Facturation + 30
 
    ' ......    
 
    III_Dlg_DG.DT_Picker_Date_Facturation.Value = Date_de_Facturation
    III_Dlg_DG.DT_Picker_Date_Echéance.Value = Echeance
 
End Sub

Merci d'avance de votre aide

[Bigalo]

Bonjour,

Chez moi cet extrait modifié de ton code (j’ai commentarisé ce qui concerne les contrôles sur le UserForm, et ajouté un MsgBox).

Code :

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

1
2
3
4
5
6
7
8
9
10
11
Private Sub UserForm_Initialize()
Dim Echeance As Date
Dim Date_de_Facturation As Date
    'III_Dlg_DG.Etiquette_Date_Echeance.Visible = True
    Date_de_Facturation = Date + 1
    Echeance = Date_de_Facturation + 30
    ' ......
    'III_Dlg_DG.DT_Picker_Date_Facturation.Value = Date_de_Facturation
    'III_Dlg_DG.DT_Picker_Date_Echéance.Value = Echeance
    MsgBox Date_de_Facturation & vbNewLine & Echeance
End Sub

fonctionne très bien.

Es-tu sûr que le problème est lié à la fonction Date ? Quand l’erreur macro s’affiche et que tu cliques sur "Débogage", qu’est-ce qui est surligné ?

Si tu veux, tu peux mettre en pièce jointe un extrait de ton fichier et je le testerai.

Cordialement,

Michel Gaboly

[Jean-Philippe André]

salut,
je suppute qu'il y a une référence manquante dans ton projet...

[youri007]

Tout d'abord mes excuses pour ce retard à vous donner des nouvelles... J'ai tellement bidouillé mon ordi que j'ai carrément du réinstaller office!

Bref, je vous mets en fichier joint un classeur Excel avec ce problème de date qui m'encombre. En fait, il s'agirait de pouvoir (dans un formulaire MS Forms) afficher un contrôle du type DateTime Picker ( du moins c'est ainsi qu'il se nommait dans les versions précédentes d'Excel).

Le seul contrôle que j'ai pu trouver s'appelle désormais OLK Date Control et me donne l'erreur que vous pouvez voir sur le fichier word également annexé. Il me semble en fait qu'il s'agit d'un contrôle d'Outlook non compatible avec Excel... Mais là je fabule peut-être.

[SilkyRoad]

bonjour

Le contrôle que tu recherches (DateTime Picker) est nommé "Microsoft Date and Time Picker Control, version 6.0" dans la liste des contrôles supplémentaires. Si tu ne le trouves pas, c'est qu'il n'est pas installé sur ta machine.

Le problème n'a rien à voir avec Excel.
L'ocx Windows common control-2 6.0 est distribué avec les packs développeurs et vb6. Tu dois disposer de l'ocx MSCOMCT2.ocx pour utiliser le contrôle.

http://support.microsoft.com/kb/297381/fr


bonne journée
michel

[youri007]

Super!

Un tout grand merci à vous tous. Enfin cela fonctionne normalement. Il me manquait effectivement le contrôle "Microsoft Date and Time Picker Control, version 6.0" .

Il est tout de même étonnant de constater que ce contrôle ait disparu de la version "normale" d'excel!...

Juste un mot pour dire que j'ai du installer ce contrôle supplémentaire manuellement dans de dossier système de windows : C:\WINDOWS\system32

Encore merci à vous tous et à bientôt

[AlainTech]

Problème résolu?

Bouton !