Gestion de nom, variable EXCEL/VBA

Bonjour,

Nous pouvons déclarer par le biais du gestionnaire de nom des variables du type "Zone d'impression" et d'autres comme :

Code:

---

1 2	Zone_de_tri ='Cpt CLIENT ht'!$A$6:$C$21

---

Question : Comment récupérer une variable déclarée Zone_De_Tri sans devoir l'inscrire dans les cellules du tableur (par exemple)
, comme celà :

Code:

---

1 2 3 4 5 6

' Zone du tableau de données Range("AK1").Select Selection.ListNames Range("AL1").Select

---

Pour ensuite la récupérer dans la feuille sous les cellules :
AL1 = Nom de la variable
AL2 = Valeur de la variable

Code:

---

1 2	MaZone = Range("AL2").Value

---

En finalité, je voudrais pouvoir récupérer ces valeurs directement dans mon VBA en utilisant la variable pré-déclarée (sans passer par la feuille excel).

Quel est l'écriture la plus appropriée ?

Merci d'avance

Problème résolu

Par exemple,
Dans le gestionnaire de nom : Zone_MOIS_actif = "=JANV!$7:$30"

La routine :

Code:

---

1 2 3 4 5 6 7 8 9 10 11

Sub Tri_Mois_Croissant_Clic()   Dim MaZone As String   MaZone = ActiveSheet.Name & "!Zone_MOIS_actif:" Call ListeZonesFeuille(MaZone)   Call MOIS_TriAZ(MaZone)   End Sub

---

La sous-routine :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26

Sub ListeZonesFeuille(Zone As String)   Dim Plage As Range Dim Nm As Name   On Error Resume Next 'Boucle sur les noms du classeur   For Each Nm In ThisWorkbook.Names Set Plage = Nm.RefersToRange   If Not Plage Is Nothing Then   'If Plage.Worksheet.Name = Feuille Then Debug.Print Nm.Name & ":" & Plage.Address & " " If Nm.Name & ":" = Zone Then 'Debug.Print Nm.Name & ": <<<" & Plage.Address & ">>>" Zone = Plage.Address End If End If   Set Plage = Nothing   Next Nm   End Sub

---

Et le tri s'effectue bien sur la zone de la feuille active (quelque soit l'ajout et la suppression de ligne avant le tri, donc ici "$7:$30")

Bravo pour moi !