Dieses Forum nutzt Cookies
Dieses Forum verwendet Cookies, um deine Login-Informationen zu speichern, wenn du registriert bist, und deinen letzten Besuch, wenn du es nicht bist. Cookies sind kleine Textdokumente, die auf deinem Computer gespeichert werden. Die von diesem Forum gesetzten Cookies werden nur auf dieser Website verwendet und stellen kein Sicherheitsrisiko dar. Cookies aus diesem Forum speichern auch die spezifischen Themen, die du gelesen hast und wann du zum letzten Mal gelesen hast. Bitte bestätige, ob du diese Cookies akzeptierst oder ablehnst.

Ein Cookie wird in deinem Browser unabhängig von der Wahl gespeichert, um zu verhindern, dass dir diese Frage erneut gestellt wird. Du kannst deine Cookie-Einstellungen jederzeit über den Link in der Fußzeile ändern.

Outlook vba!
#11
Ja ich meine natürlich die dritte Zeile! :)

Es gibt zwei Leerzeilen vor dem Gruss, diese resultieren allerdings beim einfügen der Signatur obwohl ich in der Signatur keine Leerzeilen am Anfan habe! Diese nehme ich dann nach einfügen der Signatur manuell raus!  :@


Evtl. auch ne Idee wie ich diese ersten zwei Leerzeilen loswerde?


Danke
Alexandra
Antworten Top
#12
Das alles würde nur gehen wenn die Email per VBA erzeugt wird. Sonst müsstest Du zweimal klicken (einmal die Signatur einfügen und einmal die Nummer in den Emailtext schreiben). Da ich in Outlook 2016 die Signatur nicht per Code einfügen kann (geht anscheinend nur bis Outlook 2007 oder 2010) muss ich versuchen die Signatur auf andere Weise einzufügen.
Antworten Top
#13
Bitte PN beachten!
Antworten Top
#14
(28.02.2016, 18:16)mumpel schrieb: Das alles würde nur gehen wenn die Email per VBA erzeugt wird. Sonst müsstest Du zweimal klicken (einmal die Signatur einfügen und einmal die Nummer in den Emailtext schreiben). Da ich in Outlook 2016 die Signatur nicht per Code einfügen kann (geht anscheinend nur bis Outlook 2007 oder 2010) muss ich versuchen die Signatur auf andere Weise einzufügen.

Sehr gerne dann alles per Code! ::)

Vg 
Alexandra
Antworten Top
#15
(28.02.2016, 18:20)mumpel schrieb: Bitte PN beachten!

Mail habe ich dir geschickt! :)
Antworten Top
#16
1. Wo kommt die Nummer her?
2. Wie wird die Email bisher erstellt?
3. Sieht die Signatur auch in der Praxis so aus, also Nur-Text-Mail?
Antworten Top
#17
Die folgende Prozedur in Outlook-VBA integrieren und im Menüband ablegen. Wenn Email erstellt wurde dann das Makro auslösen. Der Emailbody wird dann neu erstellt, mit der Bestellnummer in Zeile 3. Die Leerzeilen sind dann antürlich weg.


Public Sub RewriteMailBody()
  
  Dim strSubject   As String
  
                     
    Set Mail = Application.ActiveInspector.CurrentItem
        With Mail
            Rem Erstellte Email speichern (sonst kein Zugriff auf Betreff) 
            .Save
            Rem Letzte 8 Stellen im Betreff auslesen 
            strSubject = Right(.Subject, 8)
            Rem Emailtext neu schreiben (Nur-Text-Mail) 
            .Body = "Sehr geehrte Damen und Herren," & vbCrLf & vbCrLf & _
                    "hiermit erhalten Sie die Bestellung " & strSubject & "." & _
                    vbCrLf & vbCrLf & _
                    "Viele Grüsse" & vbCrLf & "Musterfirma GmbH" & vbCrLf & _
                    "Musterstrasse 1" & vbCrLf & "99999 Musterstadt"
            Rem Email nochmal speichern 
            .Save
        End With

End Sub


VBA/HTML-CodeConverter, AddIn für Office 2002-2016 - in VBA geschrieben von Lukas Mosimann. Projektbetreuung:RMH Software & Media

Code erstellt und getestet in Office 16 - mit VBAHTML 12.6.0

Antworten Top
#18
(28.02.2016, 18:57)mumpel schrieb: 1. Wo kommt die Nummer her?
2. Wie wird die Email bisher erstellt?
3. Sieht die Signatur auch in der Praxis so aus, also Nur-Text-Mail?

1. Die Nummer gebe ich manuell in den Betreff eingegeben!
2. Aus einer PDF drücke ich auf "per Email senden"
3. Ja

Werde morgen gleich mal den Code ausprobieren und melde mich dann nochmals!

Vielen Dank schon mal
VG 
Alexandra
Antworten Top
#19
(28.02.2016, 23:04)cysu11 schrieb: (...) Die Nummer gebe ich manuell in den Betreff ein (...)
Also etwas Bequemlichkeit? ;)

Dann würde ich das aber etwas anders machen. Die Nummer über ein Eingabefeld (Inputbox) eingeben und dann Betreff und Text automatisiert eintragen lassen.

Public Sub RewriteMailBody()
  
  Dim Mail         As Outlook.MailItem
  Dim strNummer    As String
  
  
  
                     
    Set Mail = Application.ActiveInspector.CurrentItem
        With Mail
            Rem Erstellte Email speichern (sonst kein Zugriff auf Betreff) 
            .Save
            Rem Bestellnummer abfragen 
            strNummer = InputBox("Bitte Bestellnummer angeben!")
            Rem Betreff erstellen 
            .Subject = "Bestellung Autoteile " & strNummer
            Rem Emailtext neu schreiben (Nur-Text-Mail) 
            .Body = "Sehr geehrte Damen und Herren," & vbCrLf & vbCrLf & _
                    "hiermit erhalten Sie die Bestellung " & strNummer & "." & _
                    vbCrLf & vbCrLf & _
                    "Viele Grüsse" & vbCrLf & "Musterfirma GmbH" & vbCrLf & _
                    "Musterstrasse 1" & vbCrLf & "99999 Musterstadt"
            Rem Email nochmal speichern 
            .Save
        End With

End Sub


VBA/HTML-CodeConverter, AddIn für Office 2002-2016 - in VBA geschrieben von Lukas Mosimann. Projektbetreuung:RMH Software & Media

Code erstellt und getestet in Office 16 - mit VBAHTML 12.6.0

Antworten Top
#20
Hallo,


habe heute den Code testen können und es funktioniert super! :)
VIELEN DANK schon mal dafür!!

Ich würde jedoch gerne noch die Signatur(nicht die Standard) sondern die "Bestellung" einfügen in HTML-Format auch durch den Code mit einfügen gleichzeitig!
Ist das möglich?

Danke
VG
Alexandra
Antworten Top


Gehe zu:


Benutzer, die gerade dieses Thema anschauen: 1 Gast/Gäste