Double click et envoi des données par mail

Bonsoir à tous,

J'ai besoin de votre aide pour envoyer des donnes dans un corps de mail.

Actuellement j'utilise cette formule quand je double clik elle envoie les données vers la feuille INFO303

mais je souhaite maintenant qu'elle met tout cela dans un mail

Merci pour votre Aide

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)

'Mise en Place du double clik pour INFO303

' A) ==> INFO303 _ Mise en place du code par double click pour INFO303

  Dim sh3 As Object, sh4 As Object, rw3 As Long, El As Long
  Set sh3 = Sheets("Suivi Dossier")
  El = sh3.Range("B" & Rows.Count).End(xlUp).Row 'Onglet Suivi Dossier
  If Not Application.Intersect(Target, Range("B2:B" & El)) Is Nothing Then
  Target.Offset(0, 1).Select 'decale et selectionne la cellule sur la droite afin d'eviter de rentrer à l'intérieur de la cellule

    Set sh4 = Sheets("INFO303")

    sh4.Range("B11:D11").ClearContents  

    rw3 = sh4.Cells(Rows.Count, 2).End(xlUp).Row + 1     

    sh4.Cells(rw3, "B").Value = sh3.Cells(Target.Row, "D") 'On écrit l'OF
    sh4.Cells(rw3, "G").Value = sh3.Cells(Target.Row, "B") 'On écrit le Projet
    sh4.Cells(rw3, "K").Value = sh3.Cells(Target.Row, "C") ' on ecrit le DT
    sh4.Range("A15").Value = sh3.Cells(Target.Row, "P") ' type d'Arbre
     sh4.Range("A18").Value = sh3.Cells(Target.Row, "S") ' type d'Arbre

  Sheets("INFO303").Select

  MsgBox "Copie de L'OF, DT et Projet sur INFO303" 'petit message de confirmation

  End If

Bonjour Man

Vous avez tout ce qu'il faut dans différents sujets de ce forum
ou dans le fichier qui se trouve en téléchargement

https://www.excel-pratique.com/fr/telechargements/utilitaires/pdf-email-vba-excel-no508

A+

Bonjour BrunoM45,

Oui j'avais déjà regardé et je n'arrive pas a adapter à mon besoin.

Car je souhaite en double click sur la cellule de la colonne B, renvoyer certaines données de la même ligne vers le mail.

J'espère avoir été clair.

Merci pour votre aide, a moins que ce n'est pas possible.

Rechercher des sujets similaires à "double click envoi donnees mail"