Tester si une zone nommée existe [Résolu]

jerompnt 3 Messages postés mardi 23 novembre 2004Date d'inscription 22 mars 2005 Dernière intervention - 23 déc. 2004 à 11:26 - Dernière réponse : galopin01 133 Messages postés lundi 4 octobre 2004Date d'inscription 14 octobre 2011 Dernière intervention
- 25 déc. 2004 à 21:36
Bonjour a tous

la ligne suivante génére une erreur 1004 si la zone nommée n'existe pas.

NbLigne = Range("zone_de_prix").Row

sans passer par un on error goto ..............., comment tester l'existance d'une zone avant de l'utiliser ?

Merci
Afficher la suite 

1 réponse

galopin01 133 Messages postés lundi 4 octobre 2004Date d'inscription 14 octobre 2011 Dernière intervention - 25 déc. 2004 à 21:36
0
Merci
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

A+

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.