pbm boucle if

arno · 3 Avril 2006

bonjour
j ai un probleme avec les boucles if. je souhaite que si un certain graph est present sur ma feuille que celui ci soit effecé. comment puis j ecrir cette condition de presence ou comment realiser cette boucle
merci

Hervé · 3 Avril 2006

Bonjour arno, le forum

tu peux peut etre t'inspirer de ce type de code :

Sub Bouton3_QuandClic()
Dim i As Integer
Dim graph As Object

With ActiveSheet
For i = .ChartObjects.Count To 1 Step -1
Set graph = .ChartObjects(i)
If graph.Name = 'nomdugraphiqueasupprimer' Then graph.Delete
Next i
End With

End Sub

salut

pbm boucle if

arno

Guest

Hervé

XLDnaute Barbatruc

Discussions similaires

pbm boucle if

arno

Guest

Hervé

XLDnaute Barbatruc

Discussions similaires

Privacy & Transparency

Privacy & Transparency