Outlookempfänger aus Excel auslesen

• Outlookempfänger aus Excel auslesen von Bernd vom 01.10.2003 22:33:40
  • AW: Outlookempfänger aus Excel auslesen - von Willie am 02.10.2003 14:52:59

Betrifft: Outlookempfänger aus Excel auslesen
von: Bernd

Geschrieben am: 01.10.2003 22:33:40

Hallo,
ich möchte eine Exceldatei, in der eine Outlookadresse in einer Zelle (z.B. Z1,S1) eingetragen ist, an diese Adresse versenden und die Datei selbst als Anlage beifügen.
Bisher kann ich Outlook öffnen und Datei anhängen mit folgendem Code:

Application.Dialogs(xlDialogSendMail).Show

Eigentl. Problem ist also eine Excelzelle auszulesen und als Empfänger in Outlook einzutragen. Wie wäre der gleiche Code, um die Adresse als CC einzutragen?
Herzlichen Dank!!!!


Betrifft: AW: Outlookempfänger aus Excel auslesen
von: Willie
Geschrieben am: 02.10.2003 14:52:59

So geht es! Gruß Willie

Sub AktiveTabelleAlsEMailVersenden()
Dim Empfänger As String
Empfänger = Cells(1, 1).Value
If Empfänger = "" Then Exit Sub
ActiveWorkbook.ActiveSheet.Copy
ActiveWorkbook.SaveAs ActiveSheet.Name & ".xls"
ActiveWorkbook.SendMail Recipients:=Empfänger, _
Subject:="Hier den Betreff eingeben!"
ActiveWorkbook.Close savechanges:=False
End Sub

Excel-Beispiele zum Thema " Outlookempfänger aus Excel auslesen"

Mehrfachauswahl aus ListBox auslesen		Dateien aus Listbox auslesen und öffnen
Bereich in RefEdit-Element eingeben und auslesen		Auslesen der Arbeitsmappeneigenschaften
UserName aus der Windows-Registry auslesen		Eintrag aus der Win.ini auslesen
Einzelnes Zeichen aus einer InputBox-Eingabe auslesen		Ausgewählte Arbeitsblätter auslesen
Mehrfachauswahl in ListBox auslesen		Auslesen der Mausposition
Festplatten-Seriennummer auslesen		Cursorposition in der Entwicklungsumgebung auslesen
Bedingte Formatierung auslesen		Computername auslesen
Werte aus Zellbereich in eine Matrix übernehmen und auslesen		Auslesen des ausgewählten Optionsfeldes in einer UserForm
Datum in Registry eintragen und auslesen		Mit Drehfeld durch UserForm-TextBoxes blättern und Daten auslesen
Werte aus einem nicht zusammenhängendem Bereich auslesen		Zahlenstring mit Formel auslesen und Fehlermeldung verhindern
Arbeitsmappen- und Tabellenblattnamen auslesen		Aus einer Reihe von 10-minütigen Messungen h-Mittelwerte auslesen
UserForm-Elemente auslesen		Umgebungsvariable aus der autoexec.bat auslesen
Gültigkeitsauswahl über VBA auslesen		Namen eines ausgewählten Bereiches auslesen
Bildschirmauflösung auslesen		Aus mehrspaltiger UserForm-ListBox Werte der 1. Spalte auslesen
VBE-Komponenten der aktiven Arbeitsmappe auslesen		Positionen einzelner Zeichen in langer Zeichenfolge auslesen
Rechnungsnummer in Registry eintragen, auslesen, löschen		In Array einlesen, sortieren, auslesen
Tabellenblattinhalt in seqentielle Textdatei ein- und auslesen		Plattenspeicher auslesen
Ein- und Auslesen der Seiteneinrichtung / Orientierung		Alle geöffneten Tasks auslesen
Fußzeile ein- und auslesen		Daten in benutzerdefinierten Datentyp ein- und auslesen
Daten in zweidimensionales Array ein- und in Tabelle auslesen		Auslesen der aktuellen Mausposition
Installierte Drucker auslesen		Titel einer HTML-Seite auslesen
Auslesen von Schnittstellenwerten		Textdateien auslesen und in Werte in Zellen eintragen
Grafik-Dateinamen aus Zelle auslesen und HTML-Datei erstellen		Aus einem String mit Datumsangabe das Jahr auslesen
Wert aus Optionsfelder in verschiedenen Frames auslesen		Gefilterte Daten in Array ein und aus Array auslesen
Aus GetOpenFilename-Dialog eine Mehrfachauswahl auslesen