Mon classeur est atteint de la danse de Saint-Guy !

[Magic_Doctor]

Bonsoir à tous,

J'ai un classeur dans lequel il y a un UserForm.
Quand j'ouvre le classeur, ça scintille, ça calcule je ne sais quoi, bref c'est la panique !
J'ôte l'Usf et alors tout se calme.
Voilà un bon moment que j'essaie de comprendre ce qui se passe.

Un grand merci à qui me sortira de cette impasse.

 

[jmps]

Re : Mon classeur est atteint de la danse de Saint-Guy !

Bonsoir Magic_Doctor,

Aucun problème sur mon Excel 2003.
Pas de scintillements à l'ouverture du classeur ni en ouvrant l'USF.

Je ne vois rien non plus dans le WorkBook_Open qui pourrait expliquer tes symptômes (si je peux parler de symptômes Docteur 😎).

Désolé mais je n'ai pas de piste.

 

[roro69]

Re : Mon classeur est atteint de la danse de Saint-Guy !

Bonsoir ;
sa bug effectivement merci

 

[roro69]

Re : Mon classeur est atteint de la danse de Saint-Guy !

Donc je reviens après avoir désactiver les macros plus de problème
donc a voir avec un des module a voir........
A++

 

[jmps]

Re : Mon classeur est atteint de la danse de Saint-Guy !

Si, peut-être une piste quand même...

