Insertion d'une variable dans un texte devant être envoyé par mail

Bonjour,

Je souhaiterais insérer une variable, à savoir le résultat d'un compteur de lignes, dans le texte d'un email envoyé via outlook.

Pour vous donnez un exemple, je souhaiterais un résultat comme ci-dessous :

"Bonjour, Il y a "VARIABLE" lignes à traiter (Cellule C34 de l'onglet J). Cordialement".

Si vous avez une idée, elle sera la bienvenue.

Bonne journée.

Bonjour,

"Bonjour, Il y a " & le_nom_de_ta_variable & " lignes à traiter (Cellule C34 de l'onglet J). Cordialement".

Cordialement.

Merci pour votre retour. Effectivement tout simple.

Je vous remercie. Bonne journée.

Bonjour, j'ai le même problème. j'ai le bout de code suivant :

Sub SendRappel()

Dim stRecipient As String
Dim stSubject As String
Dim stBody As String
Dim stAttachement As String
Dim stsalutations As String
Dim starreteau As Date

stRecipient = ActiveSheet.Cells(16, 15).Value
stSubject = ActiveSheet.Cells(10, 23).Value
stAttachement = ActiveSheet.Cells(3, 22).Value
stsalutations = ActiveSheet.Cells(23, 15).Value
starreteau = ActiveSheet.Cells(27, 20).Value

'création de l'email
Set apOutlook = CreateObject("Outlook.Application")
apOutlook.Session.Logon

Set itEmail = apOutlook.CreateItem(olMailItem)

With itEmail
.To = stRecipient
.Subject = stSubject
.Body = " & stsalutations & " lignes à traiter (Cellule O23 de l'onglet R1)

.Attachments.Add stAttachement

.Display
End With

End Sub

et je souhaite que dans l'email apparaisse "Cher Monsieur" qui est au fait la variable stsalutations. Merci de votre aide.

Rechercher des sujets similaires à "insertion variable texte devant etre envoye mail"