Autres Procédure de Réinstallation d'Office suite Echec Réparation

cp4

XLDnaute Barbatruc
Bonjour:),

Fouinant dans mon "Stock" de fichiers, j'ai retrouvé un fichier de Thierry datant de 2002.
En lançant l'userform, le code plante sur la ligne
VB:
 Worksheets(1).AutoFilterMode = False
Je doute que Thierry ait pu faire une erreur d'écriture.
Je travaille avec Excel 2007. Est-ce que vous rencontrez la même plantage?
1585071053708.png

Si oui, quelle est l'erreur? Je ne comprends plus rien.
Avec mes remerciements anticipés.
 

Pièces jointes

  • Auto Filter en VBA.xls
    57 KB · Affichages: 20

Staple1600

XLDnaute Barbatruc
Re

Je viens de tester en commentant la ligne.
Cela fonctionne aussi
(en tout cas sur mon PC)
VB:
Private Sub UserForm_Initialize()
 'Worksheets(1).AutoFilterMode = False
 CommandButton1.Visible = False
 ListBox1.AddItem ("Sexe")
 ListBox1.AddItem ("Pays")
 ListBox1.AddItem ("Fonction")
 ListBox1.AddItem ("Secteur")
 Label2.Caption = ""
End Sub
 

cp4

XLDnaute Barbatruc
Re
Le message N° #13 est inquiétant.
Je te suggère :
1) de fermer tous tes classeurs Excel
2) d'aller dans l'explorateur , d'y recenser tous les fichiers d'extension ".exd" et de les supprimer
et
3) de forcer la mise à jour immédiate de toutes les mises à jour Windows et Office non encore faites.
Désolé je viens de voir ce post. J'ai lancé la recherche des fichiers *.exd
Mais pour les mises jour, je suis encore avec win7. Je crois que pour moi, c'est mort:eek::eek:!
Encore merci.
Bonne soirée.;)

Edit: la suppression des fichiers *.exd n'a rien résolu.
 
Dernière édition:

Staple1600

XLDnaute Barbatruc
Re

[HFT subliminal tribute]
Je ne connais personne qui dise ;" Si j'étais mou" sur XLD ;)
Celui que j'évoque, dit quand cela lui prend
"Si j'étais moi..."
Et souvent il ajoute: "Si j'étais moi, bah je méfierais"
[HFT subliminal tribute]
;)

Pour revenir à ta question, tu as fait le test que j'ai fait
(le dernier)
?
 

cp4

XLDnaute Barbatruc
Re

Je viens de tester en commentant la ligne.
Cela fonctionne aussi
(en tout cas sur mon PC)
VB:
Private Sub UserForm_Initialize()
'Worksheets(1).AutoFilterMode = False
CommandButton1.Visible = False
ListBox1.AddItem ("Sexe")
ListBox1.AddItem ("Pays")
ListBox1.AddItem ("Fonction")
ListBox1.AddItem ("Secteur")
Label2.Caption = ""
End Sub
Oui, le formulaire s'affiche. Listbox1 fonctionnelle, mais Listbox2 et 3.
Merci.
 

Staple1600

XLDnaute Barbatruc
Re

Tout fonctionne normalement (sur mon PC)
J'ai suivi ces étapes pour faire mon test.
Pour valider le choix, il faut cliquer sur la Listbox1
Ce qui active la ListBox2, on fait son choix puis on clique
Ce qui active le CommandButton2 sur lequel on clique pour appliquer le filtre et rapatrier le résultat du filtre dans l'userform (dans la ListBox3)
 

cp4

XLDnaute Barbatruc
Re

Tout fonctionne normalement (sur mon PC)
J'ai suivi ces étapes pour faire mon test.
Pour valider le choix, il faut cliquer sur la Listbox1
Ce qui active la ListBox2, on fait son choix puis on clique
Ce qui active le CommandButton2 sur lequel on clique pour appliquer le filtre et rapatrier le résultat du filtre dans l'userform (dans la ListBox3)
Impossible de cliquer dans listbox2 et 3.
choix listbox1 fonctionnel.
Merci.
 

cp4

XLDnaute Barbatruc
Bonjour le fil, cp4

•>cp4
Et si tu tentes l'expérience sur un classeur vierge où tu insères deux ListBox ?
Est-ce que le même phénomène se produit?
Bonsoir Staple1600;), Le Forum:),

Désolé pour mon silence. En fait, j'ai passé la soirée d'hier et aujourd'hui jusqu'à cette heure-ci pour rechercher une solution.
Je suis parvenu à désinstaller toutes les cochonneries d'office qui posaient problèmes, en forçant la désinstallation. J'ai trouvé Ce lien n'existe plus qui concerne office 2007 sous vista, ça a fonctionné chez-moi sous win7 Excel 2007 (Excel 2010 ayant subi un échec de réparation).

A la fin de toutes les étapes, j'ai passé plusieurs fois Ccleaner et après redémarrage l'installation d'office 2010 a réussi. Je suis soulagé et content de retrouver un Excel fonctionnel.

Donc présentement, le fichier que je vous avais demandé de tester fonctionne parfaitement.

Je vous remercie tous pour votre aide.
Bonne soirée.

ps: je vais modifier le titre de cette discussion.
 

Statistiques des forums

Discussions
312 457
Messages
2 088 570
Membres
103 882
dernier inscrit
jregis13