A l'initialisation de ton USF tu mets à jour les trois combos.
Mais tu as des évènements ComboBox_Change qui font peut-être de la mise à jour des autres en cascade (j'ai du mal à suivre le raisonnement) et peut-être que ça se mord la queue. J'ai été obligé de faire un CTRL-Pause pour arrêter la macro.
Mais c'est pas à l'ouverture du classeur ni à l'initialisation du USF, c'est quand j'ai changé la valeur du Combo1.

Voilà tout ce que je peux te dire.

 

[roro69]

Re : Mon classeur est atteint de la danse de Saint-Guy !

Re je continue les essais ;et là si je rouvre le fichier avec macros activer blocage , donc je continu quand je supprime les modules plus de soucis ; donc je pense qu'il faut voir de ce coté la
A++

 

[Efgé]

Re : Mon classeur est atteint de la danse de Saint-Guy !

Bonjour Magic_Doctor, roro69, jmps, Jean-Marcel,
Voici ce que je pense (un peu comme jmps).
En ouvrant le fichier tout va bien, par contre c'est à l'utilisation du usf que ça plante (Alt + Ctrl + supr pour m'en sortir)
Si on met un point d'arret sur la ligne

ComboBox2.RowSource = [ListeOrdreItem].Resize([FréquenceItem]).Address

de la combobox 1 et un autre sur la ligne

For Each cel In plage

de la fonction ColRest on assiste à des choses bizarres, proche de la boucle sans fin en préparation....
En espérant avoir aidé
Cordialement

 

[Magic_Doctor]

Re : Mon classeur est atteint de la danse de Saint-Guy !

Bonsoir roro69, Efgé, jmps & tous ceux qui passeraient par là.

C'est vraiment très curieux.
J'ouvre le classeur. La barre d'état scintille. À l'extrême droite de celle-ci je peux lire (en espagnol) :
"Calculando: (2 procesador(es)): 0%"
Je clique sur la feuille, le scintillement cesse et apparaît à l'extrême gauche de la barre d'état :
"Calcular".
Au bout de quelques secondes le scintillement reprend et le même message à l'extrême droite de la barre d'état revient.
Je me demande bien ce que la bécane calcule !
Par curiosité je supprime du module la fonction "ColRest" (qui, je pense, n'y est pour rien).
Je ferme le classeur puis le rouvre. Le même problème réapparaît.
En conséquence, je suppose que l'on peut innocenter la fonction "ColRest" et chercher ailleurs le problème.
Je prends le taureau par les cornes et vire manu militari toutes les macro du module de l'Usf.
Le problème persiste...!!!
Très en colère je vire maintenant l'Usf et là le problème cesse.

 

[job75]

Re : Mon classeur est atteint de la danse de Saint-Guy !

Bonjour à tous,

J'ai plusieurs fois eu des problèmes du même genre avec la propriété RowSource des ComboBox. Alors :

- j'ai ouvert le fichier en désactivant les macros (chez moi Excel 2003 plantait/bloquait)

- j'ai effacé ce qu'il y avait dans les propriétés RowSource des 3 ComboBox

- dans les macros de l'USF j'ai remplacé RowSource par la propriété List.

Maintenant ça à l'air OK.

Fichier joint.

A+

 

[Magic_Doctor]

Re : Mon classeur est atteint de la danse de Saint-Guy !

Buenos días job75, el forum

Merci de t'être penché sur ce problème.
En effet ça a l'air de mieux marcher.
En revanche, quand je change d'item du 1er ComboBox de l'USF, les 2 autres ne se mettent pas automatiquement à jour. Idem quand je change d'item du 2ème ComboBox, le 3ème ne se met pas automatiquement à jour.
Ça finit par devenir agaçant. Une histoire qui devrait être réglée en un tournemain finit par devenir une véritable prise de tête.
Une question. Les USF sont-ils vraiment au point ?

 

[job75]

Re : Mon classeur est atteint de la danse de Saint-Guy !

Re,

Je n'ai pas trop cherché à comprendre ce que tu cherches à faire avec ton UserForm Magic Doctor.

Ce qui est sûr c'est que ça beugue souvent.

Déjà une raison : la fonction ColRest renvoie une valeur d'erreur quand la cellule n'est pas trouvée.

Il faut sans doute rajouter cette ligne après la boucle :

If ad = "" Then Exit Function

De plus les propriétés ControlSource des ComboBox mettent pas mal le pataquès...

Tu as du pain sur la planche.

A+

A+

 

[job75]

Re : Mon classeur est atteint de la danse de Saint-Guy !

Re,

Dans ce fichier j'ai vidé les propriétés ControlSource et Value des ComboBox.

Et bien sûr modifié les macros, avec un contrôle d'erreur sur la 3ème ComboBox.

Mais je ne comprends toujours pas trop...

A+

 

[job75]

Re : Mon classeur est atteint de la danse de Saint-Guy !

Re,

Bon maintenant j'ai tout compris.

Ce code beuguait :

ComboBox3.List = [ListeColonnes].Resize([ColonnesRestantes]).Value

car il faut au moins 2 éléments pour la propriété List.

Alors je fabrique une matrice à 2 colonnes :

ComboBox3.List = [ListeColonnes].Resize([ColonnesRestantes], 2).Value

Comme la propriété ColumnCount vaut 1, seule la 1ère colonne est utilisée.

Par ailleurs Magic Doctor, regarde bien les nouvelles macros et surtout mes commentaires.

Il faut que tu comprennes l'enchainement des déclenchements des macros.

Fichier (3).

A+

 

[Magic_Doctor]

Re : Mon classeur est atteint de la danse de Saint-Guy !

Buenas tardes job75,

Ce classeur est la continuité (et fin je pense) de "Toile de Fond".
https://www.excel-downloads.com/threads/changer-de-toile-de-fond.170258/

En ce qui concerne la mise en forme des lignes d'un tableau le problème était résolu.
Seulement toute la ligne (autrement dit plusieurs colonnes contiguës) était uniformément mise en forme.
Il se peut que l'on veuille mettre en exergue certaines colonnes en colorant leurs lignes différemment des autres colonnes du même tableau.
Pour ce faire il faut alors paramétrer, à savoir :
- à partir de quelle colonne on commence,
- jusqu'à quelle autre colonne on fini.

La colonne de début de mise en forme est identifiée par le nom de son item d'en-tête : 1er ComboBox
Comme il se peut que ce nom se répète un certain nombre de fois dans l'en-tête du tableau, on choisi son occurrence : 2ème ComboBox
Enfin, on choisi le nombre de colonnes que l'on veut colorer : 3ème ComboBox

On n'a strictement rien à écrire puisque tous les paramètres possibles apparaissent dans les ComboBox. Ainsi on évite toute erreur.

Malheureusement, ça ne marche pas encore très fort du fait de ce maudit UserForm qui décidément me laisse perplexe.

 

[job75]

Re : Mon classeur est atteint de la danse de Saint-Guy !

Re,

Je pense que tu n'as pas vu mon post#14 et le fichier joint.

Il y a de nouvelles macros et des explications...

A+