aNouveau venuafledaInscrit le :07/09/2012Dernière activité :16/09/2012 à 20:35Version d'Excel :2007Messages6Votes0Fichiers0Téléchargements0SujetsMessagesStatistiquesVotes reçus Messages postés par afledaDateAuteur du sujetSujetExtrait du message15/09/2012 à 20:06afledaMacro VBAIl me serait agréable que vous puissiez m'apporter votre aide sur une macro VBA je souhaite une macro en feuille 2 pour aller chercher des données inscrites en feuille 1 de d1 à d ............ pour les transporter en feuille 2 en d1 à d.......................en fonction de la liste. j'ai plaisir à p...09/09/2012 à 22:24afleda Envoi mail par ExcelUn grand merci pour ce fichier joint et pour ce partage très enrichissant bien cordialement...07/09/2012 à 23:12afleda Envoi mail par ExcelSeul le destinataire en d20 ressort, mais pas les autres de d4 à d19...07/09/2012 à 22:47afleda Envoi mail par ExcelJ'ai modifié le code vba, mais lorsque je lance la macro, les adresses mails ne sont pas reprises en destinataires avez vous une solution ou aie je oublié quelque chose merci de vos observations cordialement...07/09/2012 à 20:02afleda Envoi mail par ExcelJ'ai rentré : Sub EnvoiUnMail() Dim MailAd As String Dim Msg As String Dim Subj As String Dim TheFile TheFile = Range("d4") Dim URLto As String For i = 4 To 20 MailAd = Range("d" & i) & ";" Subj = Range("d2") Msg = Msg & Range("d3") URLto = "mailto:" & MailAd & "?subject=" & Subj & "&body=" & Msg Ac...07/09/2012 à 18:29afleda Envoi mail par ExcelIl me serait agréable que vous puissiez m'apporter votre aide sur ce code vba : Sub EnvoiUnMail() Dim MailAd As String Dim Msg As String Dim Subj As String Dim TheFile TheFile = Range("d4") Dim URLto As String MailAd = Range("d1") Subj = Range("d2") Msg = Msg & Range("d3") URLto = "mailto:" & MailAd...Forums