macro et erreur d'exécution

altinea · 19 Janvier 2014

bonjour le forum,
j'ai un souci avec cette macro qui bug sur la ligne en bleu, auriez vous une idée, cela me permettrai d'avancer dans mon fichier

Private Sub ComboBox2_Change()

If ComboBox2.ListIndex > -1 Then
Index = ComboBox2.RowSource = "tableauagent"
strOnglet = ComboBox2.RowSource = Index
If strOnglet = "" Then Exit Sub

rep = MsgBox("Vraiment supprimer l'onglet " & strOnglet & " ?", vbYesNo, "Attention")

If rep = vbYes Then
ThisWorkbook.Sheets(strOnglet).Delete
MettreAJourListIndex
End If

merci pour votre aide

End If
End Sub

Pierrot93 · 19 Janvier 2014

Re : macro et erreur d'exécution

Bonjour,

peut être ceci :

Code:

If ComboBox2.ListIndex > -1 Then strOnglet = ComboBox2.Value

quoique perso suis pas trop pour l'utilisation de "rowsource"...

bonne journée
@+

altinea · 19 Janvier 2014

Re : macro et erreur d'exécution

Bonjour, Pierrot93, merci pour ton intervention cela fonctionne. je vais le remettre dans le fichier d'origine.
merci encore

altinea · 19 Janvier 2014

Re : macro et erreur d'exécution

bonjour, Pierrot93 pourrais je te demander un petit service, te serait'il possible d'essayer d'utiliser mon fichier sur ton micro.

En effet j'ai fait les modifs, par moment ça fonctionne bien et d'autre moment j'ai :

Erreur d'automation, puis j'ai changé d'ordinateur et là il bug sur d'autre paramètres,

si tu pouvais voir et éventuellement m'orienter vers une piste afin de fiabilise le process.

Ce qui bug, est à partir de la feuil5 (base), le bouton en haut à gauche lance l'user, puis dans la textbox création, des fois ça marche d'autre pas, voilà en gros le souci que j'ai
Merci encore pour ton aide

Pierrot93 · 19 Janvier 2014

Re : macro et erreur d'exécution

Re,

plutôt que le code dans l'événement de la "textbox" pourquoi ne pas valoriser la cellule directement lors de l'enregistrement.... perso pas rencontré le problème.... mais pas creusé trop non plus.... préférable un exemple ne représentant que le problème posé... pas toute l'appli....

macro et erreur d'exécution

altinea

XLDnaute Accro

Pierrot93

XLDnaute Barbatruc

altinea

XLDnaute Accro

altinea

XLDnaute Accro

Pièces jointes

Pierrot93

XLDnaute Barbatruc

Discussions similaires