Programme plante ouverture userform

Florian.gr

XLDnaute Nouveau
Bonjour, voila je développe une application en vba sous excel, c'est un gros travail et jusque la tout allait bien car depuis l'éditeur vb d'excel tout fonctionne ! Sauf que je viens de m'apercevoir que si je lance excel une première fois tous mes userform fonctionne correctement. Mais si je ferme excel en sauvegardant et je le relance cette fois ci la plupart des mes userform font planter excel lorsque je le lance !

Le userform accueil ne plante jamais, par contre les userform ou j'initialise des textbox plantent pour certaines textbox. J'ai donc regarder dans le code d'initialisation et voici un partie du code qui serait apparement à l'origine du plantage :

Code:
'Activation de la feuille 4 (compresseurs)
Sheets("compresseurs").Select
'Remplissage des textbox compresseurs
    'Compresseur 1 kwh
        TextBox_comp1_j1.Value = Range("B33").Value
        TextBox_comp1_j2.Value = Range("B32").Value
        TextBox_comp1_j3.Value = Range("B31").Value
        TextBox_comp1_j4.Value = Range("B30").Value
        TextBox_comp1_j5.Value = Range("B29").Value
        TextBox_comp1_j6.Value = Range("B28").Value
        TextBox_comp1_j7.Value = Range("B27").Value
    'Compresseur 2 kwh
        TextBox_comp2_j1.Value = Range("C33").Value
        TextBox_comp2_j2.Value = Range("C32").Value
        TextBox_comp2_j3.Value = Range("C31").Value
        TextBox_comp2_j4.Value = Range("C30").Value
        TextBox_comp2_j5.Value = Range("C29").Value
        TextBox_comp2_j6.Value = Range("C28").Value
        TextBox_comp2_j7.Value = Range("C27").Value

Le problème c'est que j'ai le même type de code au dessus mais celui que j'ai au dessus fonctionne alors que les deux sont tous les deux justes !

J'ai eu un message d'erreur à un moment qui me disait "L'objet invoqué s'est déconnecté de ses clients".

J'aimerais qu'on m'explique pourquoi le programme ne plante jamais quand je le lance à partir de l'éditeur vb, mais qu'il plante quand je le lance par l'application excel. Et surtout pourquoi au premier lancement rien ne plante ! =/

Les textbox sont initialisés avec des nombres à 9 chiffres maximum. Option explicit est deja activé et le compilateur vba ne me fait aucune erreur.

Ou bien auriez vous une solution pour que je sache exactement ce qui fais planter excel ? Car vu que cela ne plante pas dans l'éditeur vb du coup je ne peux pas débugguer et en plus excel plante =/

Merci d'avance pour votre aide :confused:
 

Florian.gr

XLDnaute Nouveau
Re : Programme plante ouverture userform

Voila, apparement ça ne se produit pas sur tous les pc, mais sur mon seven c'est à coup sur.

Donc tu lances le fichier tu cliques sur ronde quotidienne puis commencer la ronde. Si ça ne plante pas fermes le fichier en enregistrant et refait la même manip, ça devrait te planter.

Merci d'avance,

ps : quelqu'un peut-il m'expliquer ce qui se produit de different lorque l'on lance par l'éditeur vb et lorsque l'on lance par l apllication ? :)
 

Pièces jointes

  • essai.xlsm
    210.5 KB · Affichages: 110
  • essai.xlsm
    210.5 KB · Affichages: 117
  • essai.xlsm
    210.5 KB · Affichages: 119

Florian.gr

XLDnaute Nouveau
Re : Programme plante ouverture userform

Bonjour,

Merci de vous y intéresser =)

Malheureusement chez moi excel plante toujours au deuxième essai.
Avez vous essayer de lancer l'application, de démarrer la ronde quotidienne puis de fermer l'userform, puis enregistrer excel le fermer et refaire la même manipulation ?
 

Florian.gr

XLDnaute Nouveau
Re : Programme plante ouverture userform

Bon rigolons un peu ensemble, j'ai réussi à préciser d'ou vient l'une des erreurs voici le code qui mène à toute cette misère :

Code:
'Remplissage des textbox compresseurs
    'Compresseur Atlas copco NF kwh
        TextBox_atlas_nf_j1.Value = 1
        TextBox_atlas_nf_j2.Value = 2
        TextBox_atlas_nf_j3.Value = 3
        TextBox_atlas_nf_j4.Value = 4
        TextBox_atlas_nf_j5.Value = 5
        TextBox_atlas_nf_j6.Value = 6
        TextBox_atlas_nf_j7.Value = 7
    'Compteur sortie NF en Nm3/h
        TextBox_cpt_sortie_nf_j1.Value = 8
        TextBox_cpt_sortie_nf_j2.Value = 9
        TextBox_cpt_sortie_nf_j3.Value = 10
        TextBox_cpt_sortie_nf_j4.Value = 11
        TextBox_cpt_sortie_nf_j5.Value = 12
        TextBox_cpt_sortie_nf_j6.Value = 13
        TextBox_cpt_sortie_nf_j7.Value = 14

Les textbox sont existantes. Là je commence sérieusement à me dire que ça viens d'excel qui bug.
 

Florian.gr

XLDnaute Nouveau
Re : Programme plante ouverture userform

Bonjour, merci de continuer de chercher ^^

J'ai modifié et cela ne vient pas de ça ;)
Le même plantage se produit sur tous mes userforms et sur des textbox aléatoirment.
En mettant le code de l'initialisation textbox qui font planter le programme, celui-ci ne plante plus. Mais je vois pas ce qui ne va pas =/ j'ai l'impression que les codes d'initialisation des textbox qui plantes sont les dernieres textbox que j'ai modifié ou crée. Bizarre =/
 

Florian.gr

XLDnaute Nouveau
Re : Programme plante ouverture userform

Bon bah le problème est résolu en passant le type du fichier en .xls à la place de .xlsm, cependant la sauvegarde du fichier est plus longue car le mode de compatibilité est activé mais au moins ça ne plante plus ! Merci à ceux (peu nombreux) qui ont essayé de m'aider. Je suis toujours preneur d'une autre solution si quelqu'un trouve.
 

Discussions similaires

Statistiques des forums

Discussions
314 450
Messages
2 109 731
Membres
110 553
dernier inscrit
loic55