[Excel 2007] macro et erreur de compilation

Résolu/Fermé

samgunsjovirow Messages postés 40874 Date d'inscription samedi 3 mai 2008 Statut Modérateur Dernière intervention 17 février 2023 - 16 févr. 2010 à 18:00
Gord21 Messages postés 918 Date d'inscription samedi 21 novembre 2009 Statut Membre Dernière intervention 20 mars 2013 - 17 févr. 2010 à 18:09

Bonjour,

J'ai suivi de tuto sur Excel: http://www.excel-online.net/index2.htm Le mien porte sur le suivi d'inscriptions à un site.

Seulement, au moment de le tester, j'ai eu un message d'erreur en cliquant sur mon bouton "Nouveau site" équivalent de "Nouveau Client" dans le tuto).

Le message d'erreur que j'ai est: "Erreur de compilation. sud ou Function non définie". Voici le code concerné (c'est la ligne "Private Sub SaisieInfoSit_Click()" qui est surlignée en jaune quand j'ai le message d'erreur):

Private Sub SaisieInfoSit_Click()
'Ouvrir le formulaire de saisie
Worksheets("liste").Rows(2).Select
Selection.Insert
With UserForm1
    .Debut.Text = ""
    .Site.Text = ""
    .PaysFR.Value = False
    .PaysLUX.Value = False
    .URL.Text = ""
    .InsOUI.Value = False
    .InsNON.Value = False
    .Identifiant.Text = ""
    .MotDePasse.Text = ""
    .Cvs.Text = ""
    .motivation.Text = ""
    .Alertes.Text = ""
EndWith
Range("G2") = False
UserForm1.Show
End Sub

Sauriez-vous me dire ce que je dois modifier ou vérifier pour que ça marche?
Merci!

A voir également:

[Excel 2007] macro et erreur de compilation
Erreur 0x80070643 - Guide
Liste déroulante excel - Guide
Si et excel - Guide
Telecharger macro convertir chiffre en lettre excel - Télécharger - Tableur
Word et excel gratuit - Guide

2 réponses

Réponse 1 / 2

Gord21 Messages postés 918 Date d'inscription samedi 21 novembre 2009 Statut Membre Dernière intervention 20 mars 2013 289
16 févr. 2010 à 21:37

Bonsoir,
C'est peut-être le mot Private qui te pose problème. Essaie de le supprimer.
Sinon, le mieux serait de nous donner le lien vers ton fichier (par cijoint.fr par exemple)

samgunsjovirow Messages postés 40874 Date d'inscription samedi 3 mai 2008 Statut Modérateur Dernière intervention 17 février 2023 3 031
16 févr. 2010 à 23:10

En fait le mot Private était mis expressément dans l'exemple du tuto. Si personne n'a d'idée, je tacherais de faire un lien vers mon doc demain.

En attendant j'ai vu que le lien ci dessus ne marchait pas donc voilà le lien direct vers la page du tuto concernée: http://www.excel-online.net/excel2003/userform5.html

Réponse 2 / 2

samgunsjovirow Messages postés 40874 Date d'inscription samedi 3 mai 2008 Statut Modérateur Dernière intervention 17 février 2023 3 031
17 févr. 2010 à 16:22

Finalement c'était un problème de syntaxe (un espace manquant entre End et With et un signe = après key1:)

Gord21 Messages postés 918 Date d'inscription samedi 21 novembre 2009 Statut Membre Dernière intervention 20 mars 2013 289
17 févr. 2010 à 18:09

Ok. C'est vrai que le End With n'est pas correct. Normalement, il est mis en couleur mais les couleurs par défaut de VBA ne sautent pas aux yeux (bleu foncé vs noir), tu peux les modifier dans les options.

Bonne continuation

Discussions similaires

Instagram "Désolé, une erreur s'est produite"

Erreur vidéo inconnue sur le Freebox Player

Free erreur 38 : impossible d'envoyer des SMS

Discussions similaires

Newsletters