Thema Datum  Von Nutzer Rating
Antwort
Rot Makros mit variabler Email verschicken
 19.12.2013 08:14:48 Timo Schmitt
NotSolved

Ansicht des Beitrags:
Von:
Timo Schmitt		 Datum:
19.12.2013 08:14:48		 Views:
1200		 Rating:
     
Antwort:
  Ja
Thema:
Makros mit variabler Email verschicken

Hallo zusammen,

 

leider kenne ich mich mit Makros nicht aus und habe nun die Aufgabe eine Excelliste zu erstellen um Fehler zu verfolgen.

 

Bearbeiten kann die Tabelle nur Person A. Person A beschreibt den Fehler in der Spalte A und wählt dann in Spalte B aus den Fehlerarten Prozessfehler, Materialfehler und Konstruktionsfehler aus. Jeder Fehlerart ist eine verantwortliche Person zugeordnet, die dann in Spalte C automatisch namentlich ausgegeben wird.

 

Nun brauche ich ein Makro, dass je nach verantwortlicher Person (Spalte C) eine Email mit der Excelliste als Anhang an diese Person schickt. Ich bräuchte also eine integrierte If-Abfrage im Makro, die die Mailadresse verändert oder so ähnlich...

 

Bisher habe ich es nur geschafft eine starre Mail auf Knopfdruck (mit einer Schaltfläche) zu verschicken. Mein VBA-Code (für einen Prozessfehler) sieht folgendermaßen aus:

 


Sub Mailversand()
Dim Nachricht As Object, OutlookApplication As Object
Set OutlookApplication = CreateObject("Outlook.Application")
Dim Anhang As String
Anhang = ThisWorkbook.FullName
Set Nachricht = OutlookApplication.CreateItem(0)
With Nachricht
.To = "Timo@provider.com"
.Subject = "Prozessfehler Timo"
.attachments.Add Anhang
.Body = "Neuer Prozessfehler ist aufgetreten, bitte überprüfen!"
.Display
'.Mail.Send
End With
Set OutlookApplication = Nothing
Set Nachricht = Nothing
End Sub

 

Schon im Vorraus vielen Dank!

 

Grüße

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
Rot Makros mit variabler Email verschicken
 19.12.2013 08:14:48 Timo Schmitt
NotSolved