Re: Adapter le mDF_Calendar |
Titre du sujet : Re: Adapter le mDF_Calendar par myDearFriend! le 13/05/2008 22:17:39 Bonsoir Hadidman et bienvenu sur mDF XLpages.com ! Tout d'abord, merci du compliment. Je commence par une petite précision pour éviter toute confusion : il s'agit là du mDF Calendrier v2.2 (à ne pas confondre avec le mDF XLcalendar qui correspond à la toute dernière version de cet utilitaire et dont le projet VBA n'a pas été mis à disposition). Même si je n'ai pas compris la globalité de ce que tu cherches à faire avec ce calendrier, je puis quand même te proposer les modifications suivantes à faire sur les deux fichiers pour répondre à ta demande : Dans le projet VBA de ton fichier nommé "fichier.xls", j'applique le code suivant : DANS LE MODULE DE CODE DE L'OBJET THISWORKBOOK :
Option Explicit
Que fais ce code ? A chaque changement de sélection de cellule, j'analyse le contenu de la cellule en cours. Si cette cellule contient une date, alors je copie cette date dans la cellule "B1" de l'onglet "Prefs" du classeur mDF Calendrier22.xla (la macro complémentaire). Je déclenche ensuite l'ouverture du calendrier (procédure mDFcalShow du fichier .xla). J'apporte ensuite les modifications suivantes au projet VBA du mDF Calendrier22.xla : DANS LE MODULE DE CODE DU USERFORM "mDFcalendrier", procédure UserForm_Initialize(), je commente (ou supprime) les lignes comme ci-dessous (en vert) :
...
Ceci permet de désactiver l'option : Afficher mois en cours à l'ouverture Ensuite j'ajoute le code suivant dans la procédure MAJCalend() (voir zone commentée en vert) :
Private Sub MAJCalend(D As Date)
L'ensemble de ces modifications devrait permettre d'obtenir ce que tu sembles vouloir : afficher le calendrier automatiquement et mettre en évidence le jour correspondant à la date sélectionnée dans ton classeur. J'ajoute que j'ai toujours eu comme un pincement au coeur en voyant une de mes applications détournée de son travail d'origine. Pour être franc, jusqu'à ce jour, j'ai d'ailleurs toujours refusé de participer à un quelconque de ces détournements... Mais j'ai volontairement laissé le code VBA disponible pour ces versions et donc je n'interdis en rien, chacun de faire ce qu'il en veut (ou presque ! Pas d'application commerciale par exemple et laisser ma signature et les commentaires originaux dans le code VBA). Ainsi, permets moi de te laisser tester et mettre en oeuvre ce qui précède, en te souhaitant bonne continuation pour la suite de ton projet... En espérant t'avoir aidé... Cordialement, |
Forums