Erreur sur userform

Question

Tout d'abord j'espère que vous et vos proches allez bien. Je profite (malgré moi) du confinement pour m'améliorer sur excel et en vba, je rencontre le message suivant lorsque je valide des données sur mon formulaire. J'ai regardé différents fichiers et honteusement plagié certains fichiers. voici les messages d'erreur qui apparaissent : Erreur d'éxecution '-2147024809 (80070057) objet spécifié introuvable puis ma ligne d'erreur : .Cells(Dl, x).Value = Me.Controls("TextBox" & x).Value je vous joints mon fichier. Merci à vous et de votre temps...

Steelson · Answer

Personnellement je préfère dédier un onglet à la saisie voir exemple https://www.excel-pratique.com/fr/telechargements/utilitaires/excel-formulaire-no438...

LouReeD · Answer

C'est bien beau de copier mais faut-il comprendre ce que l'on copie ! Dans une boucle comme celle-ci : For x = 1 To 40 .Cells(Dl, x).Value = Me.Controls("TextBox" &amp; x).Value Next x Il y a une variable "X" qui va prendre successivement les valeurs de 1 à 40. Ensuite l'instruction Controls permet de rendre "variable" le nom des contrôles de USF dans les boucles, du coup vous récupérez les valeurs des contrôles qui vont du TEXTBOX1 au TEXTBOX40 hors regardez l'image ci-dessous : Il n'y a pas de TEXTBOX1 ! d'où l'erreur... Il n'y a pas le 2, n'y le 3 n'y le 4, mais ils commencent à 5 ! Le 5 est en bas de liste après le 40. @ bientôt LouReeD...