Verification du code

Bonjour tout le monde,

dans le fichier ci-joint, j’ai créé un UserForm qui m’aide à enregistrer mes régimes.

Alors j’ai réussi à faire fonctionner le tout, même si le code me parait trop long.
Ensuite, c’est mon avis !

De ce fait je vous serai très reconnaissant de bien vouloir vérifier cela et me donner votre avis.

Je vous Remercie d’avance pour votre aide.

Cdt Rubis57
Classeur2.xlsm (60,8 Ko)

Bonjour,

Oui, il est opérationnel
Cependant pour le simplifier, il suffit de faire une condition sur le choix de la colonne par rapport au
trois options
Classeur2 (1).xlsm (47,6 Ko)

Bonjour,

Merci d’avoir vérifié. C’est rassurant.

Par contre tu veux bien m’expliquer ou modifier ta suggestion STP.

A+

Re,
C’est dans le code

If Me.OptionButton1 = True Then
      col = 6  'Sheets("REPAS THERAPEUTIQUES").Range ("F")
    ElseIf Me.OptionButton2 = True Then
      col = 10 'Sheets("REPAS THERAPEUTIQUES").Range ("J")
    ElseIf Me.OptionButton3 = True Then
      col = 14 'Sheets("REPAS THERAPEUTIQUES").Range ("N")
    End If
  

ainsi au lieu de repéter 3 fois la même opération, le choix se fait au départ en choississant la colonne à renseigner
Le reste reste inchangé mise à part au lieu d’utiliser Range, j’utilise Cells(N° ligne, Col)

ws.Cells(11, col).Value = Me.TextBox2.Value
1 « J'aime »

Re,

IMPECCABLE. Merci beaucoup à toi pour la vérification et tes changements. :+1:

Même si ma macro n’est pas le Top, mais j’arrive à faire fonctionner. Ensuite j’ai toujours peur en écrivant les codes qu’il y ai des BUGS !

Pour l’instant j’ai été épargné. :crossed_fingers: :crossed_fingers:

A bientôt
Rubis

Re,
Justement, c’est les « BUG’s » qui font progresser, là il faut se creuser le tête :thinking:

Oui, tu as raison. En faisant les erreurs on apprend.

A+

Rubis

Ce sujet a été automatiquement fermé après 30 jours. Aucune réponse n’est permise dorénavant.