Bonjour ! Ecrire "ça marche pas bien" ne suffit pas, c'est mieux d'expliquer ce qui ne fonctionne pas et où dans le code …
Sinon j'ai un méchant doute, le code exposé à l'air de se situer dans un simple module au lieu de celui de l'userform, non ?
Dans l'userform, il devrait y avoir un bouton pour valider la saisie des données comme classiquement un bouton OK et,
en double cliquant sur ce bouton dans la fenêtre de modification de cet userform depuis l'éditeur VBA,
l'évènement Private Sub OK_Click doit être activé dans le module de code de l'userform
dans lequel devrait être codé l'alimentation du tableau avant de fermer l'userform (Unload) …
A moins que cet userform ne soit simplement masqué via la méthode Hide,
dès lors de retour dans la procédure ayant appelée l'userform, le tableau devrait s'alimenter comme ceci :
Tableau(n°élément) = NomUserform.ChampUserform
Maintenant dans le code exposé, j'y verrais bien des problèmes de logique …
- Déclaration de la variable CmdMag en String, donc en simple chaîne de caractères,
puis tentative d'utilisation dans la boucle en tant que tableau ‼
Voir l'instruction Dim, même ReDim, et leurs exemples, dans l'aide intégrée du VBA …
- Pas d'appel d'un userform (NomUserform.Show).
- La boucle servirait à alimenter les même données dans l'intégralité du tableau !?
- CmdMag(1, j) = "Bdc- & j" à corriger comme ceci : CmdMag(1, j) = "Bdc-" & j
Message édité par Marc L le 17-12-2012 à 11:26:04
