jetzt hab ich einiges versucht, aber leider nicht hinbekommen, wie kann es funktionieren, dass ich von der aktiven Arbeitsmappe, ich nur das Tabellenblatt
"Export" per E-Mail-Anlage versenden kann :-( . Export ist auch das aktive Tabellenplatt.
Vielleicht kann mir jemand helfen, vielen Dank
Grüße
' VERSENDUNG DER AUSGABEDATEI PER OUTLOOK
Dim oApp As New Outlook.Application
Dim oMail As Outlook.MailItem
Set oMail = oApp.CreateItem(oMailItem)
With oMail
.BodyFormat = olFormatHTML
.Display
.To = "christian@web.de;" & Tabelle1.Range("X3").Value
.CC = "christian1@web.de"
.Subject = "Einspielvorlage _ Kundenkondition"
.HTMLBody = "Hallo liebes VC-Team,
bitte die in der Anlage überarbeiteten Konditionen prüfen und ggf. kurzfrisig einspielen." & .HTMLBody
.Attachments.Add "C:\.KALK\KALK1.0.xlsm" (TABELLENBLATT ? )
' .Send
.Save
End With