J'utilise sous word ça:
Sub envoimail()
'
' envoie un mail avec la pièce jointe
'
Dim ol As Object, monItem As Object
Set ol = CreateObject("outlook.application")
Set monItem = ol.CreateItem(olMailItem)
monItem.To = "xxxxxx@xxxxx "
monItem.Subject = "Salut"
monItem.Body = "Bonjour" & Chr(13) & Chr(13) & "Je vous prie de bien vouloir trouver la fiche de MAJ SIG"
Set mondoc = monItem.Attachments
mondoc.Add ThisWorkbook.Sheets("commande").Copy
monItem.Send
Set ol = Nothing
MsgBox "la demande a bien été transmise "
End Sub
du coup j’essaie de faire une copie de ma feuille (commande) mais je n’arrive pas . Le reste fonctionne bien