Thema Datum  Von Nutzer Rating
Antwort
06.10.2020 11:56:44 ClaGo
Solved
06.10.2020 14:16:38 volti
NotSolved
07.10.2020 11:19:09 ClaGo
NotSolved
07.10.2020 15:41:47 volti
NotSolved
08.10.2020 14:48:54 Goetz Claude
NotSolved
08.10.2020 15:26:29 Trägheit
**
NotSolved
08.10.2020 15:41:51 Gast81327
**
NotSolved
08.10.2020 18:02:23 volti
NotSolved
Rot Automatisch Email nach Kalender
08.10.2020 17:26:46 Gast9628
*
NotSolved
09.10.2020 09:17:15 Gast5782
NotSolved
09.10.2020 10:29:06 Gast63633
NotSolved
09.10.2020 11:21:15 Trägheit
NotSolved
09.10.2020 18:06:14 Trägheit
***
NotSolved
09.10.2020 18:15:11 Trägheit
**
NotSolved
09.10.2020 18:19:15 Trägheit
*
NotSolved
12.10.2020 14:51:27 ClaGo
NotSolved
12.10.2020 15:31:50 ClaGo
NotSolved
12.10.2020 16:44:05 Trägheit
**
NotSolved
13.10.2020 11:13:52 ClaGo
NotSolved
13.10.2020 11:56:36 Trägheit
NotSolved
13.10.2020 12:00:13 Trägheit
****
NotSolved
13.10.2020 15:00:26 ClaGo
NotSolved
13.10.2020 15:47:24 Trägheit
NotSolved
13.10.2020 16:09:39 Short Interrupt
NotSolved
14.10.2020 08:30:59 ClaGo
NotSolved
14.10.2020 12:58:45 Trägheit
NotSolved
14.10.2020 13:29:56 Gast71137
NotSolved
14.10.2020 13:34:34 Gast18503
NotSolved
14.10.2020 18:48:08 volti
NotSolved
14.10.2020 19:28:21 Gast75504
NotSolved
14.10.2020 21:22:46 Trägheit
NotSolved
15.10.2020 10:32:07 ClaGo
NotSolved
15.10.2020 12:14:59 Gast74427
NotSolved
15.10.2020 13:53:49 Trägheit
NotSolved
15.10.2020 14:18:23 Gast41485
NotSolved
15.10.2020 16:18:37 ClaGo
NotSolved
15.10.2020 16:37:19 Gast17356
NotSolved
16.10.2020 08:48:22 ClaGo
NotSolved
16.10.2020 09:56:53 volti
NotSolved
16.10.2020 10:42:09 ClaGo
NotSolved
16.10.2020 17:28:10 volti
NotSolved
15.10.2020 13:35:54 Trägheit
NotSolved
16.10.2020 11:03:16 Gast34587
Solved
19.10.2020 13:03:56 ClaGo
Solved
19.10.2020 14:09:13 Gast73229
NotSolved
19.10.2020 14:34:42 Trägheit
NotSolved
21.10.2020 14:16:04 ClaGo
NotSolved
21.10.2020 14:45:03 Trägheit
NotSolved
21.10.2020 14:57:27 Trägheit
NotSolved
21.10.2020 16:07:29 Trägheit
**
NotSolved
21.10.2020 16:10:04 Gast1841
NotSolved
21.10.2020 16:11:49 Gast5396
NotSolved
21.10.2020 15:10:53 Trägheit
NotSolved
22.10.2020 08:24:49 clago
NotSolved
22.10.2020 08:58:27 volti
Solved

Ansicht des Beitrags:
Von:
Gast9628
Datum:
08.10.2020 17:26:46
Views:
797
Rating: Antwort:
  Ja
Thema:
Automatisch Email nach Kalender

Um sich ein Bild von der Mail machen zu können, wäre es besser du kopierst den Inhalt der Beispiel-Mail (per Code-Snipped Funktion in der Beitragserstellung; Einfügen per Tastenkombi STRG+V).

Wenn du die Mail geöffnet hast, einfach Rechtsklick in den Nachrichtentext > "Quelle anzeigen". Den angezeigten Text dann kopieren und hier einfügen.


Alternativ kannst du auch das Makro hier benutzen:

> Dazu einfach die betreffende Mail im Explorer auswählen (d.h. nicht öffnen). Der Inhalt wird dann in die Windows-Zwischenablage kopiert und die kannst du dann hier direkt, wie oben beschrieben, einfügen.

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
Option Explicit
 
