Un plop visuel qui surprend chaque fois ma rétine

Magic_Doctor

XLDnaute Barbatruc

Supporter XLD

• 15 Février 2013

• #2

Re : Un plop visuel qui surprend chaque fois ma rétine

Regardez plutôt ce classeur.

 

Pièces jointes

• Plop agaçant.xlsm

  97.7 KB · Affichages: 66
• Plop agaçant.xlsm

  97.7 KB · Affichages: 61
• Plop agaçant.xlsm

  97.7 KB · Affichages: 61

Vote positif 0 Vote négatif

job75

XLDnaute Barbatruc

• 15 Février 2013

• #3

Re : Un plop visuel qui surprend chaque fois ma rétine

Bonjour Magic_Doctor,

Pour le "plop visuel", va dans le code de la feuille "BD" et à la fin de la macro Worksheet_SelectionChange supprime :

Code:

Application.ScreenUpdating = True

Rien testé car je suis sur mon ordi avec Excel 2003.

Pour ce qui est de la variable Public compt2 on en a assez parlé il me semble !

Tu n'as qu'à utiliser à la place le nom défini, il est créé justement pour mémoriser la valeur qu'il contient.

A+

 

Dernière édition: 15 Février 2013

Vote positif 0 Vote négatif

Magic_Doctor

XLDnaute Barbatruc

Supporter XLD

• 15 Février 2013

• #4

Re : Un plop visuel qui surprend chaque fois ma rétine

Bonjour job,

Effectivement ça marche. Je pensais qu'il fallait toujours finir par Application.ScreenUpdating = True.

Je vais voir donc pour cette variable.

 

Vote positif 0 Vote négatif

job75

XLDnaute Barbatruc

• 15 Février 2013

• #5

Re : Un plop visuel qui surprend chaque fois ma rétine

Re,

Et dans la 1ère macro de ta feuille "Données", pour que l'activation de la cellule "TitreListeItems" déclenche la macro SelectionChange, il ne faut pas que cette cellule soit déjà sélectionnée donc remplace :

Code:

Sheets("BD").Select 'on doit aller à la feuille "BD" pour activer la cellule "TitreListeItems"

par

Code:

Application.Goto Sheets("BD").[A1] 'on doit aller à la feuille "BD" pour activer la cellule "TitreListeItems"

Edit : ah pardon, cette modif est inutile puisque ta macro sélectionne la cellule CR50 après l'activation.

A+

 

Dernière édition: 15 Février 2013

Vote positif 0 Vote négatif

Magic_Doctor

XLDnaute Barbatruc

Supporter XLD

• 15 Février 2013

• #6

Re : Un plop visuel qui surprend chaque fois ma rétine

Merci job, il ne me reste plus que d'en finir avec la variable.

 

Vote positif 0 Vote négatif