déclaration type Public

[gaël92]

Bonjour,

je souhaite déclarer une variable de type Tableau As String comme étant une variable Public pour pouvoir l'utiliser dans plusieurs procédure.
Or un message d'erreur apparait disant : "Des constantes, chaines de longueur fixe, tableaux, types définis par l'utilisateur et instructions Declare ne sont pas autorisés comme membres Public de module d'objet."

Quelqun aurait une solution ?

Merci d'avance

 

[sylvanu]

Bonsoir Gael,
Essayez cette PJ avec :

Public Tableau_Equipement(0 To 6, 0 To 10)
Sub Essai()
On Error GoTo Fin
Dim i As Integer, j As Integer
For i = 0 To 6
    For j = 0 To 9
        Tableau_Equipement(i, j) = 10 * i + j
    Next j
Next i
[B5] = " Pas d' Erreur rencontrée"
Exit Sub
Fin:
[B5] = " Erreur rencontrée"
End Sub

Chez moi ( PC XL2007 ) ça marche.
MS dit qu'un tableau peut être déclaré en Public :

Déclaration de tableaux (VBA)

Rubrique de référence sur Office VBA

docs.microsoft.com

Les constantes, chaînes de longueur fixe, tableaux, types définis par l’utilisateur et instructions Declare ne sont pas autorisés en tant que membres Public d’un module d’objet

Rubrique de référence sur Office VBA

docs.microsoft.com

Addon : J'ai testé en mettant la macro dans une feuille. C'est interdit.
Vous devez déclarer votre array public dans un module standard.
Par contre une fois déclaré dans un module standard, vous pouvez l'utiliser dans une feuille.

 

[Dranreb]

Bonsoir.
Information: Dans un module objet (Worksheet, ThisWorkbook, UserForm, ou module de Classe) une variable Public en devient une Propriété. Elle ne peut être utilisée à l'extérieur du module sans préciser devant le nom de l'objet suivi d'un point.
J'ignore la raison des restrictions de types. On peut les contourner en les déclarant Private et en les transférant à l'aide de procédures Property.
De même d'ailleurs une Public Sub en devient une méthode.

 

[dysorthographie]

Bonjour,
Le message d'erreur est très clair !

Il est interdit de créer une variable tableau comme public dans un module objet.

Ajouter un module standard à ton projet pour y créer ta variable public.

 

[patricktoulon]

bonsoir a tous
a ben en voila une bien bonne j'ai deja vu cette erreur dans les conditions
le message est clair c'est le dimensionnement qui n'est pas possible en public pas la variable tableau

c'est facilement contournable

public levraitoto as variant

sub machinchouette()
dim lefauxtoto(0 to 6,0 to 10)
for i= 0 to ...blablabla
for c= 0 to 10
lefauxtoto(i,c)="ligne " & i & "-"col " & c
next
next
levraitoto =lefauxtoto
end sub

'dans une autre sub dans un autre module
sub test()
msgbox levraitoto(0,0)
next

si la variable appartient a thisworkbook thisworkbook. devant
si c'est une feuille feuil1. devant
pareil pour un userform (attention ici lors du unload la variable est vidé )même si elle a été chargée avant le load
démonstration
tentative dans le module de la Feuil1

tentative a dimensionnement différé

 

[dysorthographie]

bonjour Patrick,
faut, le problème vient du fait qu'il est interdit déclarer un tableau comme public dans une classe!

dans ton exemple tu ne déclare pas un tableau mais un variant.

 

[gaël92]

Merci pour vos réponses. Mon problème est résolu.