Message d'erreur dans un UF

[brocbroc]

Bonjour à tous,
J'ai un problème avec mon UF, merci de votre aide.
PJ

 

[PascalXLD]

Re : Message d'erreur dans un UF

Bonjour

et bien tout d'abord tes variables ne sont pas déclarées

il faut le faire du style

Dim LeTexte As String

et tu fais appel à ParametresHtml mais il ne trouve pas une procédure de ce nom

 

[brocbroc]

Re : Message d'erreur dans un UF

Bonjour Pascal, peux tu être plus claire car dans ce secteur je suis pour le moment un débutant, merci

 

[PascalXLD]

Re : Message d'erreur dans un UF

Re

dans ce code

Private Sub UserForm_Initialize()
LeTexte = "Aime la vérité, pardonne l'erreur. Voltaire - Ama la verdad, pardone el error. Voltaire - Like the truth, forgive the mistake. Voltaire"
LaCouleur = "#FFFFFF"
ParametresHtml
End Sub

Dans ce code les mots en bleu sont des variables que tu initialises ici. Mais comme tu as l'option "Déclaration de variables obligatoires" qui se traduit par "option explicit" de marqué en haut de ton code il faut les déclarer

Donc après
Private Sub UserForm_Initialize()
il faut ajouter
Dim LeTexte as string
qui veut dire que tu declares La variable LeTexte comme du texte(string)

Ensuite tu appeles ParametresHtml. Mais c'est quoi cela ? Une autre procédure. Si oui elle n'est pas dans ton code

A suivre