Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.09.2025 23:04:12
Einen von drei möglichen Einträgen in einer Zeile suchen
25.09.2025 19:59:48
Lebenserleichternde Datei, im Bezug auf die Essensauswahl
25.09.2025 16:01:26
VBA - Laufzeitfehler 9105 zu viele Zeichen 255
25.09.2025 14:32:49
Excel-Dateien zusammen führen (Tabellen)
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
796to800
796to800
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Email-Verteiler aus Kundendaten extrahieren

Forumthread: Email-Verteiler aus Kundendaten extrahieren

Email-Verteiler aus Kundendaten extrahieren
27.08.2006 16:06:38
wuerzs
Hallöchen ihr Spezis,
habe da eine kleine Aufgabe.
Ich habe in einer Excel-Liste aufgelistete Kundendaten mit Name, Anschrift Telefonnummer, E-Mail-Adresse ect.
Meine Frage ist nun wie bekomme ich aus diesen Kundendaten die Email-Adresse als Verteiler für Outlook extrahiert? Sprich vielleicht ein Makro was mir automatisch einen E-Mail-Verteiler erstellt mit allen E-Mail-Adressen des Sheets drinne?
Hat jemand eine Lösung für mich?
LG
wuerzs
Anzeige

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Email-Verteiler aus Kundendaten extrahieren
27.08.2006 17:54:43
Josef
Hallo ?
Angenommen die E-Mail-Adressen stehen in Spalte "E".
Sub SendMassMail()
Dim objOutApp As Object
Dim objOutMail As Object
Dim lngLast As Long
Dim strTo As String
Dim rng As Range

On Error GoTo ErrExit

Application.ScreenUpdating = False

lngLast = ActiveSheet.Cells(Rows.Count, 1).End(xlUp).Row

For Each rng In Range(Cells(2, 5), Cells(lngLast, 5)) ' 5=Spalte "E" !
  If Len(Trim(rng)) > 0 And InStr(1, rng, "@") > 0 Then
    strTo = strTo & rng.Text & ";"
  End If
Next

If Len(strTo) > 0 Then
  strTo = Left(strTo, Len(strTo) - 1)
Else
  Exit Sub
End If

Set objOutApp = CreateObject("Outlook.Application")

Set objOutMail = objOutApp.CreateItem(0)

With objOutMail
  .To = strTo
  .cc = ""
  .Subject = "Dein Betreff"
  .Body = "Dein Text!" & vbNewLine & vbNewLine & _
    "Weiterer Text!"
  'Anhang einfügen!
  '.Attachments.Add ("C:\test.txt")
  .Display 'oder .Send
End With

Set objOutMail = Nothing

ErrExit:

Set objOutApp = Nothing
Application.ScreenUpdating = True
End Sub



Gruß Sepp

Anzeige
;

Forumthreads zu verwandten Themen

Daten aus vielen xls-Datein auslesen
Daniel

Hallo Profis,
ich suche einen VBA-Befehl für folgendes:
Ich habe einen Ordner mit vielen xls-Dateien. Diese sollen nun alle in einer Datei zusammengefahren werden, alle Zeilen, wenn der Wert der 2. Spalte links mit "12345" anfängt.
Geht dies?
Vielen Dank vorab.
Daniel
...
18.08.2008 15:07:01
Thread-ID: 1002621
2 Beiträge
Daten sortiert aus anderem Tabellenblatt auslesen
Robert

Hallo,
bräuchte eure Hilfe bitte.
Aus einem Tabellenblatt ("FEHLZEITEN") sollen Daten ausgelesen und in einem anderen Tabellenblatt ("EINSATZPLANUNG") ab Zeile 100 eingefügt und bei Änderungen in "FEHLZEITEN" aktualisiert werden.
Habe da mal eine Beispieldatei zur besseren Veransch...
28.08.2008 11:32:00
Thread-ID: 1005356
3 Beiträge
Datensätze aus Blatt auslesen
bully

Hallo Leute,
ich möchte mit VBA aus dem Blatt2 ganze Datenzeilen auslesen, wenn diese in der Spalte3 den Wert enthalten, den ich in Blatt3 in Zelle F6 vorgebe. Die Datenzeilen sollen dann in Blatt3 ab Zeile14 eingefügt werden.
Nach etlichen Selbstversuchen gebe ich jetzt auf.
Gruss...
02.09.2008 15:55:27
Thread-ID: 1006842
6 Beiträge
Daten aus einer anderen Mappe auslesen
Uwe

