Portabilité d'un array

**Sebphyto** · 24/02/2016, 20h27

Bonjour à tous,

Dans un classeur, j'ai 5 modules dont une sub qui se lance à l'ouverture (thisworkbook) de celui-ci.

Dans cette sub je créé un tablo

comment faire pour que ce tablo soit utilisable dans n'importe quels modules?

Car ce tablo me récupère des liens, que je dois exploiter dans les autres modules.

J'ai bien essayer de scinder tout mes modules en un, avec déclaration du tablo en début de module, mais en vain, il est toujours "hors contexte" dans chaque sub.

j'ai besoin de vos éclaircissements...

Seb

**clementmarcotte** · 24/02/2016, 20h42

Bonjour,

Sauf horreur de ma part tu dois mettre:

Code :

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

Public MachinTruc

Dans un module standard (Pas un module de classe, pas un module de feuille, pas le ThisWorkBook. Un module "ordinaire" quoi.)

Mais comme cela fait une mèche que je fais plus de VB.net que de VBA, je pourrais bien me tromper.

Invité · 24/02/2016, 20h45

Bonsoir,
Tu ajoute un module standard qui te permettra de déclarer le variable que tu utilises dans tout ton projet!

Note que tu peux afficher les propriétés de ton module pour lui donner un nom c'est plus lisible dans l'ensemble de ton projet

Code :

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

1
2
3
 
Public MyTableau() as variant
Public Plage as range

Ces variable sont éclater une seul fois dans ton projet et utilisable partout!

Edite: Clément tu écris plus vite que moi!

**Sebphyto** · 24/02/2016, 20h46

Bonsoir Clement,

Oui je suis d'accord avec toi, mais le souci est bien que ce tablo se crée dès l'ouverture du classeur dans thisworkbook....

J'ai bien une solution,
ce tablo se retranscrit dans une sheet "temp", la solution que je vois, serai de recréer ce tablo pour les autres sub...!!

Quand penses-tu?

Edit:
bonsoir Robert,
ok pour çà, Est-ce valable également dans thisworkbook??
et merci de ton intervention
Seb

Invité · 24/02/2016, 20h51

Les variables public sont visibles partout donc oui dans l'événement Open

Mais il faut impérativement le placer dans un monde standard

**Sebphyto** · 24/02/2016, 21h19

Bon,

C niquel, ça fonctionne merci à vous deux
Seb

**patricktoulon** · 24/02/2016, 21h24

bonsoir
purée tu met du zeturf partout toi
laisse ca je l'ai fait c'est bon
je te donne un exemple sur ton post

**Sebphyto** · 24/02/2016, 21h31

Salut Patrick,

Rien à voir avec l'autre post....

Et c pas du Ze mais du Geny, tu te rappelles ton fichier "tierceV6"....je l'exploite en ce moment....avec modif car depuis le site à changer un peu, mais c bon ....

je t'accorde que ce qui j'essais de faire n'est pas simple pur moi, mais je persévère...il faut que je croise les deux sites pour récup sur un une chose et l'autre autre chose, pour consigner le tout dans un fauxdoc.....

seb

**Sebphyto** · 02/03/2016, 10h50

Bonjour à tous,
Sujet résolu, mais j'ai un autre souci
quand on a un tablo de ce type

Code :

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

Public tablo(200,5)

sa portée est générale au projet

Mais par contre quand je déclare ce type

Code :

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

Public tablo()

avec dans une sub un Redim
la portée du tablo n'est plus étendu au projet....

Y-a-t-il une solution pour les tablo dynamiques?

Seb

**patricktoulon** · 02/03/2016, 10h57

A lala !! Public taloEt dans une sub ou fonctionRedim tablo(X) Si tu dimentionne un tablo avec ses parenthezes videsIl garde cette dimentionCar meme vide c est une dimention !!!!!! WAGADOUGOU !!!!!!

**Sebphyto** · 02/03/2016, 11h03

Salut Patrick,

Même sans parenthèse, au début du projet, ça ne change rien!!!!
mon tablo est vide à la fin de la procédure, alors que si il est dimensionné c bon

Sinon je le dimensionne au départ, et pour l'exploiter pas le suite, j'y mets un

Code :

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

 If tablo (n,1) <> "" then

seb

Edit:
C un truc de ouff
Même en déclarant en public avec dimensionnement

Code :

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

Public tablo (22,1)

je n'y ai pas accès
alors que j'ai un autre tablo déclaré pareillement et ça fonctionne????
Il y a un truc là

**patricktoulon** · 02/03/2016, 11h17

puré seb Microsoft a du inventer un excel rien que pour toi c'est pas possible

alors :
prends un fichier vierge
met 2 module
dans le module 1 tu va mettre

Code :

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

1
2
3
4
Public tablo
Sub combien_dans_le_tablo()
MsgBox UBound(tablo)
End Sub

dans le modile2 tu va mettre

Code :

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

1
2
3
Sub redim_le_tablo()
ReDim tablo(10)
End Sub

maintenant tu ferme l'editeur vbe

lance la sub Sub redim_le_tablo

ensuite lance la sub combien_dans_le_tablo

wagadougou!!!!!
tu me diras ou tu a acheter ton excel que j'y aille pas