pb vba et shapes

[inealora]

Bonjour !

voilà mon pb :

je fais un tableau basique avec dans deux colonnes des chiffres. Ma troisième colonne est une soustraction : chiffres deuxième colonne - chiffres première colonne
Si il y a eu une hausse les cellules de ma troisième colonne se remplissent par une flèche vers le haut (si baisse => flèche vers le bas...)

Lorsque je change les chiffres de mes colonnes et que je relance la macro mes nouvelles flèches s'inscrivent sur les anciennes. Pour palier a ce pb j'ai écris :

Sheets("progressions").Activate
ActiveSheet.Shapes.SelectAll
Selection.ShapeRange.Delete

Le pb c'est que j'efface aussi toutes les autres formes automatiques qui sont dans ma feuille (bouton de commande pour exécuter les macros par exemple)

Comment faire pour n'effacer que les flèches ?

Merci d'avance si vous avez une solution
Bizz, Inea

 

[Gorfael]

Re : pb vba et shapes

Bonjour !

voilà mon pb :

je fais un tableau basique avec dans deux colonnes des chiffres. Ma troisième colonne est une soustraction : chiffres deuxième colonne - chiffres première colonne
Si il y a eu une hausse les cellules de ma troisième colonne se remplissent par une flèche vers le haut (si baisse => flèche vers le bas...)

Lorsque je change les chiffres de mes colonnes et que je relance la macro mes nouvelles flèches s'inscrivent sur les anciennes. Pour palier a ce pb j'ai écris :

Sheets("progressions").Activate
ActiveSheet.Shapes.SelectAll
Selection.ShapeRange.Delete

Le pb c'est que j'efface aussi toutes les autres formes automatiques qui sont dans ma feuille (bouton de commande pour exécuter les macros par exemple)

Comment faire pour n'effacer que les flèches ?

Merci d'avance si vous avez une solution
Bizz, Inea

Salut
Nommes tes flèches quand tu les crées avec un nom incrémentiel (Fl_01, Fl_02,....)
et tu supprimes les formes commençant pas "FL_"
A+

 

[Robert]

Re : pb vba et shapes

Bonjour Inealora, Gorfael, bonjour le forum,

Pas de solution à ton problème mais juste une suggestion. Certaines polices symboles représentent des flèches vers le haut et vers le bas. Si tu utilisais ce genre de police (moins jolie visuellement c'est vrai) à la place des shapes cela simplifierait considérablement ta macro puisque une simple formule conditionnelle actuliserait la cellule contenant la flèche (police)...

 

[inealora]

Re : pb vba et shapes

Merci à tous pour vos réponses

Je vais essayer tout ça et vous tiens au courant si j'y parviens

a très vite
Inéa

 

[inealora]

Re : pb vba et shapes

Une question stupide :

Comment tu code en vba que tu veux rechercher un objet qui commence par qqchose ?
Tu dois mettre un symbole du style Fl* ou Fl$ ou autre ?

 

[Gorfael]

Re : pb vba et shapes

Une question stupide :

Comment tu code en vba que tu veux rechercher un objet qui commence par qqchose ?
Tu dois mettre un symbole du style Fl* ou Fl$ ou autre ?

Salut
ou autre :
left(objet.name,2)="FL"
ou
objet.name like "FL*"
A+

 

[inealora]

Re : pb vba et shapes

Merci Gorfa et merci à tous ceux qui m'ont répondu
a bientot !