Gestion de courriers

Bonjour,

Voila mon problème, en cherchant un fichier excel qui me permettrait de faire un suivi du courrier arrivée/départ dans mon service, je suis tombé sur une application très intéressante sur un autre forum.

3'744gestion-courrier-v3-4.zip (102.19 Ko)

J'aurai aimé y apporter juste une petite modification: rendre la saisie de l'Id arrivée et départ libre et non pas automatique.

Pourriez vous m'aider s'il vous plait?

Je vous en remercie d'avance

Petu

Bonjour Petula972

Le risque, c'est que tu es le même Id et il faut qu'il soit unique, enfin je pense

A+

Re-,

Tu aurais pu avoir raison mais en fait le courrier que je vais enregistrer est déjà porteur d'un Id. Donc je suis obligé de garder le même.

Cet Id étant généré automatiquement, il n'y a donc aucun risque a mon niveau.

Merci de l’intérêt que tu porte à mon problème

Petu

Re,

Dans ce cas, il suffit d'aller dans VBA Project (ALT+F11)

Sur ton UserFrom : UserFormCourriersArrivés

De faire un clique droit sur ton contrôle : TextIdCourriersArrivés

Et de choisir -> Code (voir copie d'écran)

Tu verras alors 2 lignes qu'il faut mettre en commentaire

Private Sub TextIdCourriersArrivés_Exit(ByVal Cancel As MSForms.ReturnBoolean)
   'TextIdCourriersArrivés.Text = num_id_arrivé 'recharge num_id_arrivé dans le cahmps text en cas de modif
End Sub

Private Sub TextIdCourriersArrivés_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
   'KeyAscii = 0      'empeche la modif du text box (sauf effacé)
End Sub

De même dans l'initialisation du formulaire

Private Sub UserForm_Initialize()

Il faut mettre en commentaire la ligne permettant de calculer l'Id et celle permettant de l'inscrire

   'Call id_courrier_arr
   'TextIdCourriersArrivés = num_id_arrivé

A+

2014 10 08 00h51 23

Bonjour Bruno M45,

Qu'appelles tu "mettre en commentaire"?

J'ai pu arriver jusqu'au code mais après je ne sais plus faire.

Aide moi s'il te plait

Petu

Re,

Je t'ai mis les lignes dans le post précédent

Mettre en commentaire, c'est ajouter un apostrophe devant la ligne de code

A+

Re-,

Je te remercie, j'ai pu y arrivé

Je vais t’embêter encore. Comment puis je faire pour rajouter un cadre de texte dans le userform?

J'aimerai rajouter un cadre "Rang" pouvant être renseigné avec un chiffre compris entre 1 et 15.

Merci encore pour ton aide

Petu

Re-,

ça y est, j'y suis arrivé toute seule comme une grande.

Je te remercie pour ton aide BrunoM45.

Petu

Bonsoir à vous,

Salut BrunoM45 et bon boulot

Merci Petula972 !

Cordialement,

Leakim

bonjour a tous

j'ai télécharger Gestion_Courrier V3.4.xls, je pense qu'il est un outil formidable pour nous facilité le problème de gestion de courrier, mais reste que j'ai un petit problème au niveau de l'application,

les boutons valider et quitter // valider et continuer sont grisâtre, merci de m’aider comment je pourrais les activés

merci d'avance

Rechercher des sujets similaires à "gestion courriers"