Erreur commandbutton_click

bonjour a tous

dans un classeur excel sur la feuil1 je lance un userform puis je clique sur le bouton

dans ce bouton le code suivant

Call Sheets("Feuil2").CommandButton1_Click

mais a chaque fois que je le lance un message erreur 438 propriété méthode non gérée cet objet

merci pour votre aide

Bonsoir,

que voulez-vous faire ?

Si en cliquant sur le bouton du Userform vous voulez lancer le même code que celui qui est lancé par le bouton de la feuille 2 alors il faut mettre ce code dans un module standard.

Je n'y connais pas grand chose mais je pense qu'il n'est pas possible de lancer un code "privé" qui se trouve sur ue feuille par une action extérieur...

Donc le code du bouton de la feuille aurait un appel de Sub du type:

Call LouReeD

Le code du bouton du USF aurait pour instruction :

call LouReeD

et la sub LouReeD dans un module aurait le code VBA voulu

@ bientôt

LouReeD

Salut Meteo,

Dans ton bouton, Feuil2 et celui de l'Userform :

Private Sub CommandButton1_Click()
'
Call ActionBouton
'
End Sub

Dans le module1 :

Public Sub ActionBouton()
'
With Worksheets("Feuil3")
    .Range("a1").Value = "1"
    .Range("a2").Value = "1"
    .Range("a3").Value = "1"
    .Range("a4").Value = "1"
    .Range("a5").Value = "1"
    .Range("a6").Value = "1"
    .Range("a7").Value = "1"
End With
'
End Sub

Et ça évitera beaucoup d'orages...

A+

Bonsoir et merci pour t’a réponse rapide

Certain dirons que ça doit être à cause de la fatigue mois je dirais que la connerie c le con devant le pc qui l’a fait

Effectivement j’ai mis un private sub au lieu de Public sub

Merci

Bon job