[VBA] Pour la beauté du code et parce qu'il vient de loin

[Staple1600]

Bonsoir à tous


Ce petit message pour un partage de code VBA

(Merci aux marmottes ... pj )

Je vous encourage donc à tester la pièce jointe.

J'ai été bluffé par le code VBA (glané aujourd'hui sur le net) , et je mesure ainsi le chemin qu'il me reste à parcourir en VBA .

Apparemment il faut au moins Excel 2000

(et cocher Microsot Forms 2.0 Library dans VBE)

PS: je ne suis pas l'auteur du code contenu dans le classeur
j'ai juste crée le joli bouton sur la feuille 1 qui lance la macro.

Faites moi savoir, svp, si tout comme moi , vous avez été bluffé par ce code VBA.

 

[Excel_lent]

Re : [VBA] Pour la beauté du code et parce qu'il vient de loin

Salut Staple (sans oublier les autres)

J'ai été bufflé jusqu'à ce que je décoche la "Déclaration de variables obligatoire" dans l'éditeur. Joli code (le fond et la forme sont traités).

 

[Staple1600]

Re : [VBA] Pour la beauté du code et parce qu'il vient de loin

Bonsoir Excel_Lent

jusqu'à ce que je décoche la "Déclaration de variables obligatoire" dans l'éditeur

Tu veux dire que lorsque c'est coché , ca buggue?

Sur mon poste, c'est décoché, et donc pas eu de problème lors du test du code.

 

[Excel_lent]

Re : [VBA] Pour la beauté du code et parce qu'il vient de loin

Re,

Effectivement. Lors de la création de l'USF, la ligne Option Explicit
s'ajoute en fin de code et provoque une erreur.
Si on la supprime, on se retrouve avec un deuxième Userform, puis un troisième ... et l'effet est surprenant.

Remarque, il te suffisait de cocher pour tester !