Userform

[picronte]

Bonjour,
j'ai un problème dans l'execution de mon userform1 (fiche d'entrée). J'aimerai que si ont oublie de choisir une catégorie (Prioroté1 ou prioroté 2 ......) il me met un message" choisir une catégorie"
merci
Picronte

 

[camarchepas]

Re : Userform

Bonjour ,
Dans le userform en question modifies cette partie de code :

Sub ok_Click()
If x1 = False And X2 = False And X3 = False And x4 = False Then MsgBox "Sélectionner une catégorie de priorité": Exit Sub
Call testlist
End Sub

 

[picronte]

Re : Userform

Re,
Merci Camarchepas,
J'ai encore une question dans mon fichier dans l'onglet Ficheencours Userform1 (fiche tri) je recupaire un N° de fiche qui a été crée et je note l'action à prevoir une date et quand je click sur OK il me transfert la fiche dans synthèse et effece la ligne dans l'onglet ficheencours.
il t-il possible qu'il me la supprime et qu'il me mets automatiquement a jour le N) de la ligne quand je vais créer une autre fiche
Merci
Picronte

 

[picronte]

Re : Userform

Re bonjour le fil
je me permet de relancer le post avec un peu plus d'explications sur mon fichier
Merci
Picronte

 

[herve62]

Re : Userform

Bonjour
Je pense que cette appli n'est pas encore bien ficelé
Je ne connais pas le contexte et je teste :
j'ai choisi une fiche (3) , puis je fais OK et .... ERREUR 13 sur Datepre=DateRetour ???
2eme Essai
idem sauf que je fais "supprimer" avant et idem erreur mais à la 1ere variable Datedec=Date1
Faudrait peut-être verrouiller les mauvaises manip ? ou alors c'est peut-être qu'une utilisation stricte perso !
alors là faudrait une notice ??

 

[picronte]

Re : Userform

Bonjour herve62 et le fil
le fichier fonctionne correctement mais je voulais savoir si il y avait une possibilité de l'améliorer. si vous choisissez la fiche 1 il mets automatique le reste sauf les actions. et quand vous cliquer sur ok il transfert les données dans l'onglet synthèse et efface la ligne dans l'onglet ficheencours. je voudrais savoir si il y un code pour décaler les autres lignes vers le haut.
Merci picronte

 

[camarchepas]

Re : Userform

Bonjour ,

Ex : pour la suppression de la ligne 1

Rows("1:1").Delete Shift:=xlUp

 

[picronte]

Re : Userform

Bonjour le fil.
je suis dans la panade. je n'arrive pas
Picronte

 

[camarchepas]

Re : Userform

Bonjour ,

Oui , à priori même pas à écrire ????

a quoi n'arrives-tu pas ?

 

[picronte]

Re : Userform

Bonsoir,
effectivement je bloque. je n'arrive pas a mettre votre code ca bloque et ne change pas le numero dans l'onglet "fiche" En I25 que j'ai besoin pour créer une autre fiche.
Picronte

 

[picronte]

Re : Userform

Bonsoir le fil,
Je suis toujours sur mon fichier et je n'arrive toujours pas à obtenir ce que je souhaite. avez-vous une idée et es possible?
sinon j'abandonne
Merci
à tous
picronte