Hallo zusammen, habe mir einen funktionierenden Einsatzplan für 24 MA und 3 Schichten zusammengebastelt welcher die Monate inkl. Feiertage und Wochenenden dynamisch generiert.
Nun möchte ich wenn ich im zum Beispiel den Einsatzplan für die Mitarbeiter für Februar abrechne, das Excel sich...
14.10.2008 22:12:36
Thread-ID: 1016451
5 Beiträge
Daten aus anderen Quellen auslesen
Ryu

Hallo,
ich habe eine Excel Tabelle wo ich den Verbrauch von Materialien der letzten 6 Monate erfasse. Den Verbrauch kann ich entweder mir Monat für Monat, Artikel für Artikel zusammenkopieren oder ich kann den Verbrauch jeden Monats in die oben genannte Tabelle (andere sheets) kopieren und...
23.10.2008 16:34:00
Thread-ID: 1018740
4 Beiträge
Daten aus Dateien auslesen
Bark

Ich habe ein Makro geschrieben, der Dateien in einem bestimmten Verzeichnis der Reihe nach öffnet und bestimmte Inhalte in Variablen packt und die Werte dieser Variablen in einer anderen Datei (Gesamtliste) wieder einfügt.
Läuft alles soweit gut. Aber die Laufzeit könnte besser sein. Was ka...
02.02.2009 14:29:21
Thread-ID: 1046247
4 Beiträge
Daten aus mehreren Dateien auslesen/anfüg
Ines

Hallo,
folgende Ausgangssituation. Ich habe ca. 70 Exceldateien, alle mit dem gleichen Tabellenaufbau. Alle befinden sich auch in einem Ordner. Die Ergebnisse auf den Tabellenblättern möchte ich in einem neuen Tabellenblatt zusammenfassen.
Die Tabellenblätter sind folgendermaßen aufgeba...
08.03.2009 18:42:10
Thread-ID: 1057929
5 Beiträge
Daten aus geschlossener Datei auslesen
Reinhardt

Hallo.
Mit der gegoogelten u.a Sub komme ich in meiner Aufgabenstellung fast schon klar. Meine Frage: Wie muß der Dateipfad geschrieben werden, damit er mir z.B. Das Tabellenblatt "Test" ausließt? Danke im voraus. Gruß Reinhardt Sub DatenImport() Dim rngTarget As Range Set rngTarget = R...
24.04.2009 13:34:00
Thread-ID: 1070948
2 Beiträge
Daten aus Zelle per CSV nur bedingt auslesen
Heiko

Hallöchen,
ich habe eine Datendatei in CSV mit Simikolon getrennt ohne Umbrüche.
Diese Lade ich auf eine Seite hoch, die mir die jeweiligen Zellen innerhalb einer Datenbank ausfüllt.
Meine Frage wäre jetzt, ob es eine Möglichkeit gibt, durch eingaben innerhalb der CSV-Datei den Text...
13.06.2009 20:14:31
Thread-ID: 1081318
4 Beiträge
Daten aus Homepage auslesen
Joachim

Hi,
ich habe eine Exceltabelle wo verschiedenen Listen hinterlegt sind. Per Makro greife ich auf die Listen zu. Diese Listen sind im Prinzip Daten, die ich aus einer Homepage runterhole, also natürlich per copy und paste.
ich hatte mit nun überlegt, es wäre natürlich um einiges leichter...
10.08.2009 21:29:50
Thread-ID: 1094875
4 Beiträge
mit SVerweis daten aus mysql auslesen
Timo

Nabend.... ich bin auf der Suche nach einer Möglichkeit. sql-daten ca. 2000 Datensätze via SVerweis in Excel auszugeben. ich will in der ersten zeile eine id eingeben und excel soll sich automatisch die Daten für die weiteren Felder aus der db holen. bisher mache ich es mit einer exceldatei und...
05.10.2009 17:35:11
Thread-ID: 1106927
2 Beiträge
Daten aus anderer Datei auslesen und eintragen | Herbers Excel-Forum
Bernd
Hallo Freaks,
ich suche seit heute 12 h nach einer Lösung im Archiv, bin aber nicht fündig geworden bzw. nicht in der Lage, das makro anzupassen.
Problem: aus einem Verzeichnis eine Datei aussuchen und aus zwei exakt benannten Blättern die Daten eines bestimmten Bereiches einlesen. Dabei ha...
24.01.2010 19:45:10
Thread-ID: 1132528
4 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige