galopin01
Messages postés133Date d'inscriptionlundi 4 octobre 2004StatutMembreDernière intervention14 octobre 20111 25 déc. 2004 à 21:36
Bonsoir,
Sub test()
For i = 1 To ActiveWorkbook.Names.CountY (ActiveWorkbook.Names(i).Name "zone_de_prix")
If Y Then Exit For
Next
If Not Y Then MsgBox "cette zone n'existe pas"
End Sub