bonjour à tous,
dans mon tableau sur la Feuille 1 et en colonne A j'ai une liste de Fruits .
J'ai donné un nom "Fruits" à cette liste que j'ai définit ainsi :
=DECALER(Feuil1!$A$2;0;0;NBVAL(Feuil1!$A$A))
Dans mon VBA j'ai une variable Array Fruit que j'aurais aimé charger avec
les données contenues dans le nom "Fruits"
Avant je faisais
Fruit = Array(, "Banane", "Orange", "Tomate", "Fraise")
Maintenant j'aimerais faire
Fruit = le contenu de Application.Range("Fruits")
T devient un tableau (array) à 2 dimensions, et pour en extraire chaque élément, tu peux créer ce type de boucle. '--------------------------------- Sub test() Dim T T = [fruits].Value For a = 1 To UBound(T, 1) For b = 1 To UBound(T, 2) Msgbox T(a, b) Next b, a End Sub '---------------------------------
"Xavier powaga" a écrit dans le message de news: 47c6b8d5$0$29811$ bonjour à tous, dans mon tableau sur la Feuille 1 et en colonne A j'ai une liste de Fruits . J'ai donné un nom "Fruits" à cette liste que j'ai définit ainsi : ÞCALER(Feuil1!$A$2;0;0;NBVAL(Feuil1!$A$A))
Dans mon VBA j'ai une variable Array Fruit que j'aurais aimé charger avec les données contenues dans le nom "Fruits"
Avant je faisais Fruit = Array(, "Banane", "Orange", "Tomate", "Fraise")
Maintenant j'aimerais faire Fruit = le contenu de Application.Range("Fruits")
est ce possible ?
T devient un tableau (array) à 2 dimensions, et pour en extraire
chaque élément, tu peux créer ce type de boucle.
'---------------------------------
Sub test()
Dim T
T = [fruits].Value
For a = 1 To UBound(T, 1)
For b = 1 To UBound(T, 2)
Msgbox T(a, b)
Next b, a
End Sub
'---------------------------------
"Xavier powaga" <Xavierpowaga@free.fr> a écrit dans le message de news:
47c6b8d5$0$29811$426a34cc@news.free.fr...
bonjour à tous,
dans mon tableau sur la Feuille 1 et en colonne A j'ai une liste de Fruits .
J'ai donné un nom "Fruits" à cette liste que j'ai définit ainsi :
ÞCALER(Feuil1!$A$2;0;0;NBVAL(Feuil1!$A$A))
Dans mon VBA j'ai une variable Array Fruit que j'aurais aimé charger avec
les données contenues dans le nom "Fruits"
Avant je faisais
Fruit = Array(, "Banane", "Orange", "Tomate", "Fraise")
Maintenant j'aimerais faire
Fruit = le contenu de Application.Range("Fruits")
T devient un tableau (array) à 2 dimensions, et pour en extraire chaque élément, tu peux créer ce type de boucle. '--------------------------------- Sub test() Dim T T = [fruits].Value For a = 1 To UBound(T, 1) For b = 1 To UBound(T, 2) Msgbox T(a, b) Next b, a End Sub '---------------------------------
"Xavier powaga" a écrit dans le message de news: 47c6b8d5$0$29811$ bonjour à tous, dans mon tableau sur la Feuille 1 et en colonne A j'ai une liste de Fruits . J'ai donné un nom "Fruits" à cette liste que j'ai définit ainsi : ÞCALER(Feuil1!$A$2;0;0;NBVAL(Feuil1!$A$A))
Dans mon VBA j'ai une variable Array Fruit que j'aurais aimé charger avec les données contenues dans le nom "Fruits"
Avant je faisais Fruit = Array(, "Banane", "Orange", "Tomate", "Fraise")
Maintenant j'aimerais faire Fruit = le contenu de Application.Range("Fruits")
est ce possible ?
JB
ReBonjour,
Fruit= [fruits] ' Fruit tableau nx1 x = Fruit(1, 1) y= Fruit(2, 1) z= Fruit(3, 1)
JB
On 28 fév, 14:36, "Xavier powaga" wrote:
bonjour à tous, dans mon tableau sur la Feuille 1 et en colonne A j'ai une liste de Fruits . J'ai donné un nom "Fruits" à cette liste que j'ai définit ainsi : ÞCALER(Feuil1!$A$2;0;0;NBVAL(Feuil1!$A$A))
Dans mon VBA j'ai une variable Array Fruit que j'aurais aimé charger ave c les données contenues dans le nom "Fruits"
Avant je faisais Fruit = Array(, "Banane", "Orange", "Tomate", "Fraise")
Maintenant j'aimerais faire Fruit = le contenu de Application.Range("Fruits")
est ce possible ?
ReBonjour,
Fruit= [fruits] ' Fruit tableau nx1
x = Fruit(1, 1)
y= Fruit(2, 1)
z= Fruit(3, 1)
JB
On 28 fév, 14:36, "Xavier powaga" <Xavierpow...@free.fr> wrote:
bonjour à tous,
dans mon tableau sur la Feuille 1 et en colonne A j'ai une liste de Fruits .
J'ai donné un nom "Fruits" à cette liste que j'ai définit ainsi :
=DECALER(Feuil1!$A$2;0;0;NBVAL(Feuil1!$A$A))
Dans mon VBA j'ai une variable Array Fruit que j'aurais aimé charger ave c
les données contenues dans le nom "Fruits"
Avant je faisais
Fruit = Array(, "Banane", "Orange", "Tomate", "Fraise")
Maintenant j'aimerais faire
Fruit = le contenu de Application.Range("Fruits")
Fruit= [fruits] ' Fruit tableau nx1 x = Fruit(1, 1) y= Fruit(2, 1) z= Fruit(3, 1)
JB
On 28 fév, 14:36, "Xavier powaga" wrote:
bonjour à tous, dans mon tableau sur la Feuille 1 et en colonne A j'ai une liste de Fruits . J'ai donné un nom "Fruits" à cette liste que j'ai définit ainsi : ÞCALER(Feuil1!$A$2;0;0;NBVAL(Feuil1!$A$A))
Dans mon VBA j'ai une variable Array Fruit que j'aurais aimé charger ave c les données contenues dans le nom "Fruits"
Avant je faisais Fruit = Array(, "Banane", "Orange", "Tomate", "Fraise")
Maintenant j'aimerais faire Fruit = le contenu de Application.Range("Fruits")
Fruit= [fruits] ' Fruit tableau nx1 x = Fruit(1, 1) y= Fruit(2, 1) z= Fruit(3, 1)
JB
On 28 fév, 14:36, "Xavier powaga" wrote:
bonjour à tous, dans mon tableau sur la Feuille 1 et en colonne A j'ai une liste de Frui ts . J'ai donné un nom "Fruits" à cette liste que j'ai définit ainsi : ÞCALER(Feuil1!$A$2;0;0;NBVAL(Feuil1!$A$A))
Dans mon VBA j'ai une variable Array Fruit que j'aurais aimé charger a vec les données contenues dans le nom "Fruits"
Avant je faisais Fruit = Array(, "Banane", "Orange", "Tomate", "Fraise")
Maintenant j'aimerais faire Fruit = le contenu de Application.Range("Fruits")
est ce possible ?- Masquer le texte des messages précédents -
On 28 fév, 15:29, JB <boisgont...@hotmail.com> wrote:
ReBonjour,
Fruit= [fruits] ' Fruit tableau nx1
x = Fruit(1, 1)
y= Fruit(2, 1)
z= Fruit(3, 1)
JB
On 28 fév, 14:36, "Xavier powaga" <Xavierpow...@free.fr> wrote:
bonjour à tous,
dans mon tableau sur la Feuille 1 et en colonne A j'ai une liste de Frui ts .
J'ai donné un nom "Fruits" à cette liste que j'ai définit ainsi :
=DECALER(Feuil1!$A$2;0;0;NBVAL(Feuil1!$A$A))
Dans mon VBA j'ai une variable Array Fruit que j'aurais aimé charger a vec
les données contenues dans le nom "Fruits"
Avant je faisais
Fruit = Array(, "Banane", "Orange", "Tomate", "Fraise")
Maintenant j'aimerais faire
Fruit = le contenu de Application.Range("Fruits")
est ce possible ?- Masquer le texte des messages précédents -
Fruit= [fruits] ' Fruit tableau nx1 x = Fruit(1, 1) y= Fruit(2, 1) z= Fruit(3, 1)
JB
On 28 fév, 14:36, "Xavier powaga" wrote:
bonjour à tous, dans mon tableau sur la Feuille 1 et en colonne A j'ai une liste de Frui ts . J'ai donné un nom "Fruits" à cette liste que j'ai définit ainsi : ÞCALER(Feuil1!$A$2;0;0;NBVAL(Feuil1!$A$A))
Dans mon VBA j'ai une variable Array Fruit que j'aurais aimé charger a vec les données contenues dans le nom "Fruits"
Avant je faisais Fruit = Array(, "Banane", "Orange", "Tomate", "Fraise")
Maintenant j'aimerais faire Fruit = le contenu de Application.Range("Fruits")
est ce possible ?- Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
Xavier powaga
Merci JB et Mich grace à vous je m'en suis sortit
PS: Fantastique le travail de Jacques sur les tableaux. Que du bonheur
Fruit= [fruits] ' Fruit tableau nx1 x = Fruit(1, 1) y= Fruit(2, 1) z= Fruit(3, 1)
JB
On 28 fév, 14:36, "Xavier powaga" wrote:
bonjour à tous, dans mon tableau sur la Feuille 1 et en colonne A j'ai une liste de Fruits . J'ai donné un nom "Fruits" à cette liste que j'ai définit ainsi : ÞCALER(Feuil1!$A$2;0;0;NBVAL(Feuil1!$A$A))
Dans mon VBA j'ai une variable Array Fruit que j'aurais aimé charger avec les données contenues dans le nom "Fruits"
Avant je faisais Fruit = Array(, "Banane", "Orange", "Tomate", "Fraise")
Maintenant j'aimerais faire Fruit = le contenu de Application.Range("Fruits")
est ce possible ?- Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
Merci JB et Mich grace à vous je m'en suis sortit
PS: Fantastique le travail de Jacques sur les tableaux. Que du bonheur
"JB" <boisgontier@hotmail.com> a écrit dans le message de news:
b7a02d90-455f-4a67-85d8-1bc2819eda73@n58g2000hsf.googlegroups.com...
http://boisgontierjacques.free.fr/fichiers/jb-tableaux.zip
JB
On 28 fév, 15:29, JB <boisgont...@hotmail.com> wrote:
ReBonjour,
Fruit= [fruits] ' Fruit tableau nx1
x = Fruit(1, 1)
y= Fruit(2, 1)
z= Fruit(3, 1)
JB
On 28 fév, 14:36, "Xavier powaga" <Xavierpow...@free.fr> wrote:
bonjour à tous,
dans mon tableau sur la Feuille 1 et en colonne A j'ai une liste de
Fruits .
J'ai donné un nom "Fruits" à cette liste que j'ai définit ainsi :
ÞCALER(Feuil1!$A$2;0;0;NBVAL(Feuil1!$A$A))
Dans mon VBA j'ai une variable Array Fruit que j'aurais aimé charger
avec
les données contenues dans le nom "Fruits"
Avant je faisais
Fruit = Array(, "Banane", "Orange", "Tomate", "Fraise")
Maintenant j'aimerais faire
Fruit = le contenu de Application.Range("Fruits")
est ce possible ?- Masquer le texte des messages précédents -
Fruit= [fruits] ' Fruit tableau nx1 x = Fruit(1, 1) y= Fruit(2, 1) z= Fruit(3, 1)
JB
On 28 fév, 14:36, "Xavier powaga" wrote:
bonjour à tous, dans mon tableau sur la Feuille 1 et en colonne A j'ai une liste de Fruits . J'ai donné un nom "Fruits" à cette liste que j'ai définit ainsi : ÞCALER(Feuil1!$A$2;0;0;NBVAL(Feuil1!$A$A))
Dans mon VBA j'ai une variable Array Fruit que j'aurais aimé charger avec les données contenues dans le nom "Fruits"
Avant je faisais Fruit = Array(, "Banane", "Orange", "Tomate", "Fraise")
Maintenant j'aimerais faire Fruit = le contenu de Application.Range("Fruits")
est ce possible ?- Masquer le texte des messages précédents -