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:
552		 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?

 

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