Ich habe eine Excel-Datei mit mehreren Sheets. Im 1. Sheet werden alle Werte zur Anfrage einer Leistung eingegeben. Diese Werte werden in den anderen Sheets übernommen, die darin einzutragenden Daten werden durch die einzelnen Anbieter ausgefüllt und an mich zurück gesendet. Um den Anbietern eine E-Mail zu senden habe ich folgenden VBA-Code generiert, der nur das jeweilige Tabellenblatt an die einzelnen Anbieter sendet und dabei die eingetragenen Werte und Schutzzonen beibehält:
Sub Blatt_senden()
Dim Empfänger As String
Empfänger = Worksheets(„Anbieter 2“).Range(„C9“)
Sheets(„Anbieter 2“).Copy
ActiveWorkbook.SendMail Empfänger, „Anbieter 2“
Application.DisplayAlerts = False
ActiveWindow.Close
Application.DisplayAlerts = True
End Sub
Diese Funktion harmoniert jedoch nur in der MS-Oberfläche. Jetzt suche ich nach einem VBA-Code, der die Werte und Schutzzonen kopiert, ohne das weiterhin eine Verknüpfung zur Urdatei bestehen bleibt, ich also die so entstehende neue Excel-Datei frei versenden kann.