Discussion :

[TheRealMike]

Bonjour,

je suis face à un problème de débutant....

je vous l'expose quand même car ca me bloque un peu..

dans une sub,je défini une matrice à partir d'un tableau situé dans une feuille.

dans une autre sub, je voudrais faire apelle à cette matrice que j'ai crée, mais je n'y arrive pas.

Voila le code que j'ai tenté:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Sub creationtableau()
 
Dim maintien(1 To 45, 1 To 37) As Variant
 
For i = 1 To 45
    For j = 1 To 37
    maintien(i, j) = Worksheets("maintien").Cells(i + 2, j + 1)
    Next j
Next i
 
End Sub
 
Sub essai()
MsgBox maintien(1, 1)
End Sub

seulement, dans la deuxième sub, il me dit que "maintien" n'est pas défini.

Pourriez-vous m'aider s'il vous plaît?

[Qwazerty]

Salut
Tu as 3 choix
soit tu déclares ton tableau avec une portée module

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Public maintien(1 To 45, 1 To 37) As Variant
 
Sub creationtableau()
 
For i = 1 To 45
    For j = 1 To 37
    maintien(i, j) = Worksheets("maintien").Cells(i + 2, j + 1)
    Next j
Next i
 
End Sub
 
Sub essai()
MsgBox maintien(1, 1)
End Sub

Mais attention de bien le renseigner avant d'appeler essai.

Soit si Essai est appelé dans la sub création tableau, tu passes ton tableau en paramètre a Essai

Soit si créationtableau est exécuter dans la sub Essai, alors tu fais en sorte que créationessai te renvoi un tableau, tu devras dés lors déclarer CrétionTableau comme etant une Function et non plus une Sub

A++
Qwaz

[TheRealMike]

Merci pour ta réponse,

Mais ca me pose encore probème.

Quand j'exécute, ca m'affiche une erreur :

eurreur de compilation, des constantes, chaines de longueur fixe, tableaux , types définispar l'utilisateur et instruction Declare ne sont pas autorisés comme membres public de modules d'objet.

Y aurait-il une solution?

merci

[Qwazerty]

Salut
Peut etre en le declarant comme ca

Code :

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

Public MonTableau()

Puis dans la procedure tu le redimensionne

Code :

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

Redim MonTableau(1 To 45, 1 To 37)

Tu devrais regarder des tutos sur les définition de variable le cas est certainement énoncé et expliqué.
++
Qwaz

[TheRealMike]

Merci pour tes réponses,

ca marche finalement avec le ReDim.

Mais j'ai encore un autre problème!

je crée quelques tableaux de la même manière :

Code :

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

1
2
3
4
5
6
7
 
Public maintien As Variant
Public proba As Variant
Public table As Variant
Public taux As Variant
Public portefeuille As Variant
Public ages As Variant

ensuite j'ai plusieurs sub qui font toutes appel à ces Variant.

Le problème c'est que tout se passe comme si, au fur et a mesure, les tableaux maintien, proba, etc n'étaient plus en mémoire...je dois donc réexécuter la sub de création de ces tableaux pour pouvoir les utiliser....

Avez-vous une idée pour qu'Excel "retienne" ces tableaux ?

Merci

TRM

[Qwazerty]

Salut
J'ai deja rencontré ce problème, sans en avoir réellement trouvé de solution.
Il semble que les tableaux se "detruise" essentiellement lorsque le code rencontre une erreur (attention aux On Error Resume Next qui masque les plantage du code!) les tableaux sont alors purgés par excel, on observe bien se phénomene en mettant un espion sur le Tableau et en regardant sont comportement au fure et a mesure du code.

Deux choix

Soit effectivement relancer la sub de création du tableau et a ce compte la il vaut mieux travailler avec un tableau de porté Sub

Soit le stocker dans une feuille du tableau que tu prends le soin de cacher.

Il existe peut etre (surrement) d'autres solutions.
++
Qwaz

[TheRealMike]

Au départ, je voulais créer ces tableaux "virtuels" pour que mon code prennent moins de temps.

La solution de réexécuter la sub de création du tableau virtuel n'est pas jouable, cela prendrait beaucoup trop de temps pour mes traitements (milliards d'itérations).

Tu veux dire quoi par "Soit le stocker dans une feuille du tableau que tu prends le soin de cacher". Je réécris mes tableaux dans uns feuille Excel, et je la masque? Est-ce que,au niveau temps d'exécution, le code s'exècutera comme si j'avais des tableaux virtuels?

merci beaucoup,

TRM

[Qwazerty]

Salut
Il faudrait re-transvaser les données stockées en temporaire sur la feuille dans ton Tableau quand tu en as besoin, ce qui sera plus rapide si des calculs sont nécessaires pour la création de cette matrice.
Mais bon peut être y'a t il d'autre solutions a ton probleme, il faut voir ton code pour ca, sans plus d'info il est difficile de proposer quoi que ce soit, on pourrait sans doute te faire 50 propoitions, dont une te plaira ... mais honnetement j'ai pas que ca a faire non plus
Essais de donner un peu plus d'info sur la globalité de ce que tu cherche a faire et sur les tenant et aboutissant de l'utilisation de ce tableau.
A++
Qwaz

[TheRealMike]

Bonjour,

j'ai trouvé ma solution, pour ceux que ca intéresserait.

Il faut déclarer les variables public dans un module et non pas dans une feuille, et toujours dans le même module, mettre les sub de création de ces variables.

Quand il y a un bug dans le code au niveau d'une feuille, parfois il faut relancer le code de création du module, mais pas souvent (ca dépend du type de bug).

Merci.

TRM