Vba cellule excel dans un tableau

Résolu/Fermé
Luluc94 - 29 févr. 2012 à 11:44
 Luluc94 - 29 févr. 2012 à 12:52
Bonjour,

Je suis en train de développer une macro VBA sous excel 2003 et j'ai le problème suivant :

J'ai une feuille qui contient divers paramètres nécessaires à l'exécution de cette macro. Sur cette feuille, j'ai une cellule nommée "liste_valeurs" qui contient plusieurs valeurs séparées par des virgules et je voudrais mettre le contenu de cette cellule dans un tableau.
Si je fais :
Dim montab as variant
montab = Array(Worksheets("param").Range("liste_valeurs"))
le contenu de la cellule est affecté en totalité à montab(0)
et pour montab(1) et suivants "L'indice n'appartient pas à la sélection"
Comment puis-je remédier à cela ?
Merci d'avance pour votre aide.

2 réponses

pijaku Messages postés 12263 Date d'inscription jeudi 15 mai 2008 Statut Modérateur Dernière intervention 4 janvier 2024 2 744
29 févr. 2012 à 11:51
Bonjour,
Pour séparer une chaine de caractères selon un séparateur et "rentrer" tout cela dans une variable tableau, il faut utiliser Split.
Comme ceci, par exemple :
Dim montab As Variant, i As Integer
'Split avec séparateur virgule :
montab = Split(Worksheets("Feuil1").Range("liste_valeurs"), ",")
For i = 0 To UBound(montab)
    Debug.Print montab(i) 
Next
1
Génial, ça marche super !
Merci beaucoup.
0