Bonjour Mathew; Essaie: Dim Folder_Array As Variant, Rng As Range Set Rng = Range(Cells(row, 1), Cells(row, 7)) Folder_Array = Rng.Value
MP
" Mathew" a écrit dans le message de news: #
Salut
J'aimerais remplir un tableau dynamique avec des ranges (une ligne, 7 colonnes), le nombre de range est variables. Ce que je fais ne marche pas ... Folder_Array(row, 0) = Range("A" & Line).Value Folder_Array(row, 1) = Range("B" & Line).Value Folder_Array(row, 2) = Range("C" & Line).Value Folder_Array(row, 3) = Range("D" & Line).Value Folder_Array(row, 4) = Range("E" & Line).Value Folder_Array(row, 5) = Range("F" & Line).Value Folder_Array(row, 6) = Range("G" & Line).Value
Apres j'aimerais savoir comment on ecrit le contenu d'un tableau quelque part sur une feuille par ex.
Si quelqu'un peut m'aider c'est cool.
Merci Matthieu
MichDenis
Bonjour Mathew,
| Apres j'aimerais savoir comment on ecrit le contenu d'un tableau
'--------------------------------------- Dim Tblo As Variant 'Renseigner le tableau d'une plage de cellules 'Seule une plage continu de cellules est acceptable. Tblo = Worksheets("Feuil1").Range("A1:B15")
'Pour copier le tableau dans une plage de cellules With Worksheets("Feuil2") .Range("c5").Resize(UBound(Tblo, 1), UBound(Tblo, 2)) = Tblo End With '---------------------------------------
Salutations!
" Mathew" a écrit dans le message de news: % Salut
J'aimerais remplir un tableau dynamique avec des ranges (une ligne, 7 colonnes), le nombre de range est variables. Ce que je fais ne marche pas ... Folder_Array(row, 0) = Range("A" & Line).Value Folder_Array(row, 1) = Range("B" & Line).Value Folder_Array(row, 2) = Range("C" & Line).Value Folder_Array(row, 3) = Range("D" & Line).Value Folder_Array(row, 4) = Range("E" & Line).Value Folder_Array(row, 5) = Range("F" & Line).Value Folder_Array(row, 6) = Range("G" & Line).Value
Apres j'aimerais savoir comment on ecrit le contenu d'un tableau quelque part sur une feuille par ex.
Si quelqu'un peut m'aider c'est cool.
Merci Matthieu
Bonjour Mathew,
| Apres j'aimerais savoir comment on ecrit le contenu d'un tableau
'---------------------------------------
Dim Tblo As Variant
'Renseigner le tableau d'une plage de cellules
'Seule une plage continu de cellules est acceptable.
Tblo = Worksheets("Feuil1").Range("A1:B15")
'Pour copier le tableau dans une plage de cellules
With Worksheets("Feuil2")
.Range("c5").Resize(UBound(Tblo, 1), UBound(Tblo, 2)) = Tblo
End With
'---------------------------------------
Salutations!
" Mathew" <matthieu_in_hk@hotmail.com> a écrit dans le message de news: %23SAjbrpNFHA.580@TK2MSFTNGP15.phx.gbl...
Salut
J'aimerais remplir un tableau dynamique avec des ranges (une ligne, 7
colonnes), le nombre de range est variables.
Ce que je fais ne marche pas ...
Folder_Array(row, 0) = Range("A" & Line).Value
Folder_Array(row, 1) = Range("B" & Line).Value
Folder_Array(row, 2) = Range("C" & Line).Value
Folder_Array(row, 3) = Range("D" & Line).Value
Folder_Array(row, 4) = Range("E" & Line).Value
Folder_Array(row, 5) = Range("F" & Line).Value
Folder_Array(row, 6) = Range("G" & Line).Value
Apres j'aimerais savoir comment on ecrit le contenu d'un tableau quelque
part sur une feuille par ex.
| Apres j'aimerais savoir comment on ecrit le contenu d'un tableau
'--------------------------------------- Dim Tblo As Variant 'Renseigner le tableau d'une plage de cellules 'Seule une plage continu de cellules est acceptable. Tblo = Worksheets("Feuil1").Range("A1:B15")
'Pour copier le tableau dans une plage de cellules With Worksheets("Feuil2") .Range("c5").Resize(UBound(Tblo, 1), UBound(Tblo, 2)) = Tblo End With '---------------------------------------
Salutations!
" Mathew" a écrit dans le message de news: % Salut
J'aimerais remplir un tableau dynamique avec des ranges (une ligne, 7 colonnes), le nombre de range est variables. Ce que je fais ne marche pas ... Folder_Array(row, 0) = Range("A" & Line).Value Folder_Array(row, 1) = Range("B" & Line).Value Folder_Array(row, 2) = Range("C" & Line).Value Folder_Array(row, 3) = Range("D" & Line).Value Folder_Array(row, 4) = Range("E" & Line).Value Folder_Array(row, 5) = Range("F" & Line).Value Folder_Array(row, 6) = Range("G" & Line).Value
Apres j'aimerais savoir comment on ecrit le contenu d'un tableau quelque part sur une feuille par ex.