Creation UserForm / Excel
Résolusebastiengillot Messages postés 57 Statut Membre -
J'ai créé un planning sur de charge de travail sur Excel. Je l'ai ensuite mis en réseau sur 3 postes pour 3 utilisateurs différents.
=} Jusque là ça va bien.
Je voudrais par contre créer un UserForm ou quelque chose comme ca pour facilité la rédaction d'un nouveau rendez vous et qu'il puisse s'insérer à une date donnée.
=} J'ai donc créé ce petit essai qui correspond à ce que je souhaite faire :
http://www.excel-online.net/index2.htm
Le problème, c'est qu'il ne fonctionne pas. Lorsqu'on lance la compilation, le code du bouton de la feuille Excel est plein d'erreur.
J'en cherche d'autre de ce style mais sans aucun résultat positif depuis plusieurs jours.
Je vient donc a votre aide pour m'aider à résoudre ce problème.
Je vous remercie beaucoup par avance des réponses que vous m'apporterez.
Cordialement;
Sébastien
- Creation UserForm / Excel
- Liste déroulante excel - Guide
- Word et excel gratuit - Guide
- Creation compte gmail - Guide
- Création site web - Guide
- Création compte google - Guide
64 réponses
Un planning de charge créé dans Excel est partagé sur trois postes et l’utilisateur souhaite ajouter via un UserForm des rendez‑vous à une date donnée.
L’essai d’un exemple en ligne entraîne des erreurs de compilation, liées à la compatibilité des contrôles ActiveX du calendrier (MonthView) selon les versions d’Office et les postes.
Différentes solutions ont été explorées, notamment l’installation d’un contrôle calendrier alternatif, le passage à une version d’Office plus récente et la réduction du volume de contrôles TextBox, qui dépassait 2500 et générait des lenteurs.
Le bilan actuel indique des progrès sur le prototype local et un test du réseau sur les trois postes prévu prochainement, le fonctionnement local étant jugé satisfaisant.
Il fait 1.5 MO je l'ai donc compressé
en .rar ici, : https://www.cjoint.com/?huwQ0N0P01
et en .iso là, : https://www.cjoint.com/?huwSMJbVoC
Bonne nuit.
En attendant votre réponse pour le calendrier, voici le fichier selon votre demande ( j'ai accès à tout le classeur, à toutes les fonctions. Pour contrôle.) : https://www.cjoint.com/?hvqd6pHPTt
Salutations.
Le Pingou
J'ai fais plein de modif à ne plus m'y retrouver. Rassurrez vous, c'est sur une ancienne version.
Cela car je n'arrive pas à mettre le calendrier. Je cherche encore un peu, et je vous reposte un message. Je pense que comme j'ai installer Excel 2007 partout, car impossible de trouver l'objet calendrier sur le 2003, je vais travailler seulement en 2007
CDLMNT
Eh bien, si vous n'avez rien trouvé selon (l'avez vous fait ?) : https://forums.commentcamarche.net/forum/affich-18315694-creation-userform-excel?page=2#61
C'est tout simplement l'installation de MS Office 2003 et 2007 qui n'est pas compète sur les postes.
Aucune nouvelle installation est nécessaire, il vous suffit d'ajouter les composants manquants et c'est tout.
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre questionJe pense dernier petit problème, quand j'ouvre le prog de planning j'ai un débuggage sur la ligne : Sheets("Meslistes").Range("ident").Value = "Autoriser" {dans le This Workbook}
Je clic sur Fin, je m'identifie, je cré un rendez vous, et quand je clic sur "Ok, enregistrer un rendez vous", j'ai une erreur sur la feuille de l'utilisateur. A la ligne : Cells(livi, 1) = num_sem(Me.tbxrdv) 'numéro de la semaine.
J'ai controlé, j'ai le même problème avec tous les utilisateurs et que je me connecte avec n'importe quel mot de passe.
Je viens de tester la version [sebastiengillot_ccm_essai_4.xls] et aucunes fautes se produit.
Avez-vous modifié des éléments, à défaut faite moi parvenir le classeur qui vous utilisez !
Concernant, C'est ok j'ai fait ça pour remettre le calendrier
Quel calendrier avez-vous installé ?
Je n'ai pas modifier la version du prog. J'utilise bien le 4 aussi.
Je pense que ça vient de la protection des feuilles par "toto" car le message me dit : Veuillez oter les protection de la feuille..
Ouffff.
En faite quand je me connecte avec un ID c'est ok. Et moi je fesais après m'etre identifié avec par exemple Alain, je cliquais sur la feuille "Accueil", et je m'identifiais avec un autre user. Et c'est là, à l'enregistrement des rdv que ca buggais.
Donc pas de soucis car on ne l'utiliseras jamais comme ça.
Cdlmnt.
Merci pour l'information.
J'ai repassé tous les codes et aussi supprimer se qui n'était pas nécessaire.
A propos de la protection des feuilles, je l'ai supprimé car elle n'apporte rien de plus, sinon des encoubles selon se que fait l'utilisateur.
Par contre, ce qu'il serait bien de protéger c'est la partie procédure (VBA), ceci est à vous de décider.
Voici la version mise à jour : https://www.cjoint.com/?hwo5Hfv6kD
depuis le temps....
Excusez moi je n'avais plus d'accès à internet. Je suis en procès avec Orange....
Bref...
La version mise à jour est ok.
Je voulais savoir si ont pouvais juste mettre un contrôle pour modifier un rendez vous.
Par exemple, si on clic sur la date d'un rendez-vous, l'userform réapparait pour être modifié.
Le seul dernier truc est que je n'arrive pas a déplacer la commande pour s'identifier sur la feuil 1. Cela car quand on n'ouvre le classeur, il marque que l'objet est en dehors de la feuille.
voilà.
Sinon tout est ok.
Cdlmnt
ok pour la modif c'est parfait. Merci beaucoup.
Par contre avec l'ID "courrousse" le bouton {entrer un nouveau rdv} et le bouton {exit} ne fonctionne pas.
Et avec l'ID "gillot", le bouton {entrer un nouveau rdv} ne fonctionne pas.
Sinon c'est ok.
Merci encore beaucoup.
Je viens d'installer le programme sur les postes du garage.
Il y-a les derniers soucis suivant :
Le classement des rendez vous. Il s'effectue sur la date. Or, il les classe par le premier nombre. Donc il place le 25/09/2010 avant le 30/08/2010.
Du coût, j'avais la semaine 34 avant la 32.
==} (Pour cela j'ai remplacer la valeur de Columns(2) par Columns(1). Il tri maintenant bien suivant les numéro de semaine. Mais toujours ce problème de date.)
Maintenant, j'ai par exemple le jeudi avant le mardi.
=} Il faudrait pouvoir mettre une deuxième condition de tri après celle des semaine.
----------------------------------------------------------------------
J'aimerais également mettre en place plus de 3 formes conditionnelles (52 en faite). Je voudrais que tout les rendez vous d'une même semaine se remplisse en une couleur différente d'une autre semaine. (52 couleurs ou boucler une dizaine de couleurs)
----------------------------------------------------------------------
Est ce que l'on peut en même temps, rajouter une feuil qui s'appellerais "supervision". Avec sur la feuille, lorsque l'on sélectionne le numéro de semaine, il affiche tous les rendez vous de la semaine sélectionner.
Bien sûr, en y-intégrant les rendez vous de tous les utilisateurs.
Le droit de regard sur cette feuil serai autorisé pour tous les utilisateurs.
===} voir essai de ma feuil.
Merci encore et déjà pour tout...
Seb
Merci de prendre cette version : http://cjoint.com/data/issVy6tMJM.htm
Concernant le tri, se doit être sur la date, chez moi c'est correct.
Comment avez-vous fait ?
------
Concernant la mise en forme conditionnelle des semaines, je vous propose l'alternance de 2 couleurs (semaine paire et impaire).
Merci de votre décision ... !
------
Oui pour la feuille [supervision], une fois les données sur cette feuille elles sont supprimées sur les collaborateurs ? OUI ou NON
A qu'elle moment le transfert sur la [supervision] ...... ?
Merci de votre décision ... !
Salutations.
Le Pingou
Pour la feuille, non il ne faut pas supprimer les rdv des collaborateurs une fois transférer.
Je pense qu'il faut les transférer en temps réelle après avoir cliquer sur Valider. (Voir, l'essai en lien) :
http://cjoint.com/data/isxuASrLIo.htm
Est-ce dans le bon sens : http://www.cijoint.fr/cjlink.php?file=cj201008/cijn3g7jMX.xls
Salutations.
Le Pingou
oui cela parait impec.
voici 2 ou 3 bug constaté mais normal car ce n'est pas la version final :
--- Entrer d'un nouveau rdv. Si ont utilise le point du pavé numerique il créer un bug.
--- En modification de rdv c'est égal
--- J'ai fait un essai en ajoutant un rdv semaine 42 (je crois) et il n'apparait pas dans la liste "supervision"
--- Reste le classement des rdv. Par semaine OK. Mais il reste la deuxième key par date.
sinon je pense que tout sera impec.
Merci encore pour cette aide très précieuse.
Sinon il n'y a pas de soucis avec l'autre. J'ai mis les rendez vous de coté.
Merci encore.
Enormement.
Concernant :
--- Entrer d'un nouveau rdv. Si ont utilise le point du pavé numérique il créer un bug.
Merci de préciser où est entré le point ??Note : un bug ne veut rien dire, c'est du blabla, il est plus efficace de dire. Il y a un message d'erreur 1005 et le débogage affiche ......
Quand on tappe dans les temps de carrosserie et peinture 2.5 et 3.6 par exemple, quand on clic sur ok, il me marque : 13 {incompatibilité de type}
Là il marque le rendez vous sur le planning sans les temps.
Ensuite quand je fais "modifier un rdv" j'entre alors les temps 2,5 et 3,6 puis je fais ok et la il me marque :1004 {'Range de l'objet'_Global' à échoué}
et là il me marque les temps sur le planning mais sans les dixième et centième.
Juste en unité.
En esperant vous éclairer...
Ceci en attente de la réponse au message du poste précédent.
Salutations.
Le Pingou
Le seul complément que j'ai trouvé à ajouter c'est : Controle Calendrier 2010.
Maintenant j'ai bien le calendrier de la fenêtre "boite à outil" (que je n'avais pas avant), mais le prog ne fonctionne toujours pas.
Je vais essayer sur un autre poste.
Décidément il est difficile d'avoir une réponse exacte du style : je n'ai pas le contrôle [Microsoft MonthView Control, version 6.0] :
Avez-vous au moins trouvé ceci : [https://www.cjoint.com/?hvrAcD1QKy
Maintenant j'ai bien le calendrier de la fenêtre "boite à outil" (que je n'avais pas avant), mais le prog ne fonctionne toujours pas.
Qu'elle programme ne fonctionne pas ?
Et qu'elle est le message d'erreur ?
Envoyez-moi le fichier qui ne fonctionne pas !
Salutations.
Le Pingou
Mais pas les propositions d'après.
Je vais un point clair et net demain et je reposte un message ensuite.
Cdlmnt
Merci beaucoup du mal et de la patience que vous m'accordez.
Si j'ose me permettre, utilier cette version : https://forums.commentcamarche.net/forum/affich-18315694-creation-userform-excel?full#63
et je supprimerais toutes les autres.
A la limite vous pouvez me contacter par MP via mon profil !
Bon courrage.
Salutations.
Le Pingou