Maniement Variable Tableau

Version imprimable

28/12/2010, 12h56
stargates01

Maniement Variable Tableau
Bonjour à tous,

J'assaie de progresser sur le maniement des variables tableau sous vba... Je voudrais ainsi savoir s'il est possible de charger une plage de type Range multi-zones dans un tableau à 2 dimensions :
Code:

1 2 Plage multi-zones = Union(Range("A1:A10"), Range("C1:C10")) Variable tableau Tab(1 to 10, 1 to 2)
J'ai essayé

Code:

Tab = Union(Range("A1:A10"), Range("C1:C10")).value

mais ça ne me charge que la première colonne de ma plage et ça redimensionne mon tableau à une dimension... QUelqu'un aurait-il un tuyau ?

Dans le sens inverse je voudrais copîer la deuxième colonne de mon tableau dans une plage de cellules : savez vous comment faire ? je n'arrive pas à trouver l'instruction qui sélectionne la deuxième colonne de ma variable tableau....

Merci d'avance

Stargates

Bonjour

oui on peut et tres facilement

Code:

1
2
3
4
Sub tablo()
      Dim MonTablo() as Variant
      MonTablo = Range("A1:C10").value
End Sub

28/12/2010, 13h38
pgz

Bonjour.

Citation:

Envoyé par stargates01

Je voudrais ainsi savoir s'il est possible de charger une plage de type Range multi-zones dans un tableau à 2 dimensions

Wilfried n'a pas dû bien lire la question. A ma connaissance, la réponse est non. Si tu tentes l'opération, tu ne chargeras que la première zone, c'est-à-dire le premier terme de la fonction Union.

Citation:

Envoyé par stargates01

Dans le sens inverse je voudrais copîer la deuxième colonne de mon tableau dans une plage de cellules : savez vous comment faire ? je n'arrive pas à trouver l'instruction qui sélectionne la deuxième colonne de ma variable tableau....

A ma connaissance, ce n'est pas possible non plus. Contournement : tu crées un nouveau tableau de la taille de la zone qui t'intéresse, tu copies de l'un dans l'autre. Tu peux alors écrire les données du nouveau tableau dans la zone de la feuille.

Cordialement,

PGZ
28/12/2010, 13h55
stargates01

Merci de vos réponses. Concernant la réponse de PGZ : y-a-t-il une instruction simplle pour copier la colonne d'un tableau dans l'autre ou faut-il passer par une boucle ?

Bonjour à tous

Une astuce que tu pourrais utiliser

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
Option Base 1
Private Type Untablo
        Tablo1() As Variant
        Tablo2() As Variant
End Type
 
Sub test()
Dim Montablo As Untablo
With Montablo
    .Tablo1 = Application.Transpose(Range("A1:A10").Value)
    .Tablo2 = Application.Transpose(Range("C1:C10").Value)
End With
End Sub

28/12/2010, 14h21
stargates01

Merci à Michel : ça marche mais le maniement de Montablo, sauf à ce que j'ai raté qch, n'est pas très simple puisqu'il faut à chaque fois passer par les sous tableaux tablo1 et tablo2. Idéalement il aurait fallu que l'on puisse manier Montablo comme une variable tableau en appelant par exemple un élément sous la forme Montablo(1,1). Je vais continuer à creuser pour voir s'il y a d'autres astuces...
28/12/2010, 15h36
pgz

Re,

Citation:

Envoyé par stargates01

Concernant la réponse de PGZ : y-a-t-il une instruction simplle pour copier la colonne d'un tableau dans l'autre ou faut-il passer par une boucle ?

Il faut une boucle For ... Next. Mais ces instructions s'exécutent très rapidement, les tableaux étant en mémoire...

Dans le fond, je ne saisis pas bien ton insistance à passer par un seul tableau et cela empêche de trouver un contournement.
Avec l'exemple que tu as donné, tu pourrais aussi faire

Code:

MonTableau = .Range("A1:C10")

, ce qui te donne 3 colonnes dont 2 utiles, mais un seul tableau.

PGZ
28/12/2010, 15h52
stargates01

Oui tu as raison dans le cas que j'ai pris en exemple. Mais dans mon projet il s'agit d'une plage 3000 lignes x 40 colonnes et je n'ai besoin que de travailler sur quelques colonnes non contigües. Je crains que charger tout l'ensemble consomme trop de mémoire inutilement...

ST
28/12/2010, 16h09
wilfried_42

Re:

Tu peux pourquoi pas te creer une feuille Tablo et l'incrémenter avec des copier coller ce qui est rapide et l'utiliser comme un tablo
28/12/2010, 16h54
pgz

Re,

Citation:

Envoyé par stargates01

Oui tu as raison dans le cas que j'ai pris en exemple. Mais dans mon projet il s'agit d'une plage 3000 lignes x 40 colonnes et je n'ai besoin que de travailler sur quelques colonnes non contigües. Je crains que charger tout l'ensemble consomme trop de mémoire inutilement...

ST

A moins que tu n'aies que peu de mémoire vive, un tableau de 120 000 données n'a rien de "lourd". Ca passe ou ça ne passe pas... Ce n'est pas comme une feuille de 1 200 000 données!

Bref, as-tu essayé? Si oui as-tu observé une "lourdeur" quelconque?

Cordialement,

PGZ
28/12/2010, 17h04
stargates01

Merci à PGZ et Wilfried de vos conseils. Je crois que j'ai de quoi avancer dans mon projet avec toutes ces astuces.:ccool:

ST
28/12/2010, 18h52
Michel_M

Excuses moi d'avoir essayé de t'aider, stargate.