Rapport de message :*
 

Re: Userform

Titre du sujet : Re: Userform
par Guy le 13/05/2010 16:51:38

Bonjour Mishka,

Petit classeur exemple avec code commenté.

J'ai ajouté une plage dynamique portant le nom "DATA" pour les besoins de la cause. Cette plage s'étend de la colonne A (N°) à la colonne E (N° de carte) et est définie par

=DECALER(BD!$A$1;;;NBVAL(BD!$A:$A);5)
J'ai éliminé la procédure à l'ouverture du classeur
Private Sub Workbook_Open()
Userform2.Show
End Sub
 
et l'ai remplacée par un bouton sur la feuille BD. Aussi j'ai renommé UserForm2 en frmSaisie ainsi que tous les TextBox histoire d'y voir plus clair. Le classeur aussi a été renommé.

Le code est simple et commenté mais il reste à ajouter des validations aux zones de texte. Par exemple une validation du no. de carte, une validation du format de date, etc. Ce sera pour une prochaine mouture.

En attendant jette un oeil au code et teste la chose. J'attends ton avis pour la suite.

Cordialement,

Guy

Édition : Oups, je viens de voir quelque chose. Il manque une directive Option Explicit dans le code des feuilles de calcul. Aussi pour t'assurer de toujours poser cette directive quel que soit le module de code voici la marche à suivre.

Dans l'éditeur VBA Menu Outils/Options... Onglet Éditeur, case à cocher "Déclaration des variables obligatoire"

Ainsi tu n'auras plus à te soucier d'ajouter cette directive, elle le sera automatiquement. Que du bonheur