Copieren ohne Verknüpfung
pabro
ich habe mir folgnde Code zusammenkopiert um aus einer Excel-Datei, eine einzelne Tabelle als Mail zu verschicken. Das funktioniert auch soweit, nur würde ich das Sheet gerne ohne die Verknüpfungen verschicken, geht dass und wenn jaq, wie muß denn dann der Code aussehen?
Option Explicit
Sub Übersicht_senden()
Dim Pw As String, PwFix As String
Sheets("Übersicht").Copy
ActiveWorkbook.SendMail [MailAdd], ["Tagesauswertung Service Gesamt"]
Application.DisplayAlerts = False
ActiveWindow.Close
Application.DisplayAlerts = True
ActiveWorkbook.Save
ActiveWorkbook.Close
End Sub