Thema Datum  Von Nutzer Rating
Antwort
09.01.2017 10:40:07 Daniel Aust
NotSolved
09.01.2017 20:27:34 Gast15378
NotSolved
Rot Neuste Datei in Ordner finden und per Email versenden
10.01.2017 06:54:15 Daniel Aust
NotSolved

Ansicht des Beitrags:
Von:
Daniel Aust
Datum:
10.01.2017 06:54:15
Views:
690
Rating: Antwort:
  Ja
Thema:
Neuste Datei in Ordner finden und per Email versenden

Okay super dankeschön.

 

Welcher Befehl der DIM muss ich den nehmen um in in der email ein zu fügen?

 

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
Public Sub TableToMail()
    Dim objOutlook As Object
    Dim objMail As Object
        Set objOutlook = CreateObject("Outlook.Application")
        Set objMail = objOutlook.CreateItem(0)
        With objMail
                .To = ""   'Empfänger AN
                .CC = ""
                .BCC = ""
                .Sensitivity = 0                      'Vertraulichkeit
                .Importance = 2                       'Wichtigkeit
                .Subject = ""
                .Body = ""
                .Send                                 'Versand
                '.Display  'nur anzeigen
            '.send       'direkt senden
        End With
        Set objMail = Nothing
        Set objOutlook = Nothing
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
09.01.2017 10:40:07 Daniel Aust
NotSolved
09.01.2017 20:27:34 Gast15378
NotSolved
Rot Neuste Datei in Ordner finden und per Email versenden
10.01.2017 06:54:15 Daniel Aust
NotSolved