Macro qui empeche une autre macro de se lancer Le sujet est résolu

Y compris Power BI, Power Query et toute autre question en lien avec Excel
s
skydiver
Jeune membre
Jeune membre
Messages : 38
Inscrit le : 23 décembre 2015
Version d'Excel : 2010

Message par skydiver » 30 décembre 2015, 11:42

Bonjour,

J'avance dans mon projet, mais j'ai un problème avec une macro qui empêche une autre macro de s'exécuter,
je m'explique : la macro du bouton "aller" qui remplit les textbox avec les information de ma feuille "Clientèle",
ne peux pas s'exécuter totalement car j'ai une autre macro dans textbox4 qui empêche l'écriture de donnée
tant que textbox2 n'est pas remplie, en plus mon bouton "aller à" plus...

j'espère que j'ai été assez clair..

Merci pour vos éclaircissements :)
fichier en PJ
skydiver macro empeche autre macro.xlsm
(35.08 Kio) Téléchargé 17 fois
Avatar du membre
Banzai64
Fanatique d'Excel
Fanatique d'Excel
Messages : 16'690
Appréciations reçues : 5
Inscrit le : 21 novembre 2010
Version d'Excel : 2003 FR (learning 2010 - 2013)

Message par Banzai64 » 30 décembre 2015, 11:57

Bonjour

Détaille les opérations à faire pour arriver au bug

Emploie des noms présents dans le fichier

Je fais ma coupure :dodo:
s
skydiver
Jeune membre
Jeune membre
Messages : 38
Inscrit le : 23 décembre 2015
Version d'Excel : 2010

Message par skydiver » 30 décembre 2015, 12:10

J'ai déjà essayé tout ça mais en vain, c'est pour ça que j'ai simplifié mon fichier.. :(

"Incompatibilité de type" je vais continuer a chercher, je lâche rien

Mais merci en tout cas :)
Avatar du membre
Banzai64
Fanatique d'Excel
Fanatique d'Excel
Messages : 16'690
Appréciations reçues : 5
Inscrit le : 21 novembre 2010
Version d'Excel : 2003 FR (learning 2010 - 2013)

Message par Banzai64 » 30 décembre 2015, 13:33

Bonjour
skydiver a écrit :J'ai déjà essayé tout ça mais en vain
Tu as essayé quoi ?

Tu dis que ton programme plante mais tu ne veux pas dire dans quelles conditions (la suite d'opérations que tu fais)

J'ai pas de boule de cristal alors si tu ne veux pas expliquer je passe à autre chose

A toi de voir
s
skydiver
Jeune membre
Jeune membre
Messages : 38
Inscrit le : 23 décembre 2015
Version d'Excel : 2010

Message par skydiver » 30 décembre 2015, 13:57

Bon, je vais essayer d’être de t'expliquer,

le problème est que la macro :
Private Sub CommandButton5_Click()
With Sheets("Clientèle")
Dim no_ligne As Integer
no_ligne = ComboBox1.ListIndex + 2
TextBox1.Value = Cells(no_ligne, 4).Value
TextBox2.Value = Cells(no_ligne, 5).Value
TextBox3.Value = Cells(no_ligne, 2).Value
TextBox4.Value = Cells(no_ligne, 3).Value
TextBox6.Value = Cells(no_ligne, 7).Value
TextBox5.Value = Cells(no_ligne, 6).Value
ComboBox2.Value = Cells(no_ligne, 1).Value
End With
End Sub

me donne un message d'erreur "imcompatibilité de type"
et je pense que c'est à cause de la macro :
Private Sub TextBox4_Enter()
If TextBox1.Value = "" Then
MsgBox "merci de renseigner le modèle de véhicule"
TextBox1.SetFocus
Exit Sub
End If
End Sub

qui ,elle bloque toute écriture sur Textbox4 tant que Textbox1 n'est pas renseigné.

Donc voila
Avatar du membre
Banzai64
Fanatique d'Excel
Fanatique d'Excel
Messages : 16'690
Appréciations reçues : 5
Inscrit le : 21 novembre 2010
Version d'Excel : 2003 FR (learning 2010 - 2013)

Message par Banzai64 » 30 décembre 2015, 14:29

Bonjour

A voir
skydiver Userform V001.xlsm
(36.89 Kio) Téléchargé 23 fois
s
skydiver
Jeune membre
Jeune membre
Messages : 38
Inscrit le : 23 décembre 2015
Version d'Excel : 2010

Message par skydiver » 30 décembre 2015, 14:37

Merci beaucoup Banzai64 !! c'est nickel :D

Désolé pour le peu d'explication fournies au premier post..

A bientôt et bon courage !
Répondre Sujet précédentSujet suivant
  • Sujets similaires
    Réponses
    Vues
    Dernier message