(RESOLU par GILBERT)Erreur d'execution 280

[chaelie2015]

Bonjour Forum
je vous sollicite encore, dans ce code j'ai trouvé des erreurs d’exécution 280
Impossible de définir la propriété Value. Valeur de propriété non valide.

Private Sub CommandButton1_Click()

If TextBox1.Value <> "" And TextBox2.Value <> "" Then
call UserForm4.Show                     '<-------------------- a ce niveau !!!!
Sheets("Ouvrage_1").Visible = xlSheetVisible
Sheets("Ouvrage_1").Activate
Unload Me
Else
MsgBox "Désolé, le Numéro de Contrat ou l'intitulé de l'ouvrage non renseigné."
End If
End Sub

puis je avoir votre aide !
Salutations

 

[CHALET53]

Re : Erreur d'execution 280

bonjour,

S'il s'agit d'ouvrir l'userform4 le call est inutile (il doit causer le problème)
a+

 

[gilbert_RGI]

Re : Erreur d'execution 280

Bonjour,

les textbox viennent de quoi ?

 

[chaelie2015]

Re : Erreur d'execution 280

Bonjour,

les textbox viennent de quoi ?

BONJOUR CHALET,GILBERT
LES TEXTBOX DE USF ENCOURS (USF3 contient ces TextBox et le bouton)
SALUTATIONS

 

[gilbert_RGI]

Re : Erreur d'execution 280

ça ne sert à rien de crier (Majuscules)

la reproduction du fichier n'entraine pas d'erreur

peut-être l'userform 4
à voir

sans fichier test difficile à dire

 

[chaelie2015]

Re : Erreur d'execution 280

Re GILBERT
Désolé pour le majuscule
Merci pour la réponse , tu as raison c’était au niveau de UserForm4 que j'avais le bug
Merci encore une fois
Problème Résolut
SALUTATIONS