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

James007

XLDnaute Barbatruc

• 8 Janvier 2011

• #2

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

Bonjour,

Il faut faire quelque peu attention à ton fichier posté, car il plante Excel dès le départ ...
dangereux ... 😡 tu peux désactiver tes macros automatiques ... peut-être ...

A +
🙂

 

Vote positif 0 Vote négatif

néné06

XLDnaute Accro

• 8 Janvier 2011

• #3

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

Bonsoir le Forum, Bonsoir James007

J'ai essayé le premier exemple1 sur mon ordi avec Excel2010, ce programme fonctionne sans planter.
J'ai essayé l' exemple1 sur ordi du bureau avec Excel2003, et là, "PLANTAGE GRAVE DES LE DEPART ??????????".
Je ne comprend pas pourquoi?
J'ai allégé ce programme en exemple1.1 qui tourne à la maison: je n'ai pas essayé au bureau.
Si vous pouvez essayer et m'indiquer s'il est OK, avec risque de plantage de excel ?

Merci pour vos reponses.

 

Vote positif 0 Vote négatif

James007

XLDnaute Barbatruc

• 8 Janvier 2011

• #4

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

néné06 à dit:

Bonsoir le Forum, Bonsoir James007

J'ai essayé le premier exemple1 sur mon ordi avec Excel2010, ce programme fonctionne sans planter.
J'ai essayé l' exemple1 sur ordi du bureau avec Excel2003, et là, "PLANTAGE GRAVE DES LE DEPART ??????????".
Je ne comprend pas pourquoi?
J'ai allégé ce programme en exemple1.1 qui tourne à la maison: je n'ai pas essayé au bureau.
Si vous pouvez essayer et m'indiquer s'il est OK, avec risque de plantage de excel ?

Merci pour vos reponses.

Cliquez pour agrandir...

Re,

Perso ... replantage ...😡😡😡
Je vais m'abstenir ...

A +
🙂

 

Vote positif 0 Vote négatif

néné06

XLDnaute Accro

• 8 Janvier 2011

• #5

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

Merci d'avoir pris de ton temps pour ma question.

J'essayerai Lundi de détecter, au travail, à quel niveau se situe l'erreur.

Je serai curieux de savoir si le plantage ce produit sur beaucoup d'autres ordi et avec quel version Excel?

Cordialement

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 8 Janvier 2011

• #6

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

Bonjour,

pas de plantage chez moi, mais je n'ais pas activé les macros... trop fort pour moi ton code...

bonne soirée
@+

 

Vote positif 0 Vote négatif

James007

XLDnaute Barbatruc

• 9 Janvier 2011

• #7

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

Bonjour néné ...

La curiosité l'emporte ...
Dans ta UserForm4 à l'activation

Private Sub UserForm_Activate()

Columns("H:H").Select

çà plante tout ... !!!

A +
🙂

 

Vote positif 0 Vote négatif

JNP

XLDnaute Barbatruc

• 9 Janvier 2011

• #8

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

Bonjour le fil 🙂,
Pas de plantage sous 2010, mais code inexploitable car bourré de références DLL32 qui ont besoin d'être adaptées pour VBA 64...
Bon courage pour l'adaptation quand le virage 64 bits sera pris 🙄...
Bon dimanche 😎

 

Vote positif 0 Vote négatif

néné06

XLDnaute Accro

• 9 Janvier 2011

• #9

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

Bonjour à tous et merci pour votre attention!!!

J'ai réussi à modifier le code et maintenant plus de plantage grave, à par le problème original de la date dans la frame.

j'adresse la nouvelle mouture ou l'on arrive à constater l'erreur.

Merci à tous pour votre aide précieuse.

 

Vote positif 0 Vote négatif

James007

XLDnaute Barbatruc

• 9 Janvier 2011

• #10

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

Féliciations ... plus de plantage ...

Il ne te manque que l'utilisation d' Option Explicit pour pouvoir compiler et debugger ...
Je regarde ton code ... dès que j'ai un moment ...

A +
🙂

 

Vote positif 0 Vote négatif

Z

Zon

XLDnaute Impliqué

• 9 Janvier 2011

• #11

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

Salut,



Quand tu écris " VBA.UserForms(usf).ActiveControl = CalendrierDateSELECT


ta textbox1 appartient à L'usf alors que FTB1 appartient à FRame1 qui elle même appartient à usf.

donc il faut écrire dans le cas de FTB1 , il faut faire référence à FRame1

VBA.UserForms(usf).Frame1.ActiveControl = CalendrierDateSELECT


Pour gérer tes 2 textbox avec une gestion d'erreur :

On error resume next
VBA.UserForms(usf).ActiveControl = CalendrierDateSELECT
if err<>0 then VBA.UserForms(usf).frame1.ActiveControl = CalendrierDateSELECT


Ps JNP, GetSystemMetrics foncitonne plus en 64 bits ?

A+++

 

Vote positif 0 Vote négatif

néné06

XLDnaute Accro

• 9 Janvier 2011

• #12

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

Merci à tous.

je vais essayer la methode de Zon mais il est bizarre que cet ancien programme plante sur un ordi avec excel 2003 et fonctionne avec 2010.
Bizarre ? J’ai dis bizarre : comme c’est bizarre. (Célèbre réplique)

A+

 

Vote positif 0 Vote négatif

Z

Zon

XLDnaute Impliqué

• 9 Janvier 2011

• #13

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

Re,

Nene c'est normal que ton appli fonctionne pas sous XL 2003 ou inférieur, tu utilises l'objet sortfields par exemple qui est apparu avec XL 2007.

à toi de voir sur quelle version tu vas l'utliser....

A+++

 

Vote positif 0 Vote négatif

néné06

XLDnaute Accro

• 9 Janvier 2011

• #14

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

Bonjour

J’ai résolu le problème, en utilisant l’information de Zon, que je remercie, en rajoutant une petite bidouille.
J’ai placé une variable « dd « dans les sub de fin « valider » de la frame ainsi que « quitter » de la frame et dans USF4 routine « Activate » , je saute cette routine qui se répétée plusieurs fois lors de l’effacement de la frame.
Maintenant, cela à l’air de fonctionner.
Si certain sont intéressés, je fais parvenir le programme rectifié.

Merci à tous

 

Vote positif 0 Vote négatif

néné06

XLDnaute Accro

• 9 Janvier 2011

• #15

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

Bonsoir à tous

Oh désespoir!! :il plante avec excel2000.

Merci pour toute l'aide apportée.

 

Dernière édition: 9 Janvier 2011

Vote positif 0 Vote négatif