Microsoft 365 Envoi mail via vba

Dju1 · 27 Septembre 2023

Bonjour,
j'ai un fichier de planning qui correspond parfaitement à mes attentes mais je cherche à l'agrémenter en ajoutant une fonction qui me permettrait d'envoyer un mail au client pour lui confirmer le rdv.

J'ai fais l'essai, en cellule T9, d'un lien hyper texte mais je suis bloqué par le nombre de caractères. Dommage car l'idée du lien sur lequel cliqué correspondait bien à mon usage.

Je viens donc vers vous pour voir s'il est possible d'avoir une macro que je pourrai utiliser par client. Et le top, en option, serait de pouvoir afficher la date afficher dans le tableau à droite.

Merci d'avance d'avoir pris le temps de me lire et pourquoi pas m'aider.

danielco · 27 Septembre 2023

Bonjour,
Avec un double-clic en colonne T :

Daniel

Dju1 · 27 Septembre 2023

Bonjour Daniel,
c'est parfait, je l'ai adapté avec un double clic sur la colonne H

Et d'après vous est ce possible que j'ajoute une case qui me permettrait de retrouver la date correspondant à l'emplacement dans le tableau ?
Merci en tout cas pour le coup de main, il va m'être très précieux

danielco · 27 Septembre 2023

avez-vous une idée pour "matérialiser" ce double clic ?

Une petite enveloppe (caractère Wingding code 42) ?

Ca peut être autre chose qu'un double-clic. Ce que tu veux. Pour la date, je n'ai pas compris. Il faudrait la mettre où ?

Daniel

PS. Il faudrait modifier la macro :

VB:

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
  Cancel = True
  If Target.Count > 1 Then Exit Sub
  If Target.Column <> 20 Or Target.Row < 9 Then Exit Sub
  Set olApp = CreateObject("Outlook.application")
  Set m = olApp.CreateItem(olMailItem)
  With m
    .Subject = [D20]
    .Body = [G20]
    .Recipients.Add Target.Offset(, -1)
'    .display
    .Send
  End With
End Sub

Sinon, la cellule reste en édition.

Dju1 · 27 Septembre 2023

en fait dans mon fichier complet, sur le tableau de droite quand je fais un clic droit sur un jour pour un poseur, j'ai la liste de ma semaine (tableau de gauche) qui apparait.
Mais là j'ai tout désactivé pour mettre le fichier en ligne sur le site.

Donc quand j'ai renseigné un client pour le lundi 2/10 par exemple, j'aurai aimé que la date soit renseigné dans une cellule d'une colonne que j'ajouterai à mon tableau de gauche. Puis je me servirai de cette cellule pour l'ajouter à mon texte en corps de mail. Je pensais à une rechercheH mais pas facile à mettre en place

danielco · 27 Septembre 2023

Donne-moi un exemple, car là, je suis paumé.

Microsoft 365 Envoi mail via vba

Dju1

XLDnaute Occasionnel

Pièces jointes

danielco

XLDnaute Accro

Pièces jointes

Dju1

XLDnaute Occasionnel

danielco

XLDnaute Accro

Dju1

XLDnaute Occasionnel

danielco

XLDnaute Accro

Discussions similaires