Bonjour à tous,
j'aurais besoin d'une petite aide que je sais sera très facile pour vous :-)

mon souhait:
je désire supprimer ma photo "NA avec les 2 traits rouge de la page 2" présent sur la page 2, à la condition que ma case Y11 de la page 1 est coché en l'occurence avec un X majuscule.
Si case non cochée donc cellule Y11= vide, on ne fait rien.

Voir photo Nom : image001.png
Affichages : 173
Taille : 21,4 KoNom : image004.png
Affichages : 179
Taille : 42,8 Ko

En gros,

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
si Y11 = "X" then
Sheets("page 2").Select
ActiveSheet.Shapes.Range(Array("Picture 2")).Select
Selection.Delete
 
et si Y11 = rien ... on fait rien

Désolé je sais que c'est un truc bateau mais je trouve pas, merci pour votre aide :-)