mettre les valeur d'un range dans un tableau

bonjour,j'ai un petit souci.
j'ai une plage de cellule

Code:

---

1 2	plage = Range("ap2:bi2")

---

et je voudrais mettre le texte de chaque cellule dans un tableau.
merci de votre aide

Bonjour,
Pour assigner une plage tu doit passer par un objet range...

Code:

---

1 2	dim Plage as Range set plage = Range("ap2:bi2")

---

mais pour transcoder dans un tableau vaux mieux employer une (ou deux) boucle

Code:

---

1 2 3 4 5 6 7 8

Dim Col as Integer Dim Lig as Long, TB(2,26) 'par exemple 'et pour avoir plus facile je vais prendre la plage A1:Z2 For Lig = 1 to 2 For col = 1 to 26 TB(Lig,col) = Cells(Lig,Col) Next Col Next Lig

---

A+

Hello,

un peu plus direct avec

Code:

---

1 2	dim tabZ as Variant set tabZ = range("A1:B10").Cells

---

ensuite pour récupérer une valeur

Code:

---

debug.Print tabZ(1,5)

---

merci beaucoup pour vos réponse.
bonne journée