Discussion :

[websurfeur]

Bonjour,

Tout d'abord vous devez savoir que je suis sous Excel 2003.
Je souhaite passer un tableau à deux dimensions à une procédure. J'ai essayer de déclarer cette procedure comme suit :

Code :

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

1
2
3
 
public sub maProcedure(ByRef monTableau(,) as Variant)
end sub

mais quand je fais enter pour aller à la ligne suivante il m'affiche cette erreur :

Code :

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

1
2
3
 
Erreur de compilation:
Attendu : )

Je ne sais pas comment faire pour résoudre le problème !

Merci d'avance pour vos réponses

[Le Pharaon]

Pourquoi la virgule ?

public sub maProcedure(ByRef monTableau(,) as Variant)
end sub

[méphistopheles]

:

Code :

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

1
2
3
 
public sub maProcedure(ByRef monTableau(,) as Variant)
end sub

En effet, la virgule est inutile, mais de plus, si tu le déclare as variant, le() est inutile.
tu peut donc le déclarer:

Code :

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

1
2
3
 
public sub maProcedure(ByRef monTableau as Variant)
end sub

et si tu veux être sûr qu'il y as deux collones, tu met:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
 
public sub maProcedure(ByRef monTableau as Variant)
dim i as integer
on error goto suite
for i=1 to 3
   debug.print Ubound(montableau,i)
next i
suite:
if i<>3 then 
   msgbox "le tableau entré en paramètre est incompatible"
   exit sub
end if
 
end sub

salut

[websurfeur]

Merci pour vos réponses, cela m'a permis d'avancer !