Bonjour,
Y a-t-il un moyen, après avoir nommé une liste dans Excel 2000 avec le menu
Insertion_Nom_Définir, de parcourir en VBA les cellules de cette liste avec
quelque-chose qui ressemblerait à ça (qui ne fonctionne pas) :
Dim Cellule as Range
For Each Celule in Worksheets(NomFeuille).Names(NomListe)
Blablabla
Next Cellule
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
papou
Bonjour For Each Cellule in Range(NomListe) devrait suffire.
Cordialement Pascal
"philip" a écrit dans le message de news:
Bonjour, Y a-t-il un moyen, après avoir nommé une liste dans Excel 2000 avec le menu Insertion_Nom_Définir, de parcourir en VBA les cellules de cette liste avec quelque-chose qui ressemblerait à ça (qui ne fonctionne pas) : Dim Cellule as Range For Each Celule in Worksheets(NomFeuille).Names(NomListe) Blablabla Next Cellule
Merci pour votre aide précieux
Bonjour
For Each Cellule in Range(NomListe)
devrait suffire.
Cordialement
Pascal
"philip" <philip@discussions.microsoft.com> a écrit dans le message de news:
46243450-8FEE-46B7-9A33-FB530259DA8D@microsoft.com...
Bonjour,
Y a-t-il un moyen, après avoir nommé une liste dans Excel 2000 avec le
menu
Insertion_Nom_Définir, de parcourir en VBA les cellules de cette liste
avec
quelque-chose qui ressemblerait à ça (qui ne fonctionne pas) :
Dim Cellule as Range
For Each Celule in Worksheets(NomFeuille).Names(NomListe)
Blablabla
Next Cellule
Bonjour For Each Cellule in Range(NomListe) devrait suffire.
Cordialement Pascal
"philip" a écrit dans le message de news:
Bonjour, Y a-t-il un moyen, après avoir nommé une liste dans Excel 2000 avec le menu Insertion_Nom_Définir, de parcourir en VBA les cellules de cette liste avec quelque-chose qui ressemblerait à ça (qui ne fonctionne pas) : Dim Cellule as Range For Each Celule in Worksheets(NomFeuille).Names(NomListe) Blablabla Next Cellule
Merci pour votre aide précieux
Jacques93
Bonjour,
Essaie :
Dim R As Range For Each R In ThisWorkbook.Names("MaPlage").RefersToRange MsgBox R.Value Next R
philip wrote:
Bonjour, Y a-t-il un moyen, après avoir nommé une liste dans Excel 2000 avec le menu Insertion_Nom_Définir, de parcourir en VBA les cellules de cette liste avec quelque-chose qui ressemblerait à ça (qui ne fonctionne pas) : Dim Cellule as Range For Each Celule in Worksheets(NomFeuille).Names(NomListe) Blablabla Next Cellule
Merci pour votre aide précieux
-- Cordialement,
Jacques.
Bonjour,
Essaie :
Dim R As Range
For Each R In ThisWorkbook.Names("MaPlage").RefersToRange
MsgBox R.Value
Next R
philip wrote:
Bonjour,
Y a-t-il un moyen, après avoir nommé une liste dans Excel 2000 avec le menu
Insertion_Nom_Définir, de parcourir en VBA les cellules de cette liste avec
quelque-chose qui ressemblerait à ça (qui ne fonctionne pas) :
Dim Cellule as Range
For Each Celule in Worksheets(NomFeuille).Names(NomListe)
Blablabla
Next Cellule
Dim R As Range For Each R In ThisWorkbook.Names("MaPlage").RefersToRange MsgBox R.Value Next R
philip wrote:
Bonjour, Y a-t-il un moyen, après avoir nommé une liste dans Excel 2000 avec le menu Insertion_Nom_Définir, de parcourir en VBA les cellules de cette liste avec quelque-chose qui ressemblerait à ça (qui ne fonctionne pas) : Dim Cellule as Range For Each Celule in Worksheets(NomFeuille).Names(NomListe) Blablabla Next Cellule