Sub CopySelectedMailBody2Clipboard()
   
  Dim objExplorer As Outlook.Explorer
  Dim objMailItem As Outlook.MailItem
  Dim strMailContent As String
   
  Set objExplorer = ActiveExplorer
   
  If objExplorer.Selection.Count >= 1 Then
    'erstes Item muss ein MailItem sein
    If TypeOf objExplorer.Selection(1) Is Outlook.MailItem Then
       
      'MailItem referenzieren
      Set objMailItem = objExplorer.Selection(1)
       
      If objMailItem.BodyFormat = olFormatHTML Then
        'Mail-Inhalt als HTML oder Plain-Text übernehmen?
        Select Case MsgBox("Der EMail-Inhalt liegt im HTML-Format vor." & vbNewLine & vbNewLine & _
                           "Möchten Sie den EMail-Inhalt im HTML-Format übernehmen?" & vbNewLine & _
                           "(Ja ... HTML / Nein ... Text)", _
                           vbYesNoCancel + vbQuestion)
          Case vbYes
            'wird als HTML übernommen
            strMailContent = objMailItem.HTMLBody
          Case vbNo
            'wird als Text übernommen
            strMailContent = objMailItem.Body
          Case Else
            Exit Sub
        End Select
      Else
        strMailContent = objMailItem.Body
      End If
       
      'new MSForms.DataObject (=Clipboard)
      With CreateObject("new:{1C3B4210-F441-11CE-B9EA-00AA006B1A69}")
        Call .SetText(strMailContent)
        Call .PutInClipboard
      End With
       
      Call MsgBox("Der Mail-Inhalt wurde in die Zwischenablage kopiert.", vbInformation)
       
    Else
      Call MsgBox("Keine EMail-Nachricht ausgewählt.", vbExclamation)
    End If
  End If
   
End Sub

 


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
06.10.2020 11:56:44 ClaGo
Solved
06.10.2020 14:16:38 volti
NotSolved
07.10.2020 11:19:09 ClaGo
NotSolved
07.10.2020 15:41:47 volti
NotSolved
08.10.2020 14:48:54 Goetz Claude
NotSolved
08.10.2020 15:26:29 Trägheit
**
NotSolved
08.10.2020 15:41:51 Gast81327
**
NotSolved
08.10.2020 18:02:23 volti
NotSolved
Rot Automatisch Email nach Kalender
08.10.2020 17:26:46 Gast9628
*
NotSolved
09.10.2020 09:17:15 Gast5782
NotSolved
09.10.2020 10:29:06 Gast63633
NotSolved
09.10.2020 11:21:15 Trägheit
NotSolved
09.10.2020 18:06:14 Trägheit
***
NotSolved
09.10.2020 18:15:11 Trägheit
**
NotSolved
09.10.2020 18:19:15 Trägheit
*
NotSolved
12.10.2020 14:51:27 ClaGo
NotSolved
12.10.2020 15:31:50 ClaGo
NotSolved
12.10.2020 16:44:05 Trägheit
**
NotSolved
13.10.2020 11:13:52 ClaGo
NotSolved
13.10.2020 11:56:36 Trägheit
NotSolved
13.10.2020 12:00:13 Trägheit
****
NotSolved
13.10.2020 15:00:26 ClaGo
NotSolved
13.10.2020 15:47:24 Trägheit
NotSolved
13.10.2020 16:09:39 Short Interrupt
NotSolved
14.10.2020 08:30:59 ClaGo
NotSolved
14.10.2020 12:58:45 Trägheit
NotSolved
14.10.2020 13:29:56 Gast71137
NotSolved
14.10.2020 13:34:34 Gast18503
NotSolved
14.10.2020 18:48:08 volti
NotSolved
14.10.2020 19:28:21 Gast75504
NotSolved
14.10.2020 21:22:46 Trägheit
NotSolved
15.10.2020 10:32:07 ClaGo
NotSolved
15.10.2020 12:14:59 Gast74427
NotSolved
15.10.2020 13:53:49 Trägheit
NotSolved
15.10.2020 14:18:23 Gast41485
NotSolved
15.10.2020 16:18:37 ClaGo
NotSolved
15.10.2020 16:37:19 Gast17356
NotSolved
16.10.2020 08:48:22 ClaGo
NotSolved
16.10.2020 09:56:53 volti
NotSolved
16.10.2020 10:42:09 ClaGo
NotSolved
16.10.2020 17:28:10 volti
NotSolved
15.10.2020 13:35:54 Trägheit
NotSolved
16.10.2020 11:03:16 Gast34587
Solved
19.10.2020 13:03:56 ClaGo
Solved
19.10.2020 14:09:13 Gast73229
NotSolved
19.10.2020 14:34:42 Trägheit
NotSolved
21.10.2020 14:16:04 ClaGo
NotSolved
21.10.2020 14:45:03 Trägheit
NotSolved
21.10.2020 14:57:27 Trägheit
NotSolved
21.10.2020 16:07:29 Trägheit
**
NotSolved
21.10.2020 16:10:04 Gast1841
NotSolved
21.10.2020 16:11:49 Gast5396
NotSolved
21.10.2020 15:10:53 Trägheit
NotSolved
22.10.2020 08:24:49 clago
NotSolved
22.10.2020 08:58:27 volti
Solved