Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1372to1376
1372to1376
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Outlook: E-Mail Adresse von User auslesen

Forumthread: Outlook: E-Mail Adresse von User auslesen

Outlook: E-Mail Adresse von User auslesen
29.07.2014 13:20:56
User
Hallo zusammen,
ich habe im Netz folgenden Code gefunden mit dem ich den User bzw die Adresse auslesen kann:
Sub WerBinIchInOutlook()
Dim myuser As Object
Dim myNameSpace 'As Namespace
Set myNameSpace = Nothing
Set OLapp = CreateObject("Outlook.Application")
Set myuser = OLapp.GetNamespace("MAPI").CurrentUser
'MsgBox myuser
Range("k1") = OLapp.GetNamespace("MAPI").CurrentUser.Address
Range("k2") = myuser
'Ende: Excel Benutzer Name + Vorname ermitteln
Set OLapp = Nothing
End Sub

Jetzt möchte ich aber die E-Mail Adresse des Users ausgeben. Ist das machbar?
Dank Euch.
Gruß,
Michael

Anzeige

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Outlook: E-Mail Adresse von User auslesen
29.07.2014 15:51:56
User
Hat sich erledigt.
Anzeige
;

Forumthreads zu verwandten Themen

email adressen aus einer excel tabelle in mail via
dirk82

hallo zusammen,
ich hoffe, ihr könnt mir helfen. ich habe folgendes problem:
ich habe einige e-mail adressen in einer excel tabelle stehen. über ein makro erzeuge ich eine e-mail mit einem anhang (das hab ich schon geschafft). nun weiß ich zwar, wie diese email einem empfänger zugeordne...
25.07.2011 22:20:17
Thread-ID: 1223592
2 Beiträge
Emailadressen aus Outlook ablesen
VerenaK

Guten Morgen alle zusammen!
Ich habe ein Makro gebastelt, das automatisch Emails verschickt und sich die adressen dazu selber aus Outlook zieht, indem es eine Spalte mit Namen aus einer Exceltabelle ausliest.
Es funktioniert soweit auch, aber bei zwei Feldern hängt es sich auf.
Bei...
02.12.2011 23:16:50
Thread-ID: 1240355
2 Beiträge
Anzeige
Email-Infos aus Outlook ins Excel einlesen
Pascal

Guten Tag zusammen
Mal wieder stehe ich vor einer für mich unmöglich erscheinenden Aufgabe:
Aus Excel raus soll ein Makro gestartet werden, welches mir aus meinem Outlook 2010 alle Emails aus einem bestimmten Ordner ausliest.
Und zwar brauch ich dann in Excel nicht den Inhalt der Em...
23.11.2012 11:28:38
Thread-ID: 1287796
3 Beiträge
Mit Excel den Emailinhalt von Outlook auslesen
Outlook

Guten Morgen!
ich habe folgende Frage: kann man mit Excel den Emailinhalt auslesen und automatisch in einer Tabelle anzeigen lassen?
Es sind zwei Email-Adressen, da kommen verschiede Emails an. Ich könnte mit dem Absender vereinbaren, dass die Betreffzeile, für die Emails, die ausgeles...
09.05.2017 08:08:06
Thread-ID: 1557147
7 Beiträge
eMailadressen in verschiedenen Arbeitsblättern
Gerd

Hallo liebe Forenmitglieder,

auch ich habe ein Problem. Die Suchfunktion habe ich schon ergebnislos benutzt.
In einer Arbeitsmappe mit etlichen Tabellenblättern habe ich immer in der Spalte G eMailadressen, pro Tabellenblatt zwischen 5 und 7 Adressen.
Diese liegen in verschiedenen...
22.07.2003 00:19:54
Thread-ID: 283782
3 Beiträge
Mail-Adressen nach Outlook
Marc

Hallo Leute
ich musste den schweren Entschluß fassen mein System neu aufzusetzen.
Meine Mail-Adressen von Outlook habe ich mir in Excel gesichert.
Nun möchte ich diese aber gerne wieder nach Outlook senden.
Ich habe hier im Forum bis lang nur etwas gefunden mit Listbox, aber dam...
26.03.2005 11:00:47
Thread-ID: 590724
10 Beiträge
Email Adresse von Excel nach Outlook?
Excel

Hi, ich habe eine grosse Adresskartei angelegt, eine Excel Tabelle mit über 1000 Adressen. Ich will eine Mail an alle schreiben. Wie mache ich das? Kann ich die Adressen nach Outlook rüberziehen, wenn ja, wie geht das? Wo erstelle ich den Text, den ich verschicken will? Gibt es da irgendwie ein...
17.07.2006 13:41:20
Thread-ID: 782810
8 Beiträge
EMAils in Outlook übernehmen
Oskar

Ich hasbe eine ganz normale Excel-Adress-Liste mit einer Spalte mit den EMail-Adressen.
Nun möchte alle Adressen zusammen, mit ; getrennt in BBC von Outlook übernehmen. Ich schaffe es leider nicht, dies weitgehend zu automatisieren.
20.09.2006 10:01:31
Thread-ID: 803580
3 Beiträge
mail-Adressen in outlook einfügen
Marko

