Comment resoudre l'erreur lors entrée date dans la Frame1

[néné06]

Bonsoir le Forum

Sur l'exemple joint, lorsque j'entre la date dans la TB sur USF , aucun problème,mais si j'entre la date sur la TB de la Frame1, ALORS ERREUR ???

Pourriez vous m'aider !!

Merci d'avance.

 

[JNP]

Re : Comment resoudre l'erreur lors entrée date dans la Frame1

Re 🙂,

Ps JNP, GetSystemMetrics foncitonne plus en 64 bits ?

Euh, il me semble que si, vu que je l'avais modifié dans un autre fichier, mais

Private Declare Function GetSystemMetrics Lib "user32" (ByVal nIndex As Long) As Long

devient en 64 bit pur

Private Declare PtrSafe Function GetSystemMetrics Lib "user32" (ByVal nIndex As LongLong) As LongLong

ou qui devrait être supporté par 2010 32 ou 64

Private Declare PtrSafe Function GetSystemMetrics Lib "user32" (ByVal nIndex As LongPtr) As LongPtr

enfin, pour être "full compatible", l'aide propose un test pour connaître l'environnement (VBA6 ou 7, 32 ou 64)

#if Vba7 then
'  Code is running in the new VBA7 editor
     #if Win64 then
     '  Code is running in 64-bit version of Microsoft Office
     #else
     '  Code is running in 32-bit version of Microsoft Office
     #end if
#else
' Code is running in VBA version 6 or earlier
#end if

Je vous mets donc en pièces jointes 2 fichiers avec une procédure "Test", qui est censé fonctionner pour tous les environnements (juste savoir si il y a une molette sur la souris). J'ai bien sûr assujéti au test d'environnement le dimensionnement d'une variable, car remplir une variable Long avec une valeur LongLong, ça ne le fait pas 😛...
Merci de vos retours, ils fonctionnent avec 2010 64, j'aimerais savoir s'ils fonctionnent avec 2010 32 et antérieures 🙄...
Bonne soirée 😎

 

[néné06]

Re : Comment resoudre l'erreur lors entrée date dans la Frame1

Bonsoir JNP

J'ai lancé les deux test qui affichent la MSG avec OK et valeur 1, sur mon ordi.

Je ne sais pas lorsque je pourrai les tester sur le excel 2000 et 2003.

Je pense que je vais en rester là pour la programmation de cette routine car je n'utilise que très rarement le excel2000.

Merci pour l'aide apportée.

 

[Zon]

Re : Comment resoudre l'erreur lors entrée date dans la Frame1

Salut,

Merci JNP pour les précisions et pour ton test , longlong ça me dit quand je faisais du C , c'est du long mais pour des plateformes en 64 bits,
Je mets la source

http://msdn.microsoft.com/en-us/library/gg251378.aspx

pour les tests Ok

XP Pro SP3 avec XL 2002
XP SP 3 avec XL 2007
WIndows 7 starter(donc 32 bits) avec XL 97
EMulation WMware XP SP3 sous Mac OS avec Office 2010 V32 bits

Par contre ça marche pas sous Win 3.1 avec XL 4.0 ....

A+++

 

[JNP]

Re : Comment resoudre l'erreur lors entrée date dans la Frame1

Re 🙂,

Par contre ça marche pas sous Win 3.1 avec XL 4.0 ....

Merci pour tes tests 🙂.
Par contre, Win 3.1 avec XL4.0....... 😛... Euh............. 😱... Je ne sais que dire, avec des Duracels, une bougie, ou une bonne dynamo, y a pas moyen de trouver quelque chose 😱😱😱 !!!
Non, très sérieusement, je pense que si les tests sont positifs avec d'autres DLL, tous ceux qui utilisent des DLL feraient bien de coder immédiatement sous cette forme, ça leur permettrait d'éviter bien des soucis pour l'avenir 🙄...
Ça mériterait un tutto, mais malheureusement, je ne suis pas du tout un spécialiste des DLL. Si quelqu'un se sent, je ne suis pas contre de faire les tests sous 64, et qu'on puisse préparer une base utile 😀.
Bonne soirée 😎