Erreur de compilation : constante requise
Sir_Mattou
Messages postés
10
Statut
Membre
-
f894009 Messages postés 17417 Date d'inscription Statut Membre Dernière intervention -
f894009 Messages postés 17417 Date d'inscription Statut Membre Dernière intervention -
Bonjour,
Je créé actuellement une macro pour automatiser des feuilles de calcules. Je ne m'y connait pas vraiment en VBA, soyez indulgents plz :)
Voici un programme simplifié pour expliquer mon problème :
Lorsque je lance la macro, j'obtiens le message d'erreur erreur de compilation : constante requise , et on me renvoi sur le code de la macro avec dimen surligné à la ligne 10.
Quelqu'un aurait une solution ?
Je créé actuellement une macro pour automatiser des feuilles de calcules. Je ne m'y connait pas vraiment en VBA, soyez indulgents plz :)
Voici un programme simplifié pour expliquer mon problème :
Sub Macro4()
' Macro4 Macro
Sheets(3).Select
Dim dimen As Integer
dimen = 10
Dim tableau(dimen) As String
For i = 0 To (dimen - 1)
Cells(i + 1, 2) = i
tableau(i) = compteur
compteur = compteur + 1
Cells(i + 1, 1) = tableau(i)
Next
'
End Sub
Lorsque je lance la macro, j'obtiens le message d'erreur erreur de compilation : constante requise , et on me renvoi sur le code de la macro avec dimen surligné à la ligne 10.
Quelqu'un aurait une solution ?
2 réponses
-
Bonjour,
Sub Macro4() Dim dimen As Integer Dim tableau() As String Sheets(3).Select dimen = 10 ReDim tableau(dimen) For i = 0 To (dimen - 1) Cells(i + 1, 2) = i tableau(i) = compteur compteur = compteur + 1 Cells(i + 1, 1) = tableau(i) Next End Sub -
Merci f894009 de ta réponse rapide.
J'ai réussi à faire fonctionner mon programme avec ton code, en modifiant la ligne 3 :
Dim tableau() As String
devient :
Dim tableau()
merci encore ;)