Est il possible de créer un tableau à partir d'une union de plusieurs Range

Signaler
Messages postés
42
Date d'inscription
mardi 30 décembre 2003
Statut
Membre
Dernière intervention
17 mai 2006
-
Messages postés
42
Date d'inscription
mardi 30 décembre 2003
Statut
Membre
Dernière intervention
17 mai 2006
-
Bonjour,

Je souhaiterais savoir s'il est possible de remplir un tableau à partir d'une union de Range (donc qui ne represente pas forcément une plage carrée).
Ce serait dommage que je me lance la dessus si ce n'est pas possible

Merci d'avance
tom

5 réponses

Messages postés
7393
Date d'inscription
mercredi 23 avril 2003
Statut
Membre
Dernière intervention
6 avril 2012
58
Salut,

Qu entends tu exactement par "une union de range"?

@+
Julien
Messages postés
42
Date d'inscription
mardi 30 décembre 2003
Statut
Membre
Dernière intervention
17 mai 2006

Et bien, par exemple:

Dim r1 as Range
Dim r2 as Range

r1 = Range("A2:A4")
r2 = Range("B1:B6")
r1 = Union(r1, r2)
debug.print r1.address

En gros j'aimerais créer un tableau de dimensions (2, 6) (correspondant aux cellules "A1:B6") à partir de cette union de Range.
Messages postés
42
Date d'inscription
mardi 30 décembre 2003
Statut
Membre
Dernière intervention
17 mai 2006

En gros, je dispose de plusieurs tableaux et je souhaite les regroupe dans un tableau unique.

A titre d'exemple :
(1, 1, 1, 1, 1)
(1, 1,1)
(1, 1, 1, 1, 1, 1, 1)

doit donner :
( (1, 1, 1, 1, 1, 0, 0) , (1, 1, 1, 0, 0, 0, 0) , (1, 1, 1, 1, 1, 1, 1) )
Messages postés
7393
Date d'inscription
mercredi 23 avril 2003
Statut
Membre
Dernière intervention
6 avril 2012
58
re,

En jouant bien avec les redim les redim preserve, les Lbound et les Ubound tu devrais pouvoir faire ce que te souhaite (non sans mal tout de meme)

@+
Julien
Messages postés
42
Date d'inscription
mardi 30 décembre 2003
Statut
Membre
Dernière intervention
17 mai 2006

Ok jte remercie pr le coup de main.
Jespere que le preserve rajoute des 0 dans les nouveaux espaces vides
@+
Tom