XL 2016 Erreur compilation formulaire VBA

[Wayat]

Bonjour,

J'ai un fichier Excel avec une liste de salariés et diverses informations étalées sur plusieurs colonnes.
J'ai créé un formulaire en VBA pour faciliter la saisie de la fiche "papier" vers le tableau Excel.
J'ai créé une macro qui permet d'ouvrir automatiquement le formulaire depuis le tableau Excel en saisissant CTRL+SHIFT+F
Pour créer ce magnifique résultat formulaire + macro, j'ai suivi un tuto sur YouTube.
Toutefois, lorsque je suis sur mon fichier excel et que je veux ouvrir mon formulaire avec ma sélection de touches, j'ai le message " erreur de compilation-erreur de syntaxe".
Est-ce que vous pouvez m'aider ? je ne maîtrise pas les formulaires en VBA
Merci pour votre aide.

 

[pierrejean]

Bonjour Taafs
Vérifie si tous les Textbox de 1 a 29 existent bien !!! (exemple Textbox5)

 

[soan]

Bonjour Taafs, pierrejean,

Ton fichier en retour.

soan

 

[Phil69970]

Bonjour Le forum

Tu n'as pas de textbox N° 4 et les suivants

@Phil69970

 

[soan]

Bonjour Phil,

j'ai pas vérifié cette boucle car j'ai voulu en laisser le soin au demandeur !

j'ai travaillé sur une autre partie du code VBA du formulaire + l'appel
du UserForm : sans un point superflu après vbModeless ! il y avait :

UserForm1.Show vbModeless.

En fait, j'ai réécrit la Sub CommandButton1_Click()

(pour le bouton « NOUVEL AM »)

c'est tellement fouilli ! il aurait fallu nommer correctement, dès le départ,
le ComboBox1 et toutes les TextBox ; ah oui, @Taafs, tu n'as qu'un seul
ComboBox, pas plus ! donc inutile de mettre ComboBox2 !!!

soan

 

[patricktoulon]

re
bonjour
déjà il faudra m'expliquer pourquoi mettre à l'initialyse les textboxs(1 à 29) si existants
en visible =true alors qu'il le sont déjà
dans le pire des cas si le contexte est
mettre les textboxs(1 à 29) si existants a true quand il sont invisibles

For I = 1 To 29
        On Error Resume Next
        Me.Controls("TextBox" & I).Visible = True
        Err.Clear
    Next I

 

[Phil69970]

Bonjour Soan, Pierrejean, Taafs, le forum

J'avais bien vu le . aussi mais j'ai voulu chercher pourquoi ça bloquait quand même et ou .

@Phil69970

 

[soan]

Bonjour Patrick,

je précise que ta remarque est pour la sub UserForm_Initialize()

(avec un « z », et sans « y » )

soan

 

[patricktoulon]

re
@soan yien a fout' !!!!c'est de la marmelade
épitout'facon c'est par le initialise que le formulaire commence

non serieux c'est quoi ça

 ComboBox1.ColumnCount = 1    'Pour la liste déroulante Civilité
    ComboBox1.List() = Array("", "M.", "Mme")

    Set Ws = Sheets("AM Bayonne")    'Correspond au nom de votre onglet dans le fichier Excel

     Me.ComboBox1
   

        For J = 2 To Ws.Range("A" & Rows.Count).End(xlUp).Row
            .AddItem Ws.Range("A" & J)
        Next J

    End With

@Phil69970 faut savoir ce que ta combobox1 doit afficher !!!!! l'array des civilités ou une plage .value

épid'ailleurs' elle est ou cette combo 2
puré !!!!

 

[soan]

ajout : le titre du sujet est : « Erreur compilation formulaire VBA »

➯ j'ai corrigé seulement les erreurs de compilation !!!
j'ai pas cherché à corriger les erreurs d'exécution !

soan

 

[patricktoulon]

re
lol et re lol!!!!
c'est pas des erreurs de compil c'est carrément les object non maîtrisés
il faut remettre notre ami phil69970 sur les bons rails avant de compiler
alors!!!! la combo2 elle est ou?

et c'est quoi cette manie que vous avez de faire des userforms plus grand que l'ecran
vous avez tous des écrans 4k ou quoi ? quelqu'un peut m'en prêter un ???

 

[soan]

@patricktoulon

tu as écrit : « il faut remettre notre ami phil69970 sur les bons rails »

comme la ComboBox2 était déjà dans le fichier initial du demandeur,
je pense que tu aurais plutôt dû écrire :

« il faut remettre notre ami Taafs sur les bons rails »

erreur de pseudo ?

soan

 

[patricktoulon]

re
ouais @Taafs mille excuses philou

et pas de combo2 dans le fichier initial post #1

 

[Phil69970]

Euh....Je suis innocent Mr l'agent, pas la tête, pas la tête ...

 

[soan]

@patricktoulon

oui, tu as raison : j'ai mal formulé ! je voulais dire : la référence à ComboBox2
était déjà présente dans le code VBA initial du formulaire, alors que manque
de pot, la ComboBox2 n'existe pas !!!

@Phil69970 : t'inquiète pas, j't'ai blanchi ! tu finiras pas en cellule !!!

soan