Dans l’onglet « Entretien Santé » j’ai ajouté un bouton « RDV » un formulaire USF s’ouvre.
L’idée serait que quand j’appuie sur valider du formulaire le rendez-vous se mettent dans l’agenda Outlook.
J’ai essayé de créer un code ( « RDV() » ) grâce au tuto dans le module 1 , mais j’ai pas tout compris au niveau des format fichier .
Et j’ai un petit souci aussi dans USF2 j’ai mis une liste déroulante pour le choix des heures et des durées et quand je sélectionne il me met sous un autre format et je ne sais pas comment le changer si vous pouvez me donner un petit coup de main une nouvelle fois s’il vous plait.
Bonjour Johnny
Je vais essayer de t’aider mais je ne te cache pas que je suis dans de très mauvaise conditions pour y arriver
J’ai peu d’expériences en la matière et elle datent d’un certain d’années lorsque j’usais mes fonds de culottes sur les sièges de mon bureau quand j’étais en activité professionnelles
De plus je n’ai pas d’application de messagerie à ma disposition donc impossible de tester pour moi je suis carrément en aveugle
Donc je te fais une proposition récupérée sur internet et adaptée à ton contexte sans aucune garantie qu’elle fonctionne
A toi de tester et me dire
Il faudra je pense activer la référence Outlook Library la plus récente et avoir ton application ouverte
J’ai apporté l’adaptation nécessaire au bonne affichage des heures et des durées
En même temps il serait peut-être plus simple que je mette heure de fin entre l’heure de début et l’heure de fin forcément la durée elle va se mettre automatiquement non ? qu’est-ce que tu en penses
Ah super pour les heures USF, je viens de voir comment t’as fait merci pour cette nouvelle leçon
Merci pour ce retour
Oui effectivement dans les préconisations de la source internet la durée doit être en minutes
Or j’ai gardé dans le code que je t’ai fourni celle-ci tel quelle de la Combobox2
J’ai apporté une correction pour suivre cette recommandation
Essais et dis moi
Essaies avec cette nouvelle version
J’ai rajouté avec la date début l’heure de début
J’ai rajouté le commentaire
J’espère du mieux croisons les doigts !!!
Et oui c’est ce que je craignais !!!
Mais c’est le seul endroit où intégrer la date de début et l’heure de début
J’ai rajouté entre un espace pour les distinguer sait-on jamais essaies
un exemple de ce qui est proposé comme solution sur internet :
With oAppointment
.Start = "30/01/2020 12:00:00"
.Duration = 180 'durée de rdv, en minutes
.Subject = "Réunion avec Mark" 'Sujet du rdv
.Body = "" 'corps du texte de la réunion
.Location = "Timhotel Paris" 'Lieu du rdv
'on sauvegarde et ferme
.Save
.Close (olSave)
End With
et plus particulièrement ici :
.Start = "30/01/2020 12:00:00"
il y a bien la date (30/01/2020) suivi de l'heure (12:00:00)
Donc essayons avec l'espace entre
Bingo donc cela fait très plaisir
Je fus la tête toi les mains
Notre duo a très bien fonctionné et grace à toi j ai appris
Merci
Au plaisir d apprendre avec toi à nouveau
Être ton collègue aurait été un plaisir mais me concernant il aurai fallu que tu fasses carrière au PTT puis France Télécom pour finir chez Orange
Peut-être un monde moins passionnant que le tien
Mais rien n est perdu puisque c est un peu le cas aujourd’hui sur ce forum
Nous sommes un peu collègue
Au plaisir de t accompagner dans un prochain échange
.
.