Rendre un bouton non Enabled

Bonjour,

J'ai un formulaire avec des textbox et bouton. Sur le bouton2 je les mis "Enabled" et j'aimerai à l'aide du bouton1 le rendre non Enabled

Je vous remercie d'avance.

Un fichier valant mieux qu'un long discours, veuillez voir la pièce jointe.

Cordialement

Max

23btn-enabled.xlsm (39.36 Ko)

Bonjour

A copier dans le code de l'Userform

Private Sub CommandButton1_Click()
  Me.CommandButton2.Enabled = True
End Sub

Bonjour Banzai64,

Je te remercie super.

Si je peut abuser j'ai un code dans un mudule dont le nom:

Function CalculRib(ByVal CodeBanque As Double, ByVal CodeAgence As Double, _
                   ByVal Numero As Double)

Se code sert a me donné la clé RIB sur la feuille directement, sa fonctionne très bien, mais j'aimerai appelé se code par un formulaire et qu'il s’inscrit dans un textbox.

J'ai mis ceci mais sa ne fonctionne pas?

Public Sub CalculRib()
CalculRib = TextClé
End Sub

Si tu pouvais m'aider sa me rendrai bien service!

Merci d'avance et bonne journée

Max

Bonjour

Avec ton fichier cela serait plus pratique

Tu as une fonction qui s’appelle "CalculRib" Function CalculRib( et un contrôle qui se nomme aussi "CalculRib" CalculRib = TextClé et pour couronner le tout une procédure "CalculRib" Public Sub CalculRib()

Heuuu je ne voudrais pas habiter dans ton fichier c'est le zouk

Re Banzai

Mon fichier joint

Et merci encore

@+

Max

19rib-auto.xlsm (47.24 Ko)

Bonjour

A tester

25max18-cle-v001.xlsm (51.87 Ko)

Re,

Je te remercie beaucoup exactement la recherche. Juste une petite chose en "B1" au lieu d'avoir le N° clé RIB j'ai "#NOM?" peut être que j'ai fait une boulette?

@+

Max

Bonjour

Renommes le module "RIB"

Re,

Excuse moi de ne pas avoir répondu avant. J'avais du monde.

J'ai bien renomme le module mais sa ne change rien a moins QUE?

@+

Max

Bonjour

A voir

22max18-cle-v002.xlsm (51.47 Ko)

Re,

Je te remercie beaucoup sa fonctionne Nickel.

Très bonne soirée.

@+

Max

Rechercher des sujets similaires à "rendre bouton enabled"