guten abend
ich hab eine adressliste wo in A die nachnamen, in B die vornamen und in D die maildaressen stehen!
zeile 1 ist die überschrift und ab zeile 2 gehen die adressen los!
kann ich die nun irgendwie alle nach outlook ins adressbuch einfügen?
und könnte man auch nur von...
24.03.2007 18:28:00
Thread-ID: 857446
3 Beiträge
Mit Excel Email in Outlook über ein Konto senden
Björn

Moin ihr Excel/VBA-Verrückten,
ich habe es geschafft, mit Excel eine E-Mail in Outlook zu erzeugen. Jetzt möchte ich aber gerne ein bestimmtes Konto ansprechen und die E-Mail über dieses Konto schicken.
Ich habe schon versucht mit "SentOnBehalfOfName" die E-Mail zu schicken. Aber dann...
03.06.2007 14:09:42
Thread-ID: 875117
2 Beiträge
eMails verschieben in Outlook
Heinzs
Hallo Excel-Profis,
ich habe ein Mapi Outlook Postfach mailbox retouren auf einem Exchange Server.
Aus diesem Postfach mailbox retouren sollen Einträge vom Ordner Posteingang in Posteingang\Retourenbegleitschein verarbeitet verschoben werden.
Im Posteingang liegen ursprünglich 2500 Eintr...
27.02.2022 08:58:50
Thread-ID: 1872902
2 Beiträge
Anzeige
Anzeige

Infobox / Tutorial

E-Mail Adressen aus Excel in Outlook einfügen

Schritt-für-Schritt-Anleitung

  1. Öffne Excel und drücke Alt + F11, um den VBA-Editor zu starten.

  2. Füge ein neues Modul hinzu:

    • Rechtsklick auf "VBAProject (DeineDatei.xlsx)" -> Einfügen -> Modul.

  3. Kopiere den folgenden Code in das Modul:

    Sub WerBinIchInOutlook()
   Dim myuser As Object
   Dim myNameSpace 'As Namespace
   Set myNameSpace = Nothing
   Set OLapp = CreateObject("Outlook.Application")
   Set myuser = OLapp.GetNamespace("MAPI").CurrentUser

   'E-Mail Adresse ausgeben
   Range("k1") = OLapp.GetNamespace("MAPI").CurrentUser.Address
   Range("k2") = myuser

   'Ende: Excel Benutzer Name + Vorname ermitteln
   Set OLapp = Nothing
End Sub

  4. Schließe den VBA-Editor und gehe zurück zu Excel.

  5. Führe das Makro aus:

    • Drücke Alt + F8, wähle WerBinIchInOutlook und klicke auf "Ausführen".

Jetzt wird die E-Mail Adresse des Users in Zelle K1 ausgegeben.

Häufige Fehler und Lösungen

  • Fehler: "Outlook nicht installiert"

    • Stelle sicher, dass Microsoft Outlook auf deinem Computer installiert ist.

  • Fehler: "Zugriff verweigert"

    • Überprüfe, ob deine Excel-Datei mit den richtigen Berechtigungen geöffnet wurde.

Alternative Methoden

  1. Direktes Einfügen in Outlook:

    • Kopiere die E-Mail Adressen direkt aus Excel und füge sie im Outlook-Fenster ein. Dies funktioniert gut, wenn du mehrere e-mail adressen aus excel in outlook schnell einfügen möchtest.

  2. Verwendung von CSV-Dateien:

    • Exportiere die Daten aus Excel als CSV-Datei und importiere diese in Outlook. Dies ist besonders nützlich für umfangreiche Listen.

Praktische Beispiele

  • E-Mail Adressen aus einer Liste einfügen: Angenommen, du hast eine Liste mit E-Mail Adressen in Spalte A. Du kannst den folgenden VBA-Code verwenden, um alle E-Mail Adressen in Outlook als BCC einzufügen:

    Sub EmailAdressenEinfügen()
  Dim OutlookApp As Object
  Dim Mail As Object
  Dim i As Long
  Dim EmailListe As String

  Set OutlookApp = CreateObject("Outlook.Application")
  Set Mail = OutlookApp.CreateItem(0) ' 0 = olMailItem

  For i = 1 To 10 ' Ändere die 10 auf die Anzahl der E-Mail Adressen
      EmailListe = EmailListe & Cells(i, 1).Value & ";"
  Next i

  Mail.BCC = EmailListe
  Mail.Subject = "Betreff hier"
  Mail.Body = "Nachrichtentext hier"
  Mail.Display ' Zum Anzeigen der E-Mail
End Sub

Tipps für Profis

  • Verwende WorksheetFunction um Daten effizienter zu verarbeiten.
  • Automatisiere den Prozess: Erstelle eine Schaltfläche in Excel, um dein Makro einfach auszuführen.
  • Sichere deine Makros: Verwende die "Sicherheitseinstellungen" in Excel, um deine Makros zu schützen.

FAQ: Häufige Fragen

1. Wie kann ich sicherstellen, dass meine E-Mail Adressen korrekt sind? Verwende die Funktion =ISTFEHLER() in Excel, um ungültige E-Mail Adressen zu identifizieren.

2. Kann ich die E-Mail Adressen direkt in den CC einfügen? Ja, ändere die Zeile Mail.BCC = EmailListe zu Mail.CC = EmailListe, um die Adressen im CC-Feld zu verwenden.

3. Funktioniert dies mit allen Versionen von Excel? Ja, aber die VBA-Makros sollten in Excel 2010 oder höher getestet werden, um voll funktionsfähig zu sein.

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige