XL 2019 mise en forme du code vba

defre

XLDnaute Nouveau
bonjour, je suis novice en matiere de VBA, j'ai recupere un code pour automatiser les sondes ( fioul et eau potable) de ma barge et les transformer en M3 avec une correction pour le trim (avant-arriere) et le heel ( droite -gauche).
apres beaucoup d' essaie et de prise de tete il fonctionne enfin. par contre je pense que la forme n'ai pas faite dans les règles de l' art.
pourriez vous me dire ce que vous en pensé.

merci a vous.
ps: désolé pour les accents je suis sur un qwerty et la correction ne marche pas tout le temps
 

Pièces jointes

  • SOUNDING TANK PROTIS .xlsm
    137 KB · Affichages: 25
Solution
Bonjour,
Remplacez :
VB:
UserForm1.OptionButton(i).Value
par
Code:
UserForm1.Controls("OptionButton" & i).Value
Je n'avais pas testé tout le programme. L'idée était juste de trouver des pistes de réduction de code.
En PJ, c'est corrigé.

defre

XLDnaute Nouveau
Bonjour Sylvanu

hier soir j'ai mis en forme mon fichier avec tes codes (que le FO) , je ne comprend pas car j' ai un message d'erreur de compilation "membre de méthode ou de données introuvable" avec OptionButton surligne en bleu. j'ai cherche hier soir mais sans succès.
je te joint mon fichier au cas ou tu puisse faire quelque chose.
 

Pièces jointes

  • SOUNDING TANK PROTIS essai .xlsm
    133.3 KB · Affichages: 3

sylvanu

XLDnaute Barbatruc
Supporter XLD
Bonjour,
Remplacez :
VB:
UserForm1.OptionButton(i).Value
par
Code:
UserForm1.Controls("OptionButton" & i).Value
Je n'avais pas testé tout le programme. L'idée était juste de trouver des pistes de réduction de code.
En PJ, c'est corrigé.
 

Pièces jointes

  • SOUNDING TANK PROTIS essai (V5) .xlsm
    135.5 KB · Affichages: 4

Discussions similaires

Statistiques des forums

Discussions
312 329
Messages
2 087 335
Membres
103 520
dernier inscrit
Azise