[Résolu] Problème de constante lors de la compilation

[Carnage029]

Bonjour à tous, j'ai un petit soucis,
Je souhaite définir un tableau en VBA qui à une taille dépendant du nombre de lignes non vides dans une feuille :

Je vous met ma formule ici,

 Sheets("Main").Select
 Dim col As Integer
 
 col = Application.WorksheetFunction.CountA(Columns(2)) - 6
 Dim mytab(1 To col - 1)

Cependant j'ai une erreur qui me dit "Constante requise"

Connaissez vous la solution ?

Merci beaucoup à vous

 

[Pierrot93]

Re : Problème de constante lors de la compilation

Bonjour,

regarde ceci :

Dim col As Long, mytab()
col = Application.WorksheetFunction.CountA(Columns(2)) - 6
ReDim mytab(1 To col - 1)

bon après midi
@+

Edition : bonjour Jean-Marcel

 

[Carnage029]

Re : Problème de constante lors de la compilation

Les deux solutions fonctionnent merci à vous