bernardrustrel
XLDnaute Occasionnel
Bonjour à tous
Je vien requérir de l'aide afin d'effacer les lignes tracées sur une Worksheet ces lignes ont été créees comme suit:
Set Trait = Worksheets("Annexe")
With Trait.Shapes.AddLine(0.75, 749.25 - (12 * 33), 531.75, 748.5).Select
End With
Je précise que jeveux effacer que ce type de "shape" et non les autres je conserverai donc les rectangles, images etc....
Merci à vous de me venir en aide
Je vien requérir de l'aide afin d'effacer les lignes tracées sur une Worksheet ces lignes ont été créees comme suit:
Set Trait = Worksheets("Annexe")
With Trait.Shapes.AddLine(0.75, 749.25 - (12 * 33), 531.75, 748.5).Select
End With
Je précise que jeveux effacer que ce type de "shape" et non les autres je conserverai donc les rectangles, images etc....
Merci à vous de me venir en aide