variable Ubond non définie

Bonjour,

J'ai besoin d'une petite aide.

Dans un userform, je souhaite initialiser un tableau pour charger les valeurs saisies.
Cependant dans la déclaration de tableau, le système n'accepte pas ma variable NB_Coques , il dit "Erreur de compilation constante requise".
ma variable est déclarée en public dans le module d'appel

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13

' dans le module d'appel Public Nb_Coques As Integer ....   Private Sub CommandButton1_Click() Nb_Coques = ThisWorkbook.Sheets("Data").Range("B2") Dim Tab_Source(1 To Nb_Coques, 1 To 2)   For i = 1 To Nb_Coques Tab_Source(i, 1) = Me.Controls("Coque_" & i).Value Tab_Source(i, 2) = Me.Boite.Value Next i

---

Merci pour vos conseils.
Denis

On ne peut pas mettre une variable dans un Dim.
C'est pour ça que TOUS les Dim doivent se mettre en premier dans un Sub, avant toute autre instruction.

Il faut mettre une valeur "au pif" dans le Dim et le faire suivre d'un Redim.

Code:

---

1 2	Dim Tab_Source(1, 1 To 2) ReDim Tab_Source(1 To Nb_Coques, 1 To 2)

---

Bonjour Denis,

Je ne comprend pas trop le besoin d'utiliser une variable pour Nb_Coques.
Vous pourriez très bien boucler sur chaque textbox de votre userform p, si nom correspond à coquesX mettre la value dans un Array pour ensuite la passée dans un tableau structuré par Exemple.

Pourriez-vous nom donner le but de votre userform ? Une solution autre pourrait vous être proposée ici ?

Je vous conseil notament de consulter le tuto ci-dessous.

https://fauconnier.developpez.com/tu...eau-structure/

Merci à vous deux.

Bon à savoir que dim n'accepte pas de variable.

Et oui, je vais boucler peux boucler sur mes controls du USF pour déterminer la taille du tableau.

en tous cas re MERCI
Denis