Afficher un tableau VBA

**la nouvelle** · 08/07/2015, 16h34

Bonjour j'aimerais afficher un tableau sur commande.
En fait j'aurais une listbox qui contiendrait la liste de tous les tableaux de mon fichier. En cliquant sur un élément, je voudrais que le tableau s'affiche.
J'ai essayé plusieurs choses mais sans résultats.

Déjà la première étape arriver a afficher sur commande:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
dim montab()
montab= plage("A1:G10").Value

si je veux que les tableaux arrive tjr sur la feuille " affiche"

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Sheets("affiche").Range("A1")=montab

Çà na pas marché

ensuite j'ai essayé les filtres

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
 
Sub affichertab()
 
Dim plage1 As Range
Set plage1 = Sheets("test").Range("F1:G7")
Set plage2= ..
Set plage3=..
For i=2 to 10   'le nombre de plage
 
plagei.AdvancedFilter Action:=xlFilterCopy, CopyToRange:=Sheets("recuper tableau").Cells(1, 1), Unique:=True

Après pour la listbox, c'est autre chose.

Je vous remercie

**GastonLagaffe25** · 08/07/2015, 16h44

Bonjour,

Quand tu parles de tableau, tu parles d'une plage de cellules à mettre à jour avec des données ? Où sont les données ?
A quoi correspondent les différents choix / tableaux ?
Peux-tu donner un fichier Excel en exemple ?

Sinon,
Tu peux avoir un grand tableau avec toutes tes données avec une colonne indiquant le "nom du tableau".
Ensuite tu filtres sur cette colonne pour afficher les données du tableau à afficher...
Dans ce cas, pas besoin de code.

Cordialement.

**la nouvelle** · 08/07/2015, 17h03

en fait:
jai un fichier. sur chaque feuille jai plusieurs tableaux, ce ne sont que des plages.
sur la feuille montant j'ai deux tableaux
plage1=Sheets("montant").Range("A1:B3").Value
plage2=Sheets("montant").Range("B13:C14").Value

Sur la feuille nombre
plage3=Sheets("nombre").Range("B4:C6").Value

j'aimerais pouvoir appeler ces plages soit via une listebox ou liste déroulante.
Le probleme cest surtout dappeler. Faut que ce soit dynamique donc avec vba

je n'arrive jamais a envoyer des fichiers.

**la nouvelle** · 08/07/2015, 17h03

je ne veux pas recreer les tableaux, ils sont deja dessinés sur les feuilles

**GastonLagaffe25** · 08/07/2015, 17h19

Et une liste déroulante en bandeau contenant la liste des tableaux qui t'affiche l'onglet (la feuille) correspondant à la sélection ?
Cela correspond à ton besoin ?
Pour info: si tu cliques droit sur les flèches de déplacement des onglets (en bas à gauche), tu peux choisir la liste des onglets / tableaux...

J'ai du mal à comprendre le besoin (il n'y a pas de traitement...juste de l'affichage)...

**la nouvelle** · 08/07/2015, 17h30

J'y ai pensé. Mais je ne veux pas voir en meme temps tout les tableaux par feuille. Je veux selectionner certains tableaux et les afficher

**la nouvelle** · 08/07/2015, 17h31

aussi jai vu que dans la barre a gauche de "fx" on avait la liste des tableaux crées. Mais comment y accder via vba

**la nouvelle** · 08/07/2015, 17h33

en fait je voudrais creer un truc comme un conteneur de tableaux et un conteneur de graphiques

**GastonLagaffe25** · 08/07/2015, 17h55

aussi jai vu que dans la barre a gauche de "fx" on avait la liste des tableaux crées. Mais comment y accder via vba

Je ne vois pas de quoi tu parles...encore une fois sans exemple de fichier, c'est pas facile...

J'y ai pensé. Mais je ne veux pas voir en même temps tout les tableaux par feuille. Je veux selectionner certains tableaux et les afficher

Tu ne peux pas séparer les tableaux pour avoir un tableau par onglet ?

en fait je voudrais créer un truc comme un conteneur de tableaux et un conteneur de graphiques

As-tu besoin d’accéder aux données des tableaux ?
Car au pire, tu enregistres chaque tableau en images et ensuite tu gères les images...

**Menhir** · 09/07/2015, 08h27

Le plus simple pour résoudre ton problème est de mettre tes nom de fichier dans des cellules classiques avec des liens hypertexte pointant vers tes tableaux de destination.
Ainsi, tu n'aurais pas de codage à faire.

**la nouvelle** · 09/07/2015, 10h50

Bonjour
Sans paraitre trop bete: je fais ca comment?

**la nouvelle** · 09/07/2015, 10h52

Pour gaston

sur une feuille excel, qd on cree un tableau ( sans rapport avec vba) , excel enregistre ce tableau. on a acces à une liste déroulante dans laquelle tu trouve la liste de tt les tableaux que tu as crée.

**Menhir** · 09/07/2015, 11h02

Envoyé par la nouvelle

Sans paraitre trop bete: je fais ca comment?

C'est super-compliqué : clic droit > lien hypertexte.

**la nouvelle** · 09/07/2015, 11h18

OK.
Sinon est ce que quelqu'un peut m'expliquer comment afficher un tableau qu'on a crée avec vba

moi j'ai fait ca et ca ne marche pas:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
 
dim letablo()
letablo=Range("A1:D14").Value
 
'l'endoit ou je veux que mes tableaux apparaissent toujours, le tableau se colle tjr en F1
Range("F1")=letablo

**GastonLagaffe25** · 09/07/2015, 11h27

on a acces à une liste déroulante dans laquelle tu trouve la liste de tt les tableaux que tu as crée.

Merci pour l'info, mais je ne trouve pas cette liste...
Elle est dans un onglet ?

Quand tu crées un tableau, il est nommé et on retrouve la liste des noms dans le "gestionnaire de nom".
Quand tu cliques dans le tableau, tu actives l'onglet "Outils de tableau Création" et tu retrouves également le nom du tableau.

PI: tu peux créer une liste de tes tableaux en parcourant toutes les feuilles de ton classeur (il me semble que c'est la collection "ListObjects")

**la nouvelle** · 09/07/2015, 11h30

en fait si tu click sur une cellule de la feuille, sa référence apparait tout en haut. A ce meme endoit on a la liste des differents tableaux crées sur la feuille

**GastonLagaffe25** · 09/07/2015, 11h37

@la nouvelle:

Oui, merci !
(je n'avais pas pensé à cette zone...)

@Menhir:

Comment écris-tu l'adresse du tableau en lien Hypertexte ?
On peux passer par une cellule du tableau (par exemple la première en haut à gauche du tableau) mais je pensais qu'on pouvait utiliser directement son nom...

**GastonLagaffe25** · 09/07/2015, 11h46

si tu fais:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Range("F1:I14") = letablo

ça marche...

**Menhir** · 09/07/2015, 15h00

Envoyé par GastonLagaffe25

Comment écris-tu l'adresse du tableau en lien Hypertexte ?
On peux passer par une cellule du tableau (par exemple la première en haut à gauche du tableau) mais je pensais qu'on pouvait utiliser directement son nom...

Ca aussi c'est hypercompliqué

: dans la fenêtre du lien, sous "Noms prédéfinis" se trouve la liste des noms. Il suffit de choisir celui que l'on souhaite.
Je l'ai du : ce que tu cherches à faire, c'est déjà du tout cuit dans Excel.