calendrier | ||
---|---|---|
Inscription: 25/11/2008
Messages:
174
Système d'exploitation: PC Version Excel utilisée: 2007 |
Posté le : 19-10-2009 11h58
bonjour a tous
dans le fichiers suivant dans la feuille"Modéle"en cliquant sur la celulle "F11"cela fait apparaitre un calendrier. je voudrais modifier la macro pour l'étendre a d'autre cellules. quelqu'un peut il me donner la marche a suivre car je ne comprend pas la macro,je suis trop débutant. merci d'avance |
|
|
Re: calendrier | ||
---|---|---|
Inscription: 09/01/2008
De Montréal, Québec
Messages:
463
Système d'exploitation: PC Version Excel utilisée: 97 à 2016 |
Posté le : 19-10-2009 15h07
Bonjour claude40,
Je ne comprends pas bien le problème. La procédure Auto_Open() ajoute un bouton d'affichage du formulaire UserForm2 (le calendrier) dans le menu contextuel "Cell". Ce faisant, ce calendrier est accessible à toutes les cellules avec un clic droit. Contrairement à ce que tu écris, un simple clic dans F11 ne fait pas apparaître le calendrier, c'est un clic droit suivi d'une sélection du dernier bouton de menu qui le fait apparaître. Aussi rien n'empêche d'inscrire une date dans une cellule quelconque et de bousiller ainsi le contenu d'une cellule non prévue pour porter une date. Que cherches-tu à faire au juste? Pour l'instant je ne vois pas. Guy |
|
|
Re: calendrier | ||
---|---|---|
Inscription: 25/11/2008
Messages:
174
Système d'exploitation: PC Version Excel utilisée: 2007 |
Posté le : 19-10-2009 15h25
merci guy de te pencher sur mon probléme.
c'est un double click sur F11 qui fait apparaitre le calendrier de l'userform2, se programme sera utiliser a terme par des gens qui ne sont pas tous forcément alaise avec un ordinateur c pour sa que je simplifie au maximum. se que je fait en double cliquant sur la cellule F11 je voudrais pouvoir le reproduire dans d'autre cellule. merci encore |
|
|
Re: calendrier | ||
---|---|---|
Inscription: 09/01/2008
De Montréal, Québec
Messages:
463
Système d'exploitation: PC Version Excel utilisée: 97 à 2016 |
Posté le : 19-10-2009 15h35
Bonjour,
Effectivement, je n'avais vu que le bouton de menu "Calendar" sur clic droit. Tiens-tu à laisser ce bouton de menu supplémentaire? La procédure qui gère le double clic de la cellule F11 se lit : Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) If Target.Address <> [f11].Address Then Exit Sub UserForm2.Show End Sub À quelles cellules veux-tu appliquer cet affichage du calendrier sur double clic? Tu peux utiliser le mDF_XLCalendar en téléchargement ici. Avec son option Auto Détect. l'activation de toutes cellules au format Date entraîne l'affichage d'un calendrier. Simple comme bonjour. Guy
Edité par Guy le 19/10/2009 15:52:29
|
|
|
Re: calendrier | ||
---|---|---|
Inscription: 25/11/2008
Messages:
174
Système d'exploitation: PC Version Excel utilisée: 2007 |
Posté le : 19-10-2009 15h54
je voudrais utiliser toute les cellules qui réponde a la question "date de détinage broyeur"c'est a dire F15,F19,F23 et ainsi de suite puis peut etre les cellules C1 et C2.
un grand merci encore pour ton aide. |
|
|
Re: calendrier | ||
---|---|---|
Inscription: 09/01/2008
De Montréal, Québec
Messages:
463
Système d'exploitation: PC Version Excel utilisée: 97 à 2016 |
Posté le : 19-10-2009 15h58
Tu as tout ça avec le calendrier de Didier à télécharger ICI.
Les cellules C1 et C2 incluses. Pour les usagers il suffira d'installer le calendrier sur leur poste. Guy |
|
|
Re: calendrier | ||
---|---|---|
Inscription: 25/11/2008
Messages:
174
Système d'exploitation: PC Version Excel utilisée: 2007 |
Posté le : 19-10-2009 16h06
merci on ma deja proposé cette solution mais se serai sur le principe de la cellule F11 que je voudrais que sa fonctionne,pour les autres cellules.
je ne comprend pas dans la macro ou il faud que j'indique le numero des cellules choisis comme [F11].si tu pouvais me l'indiquer. merci pour ton aide |
|
|
Re: calendrier | ||
---|---|---|
Inscription: 09/01/2008
De Montréal, Québec
Messages:
463
Système d'exploitation: PC Version Excel utilisée: 97 à 2016 |
Posté le : 19-10-2009 16h20
Allez, pourquoi faire simple quand on peut faire compliqué...
Remplace la procédure Worksheet_BeforeDoubleClick() de la feuille Feuil2 (Modèle) par ceci : Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)' On affiche le calendrier du formulaire UserForm2 si l'adresse de cellule active ' est F11, F15, F19, etc. ' Pour ce faire on applique la formule du second If. If Target.Column = 6 Then ' Colonne F If (Target.Row - 11) Mod 4 = 0 Then UserForm2.Show vbModal ' Le formulaire est modal par défaut, l'écrire permet de rendre la chose explicite. End If End If ' De même on affiche le calendrier si la cellule active est C1 ou C2 comme suit : If Target.Column = 3 Then ' Colonne C If Target.Row = 1 Or Target.Row = 2 Then UserForm2.Show vbModal End If End If End Sub Guy |
|
|
Re: calendrier | ||
---|---|---|
Inscription: 25/11/2008
Messages:
174
Système d'exploitation: PC Version Excel utilisée: 2007 |
Posté le : 19-10-2009 16h53
merci je vais essayer
je sais se n'ai pas le plus simple mais comme je te l'ai dit les gens qui vont s'en servir ne sont pas tous tres interresser par tout se qui touche un ordinateur alor je me met a leur place et j'essaye de faire au plus simple pour eux. merci encore |
|
|
Re: calendrier | ||
---|---|---|
Inscription: 25/11/2008
Messages:
174
Système d'exploitation: PC Version Excel utilisée: 2007 |
Posté le : 19-10-2009 20h19
sa marche merci beaucoup guy
|
|
|
Vous pouvez voir les sujets.
Vous ne pouvez pas débuter de nouveaux sujets.
Vous ne pouvez pas répondre aux contributions.
Vous ne pouvez pas éditer vos contributions.
Vous ne pouvez pas effacez vos contributions.
Vous ne pouvez pas ajouter de nouveaux sondages.
Vous ne pouvez pas voter en sondage.
Vous ne pouvez pas attacher des fichiers à vos contributions.
Vous ne pouvez pas poster sans approbation.
Qui consulte actuellement ce sujet ?
2 Utilisateur(s) anonymes