Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit
GELÖST

Mit VBA unter Excel E-Mail Programm öffnen

Frage Entwicklung VB for Applications

Mitglied: TheEternalPhenom

TheEternalPhenom (Level 2) - Jetzt verbinden

23.11.2009 um 11:18 Uhr, 11888 Aufrufe, 3 Kommentare

Guten Tag

Ich habe ein kleines Problem.
Seit ein paar Wochen bin ich am zusammen basteln einer VBA Sammlung.
Mittlerweile bin ich kurz davor Version 1.1 ins Netz zustellen. Für V1.2 bin ich nun auf die Idee gekommen ein kleines Programm zu schreiben welches das Aktive E-Mail Programm auf ruft, meine E-Mail Adresse mit einem bestimmten Betreff aufruft und vllt. noch einen kurzen Text einfügt.

Bevor jetzt wieder jeder kommt und sagt Google ftw, kann ich nur sagen: "Ich habe gesucht." Ein passendes Programm habe ich gefunden jedoch war dieses Passwort geschützt.

Also falls jemand etwas passendes für mich hätte wäre super.

Ich sag schon mal Danke im Vorraus.

Mit freundlichen Grüßen

duffman521
Mitglied: aFankhauser
23.11.2009 um 21:20 Uhr
kenn zwar nur VBScript. hat aber meines wisens seine ähnlichkeiten.

ich würd es mal mit der run()-Methode versuchen

Beispiel in vbscript:
01.
set shell = createObject("wscript.shell") 
02.
shell.run """mailto://beispiel@nirgendwo.com?cc=ccEmpfänger@nirgendwo.com&bcc=bccEmpfänger@nirgendwo.com&subject=mein Betreff&body=Was möchten sie denn schreiben?"""
vielleicht hilft es dir ja was.
mit VBScript und Outlook Express funktionierts

[edit]
@ dog
Drittes Beispiel...???
hab ich schon was verpasst?
[/edit]
Bitte warten ..
Mitglied: TheEternalPhenom
24.11.2009 um 17:52 Uhr
Erstmal Thx für euere Tipps, da ich mit VB nicht ganz so viel Anfangen kann hab ich noch etwas weiter gesucht und bin doch noch fündig geworden.

In einem Forum habe ich eine passende Lösung gefunden. Komischer weiße habe ich nach etwas komplett anderem gesucht, der Suchbegriff hatte sogar nichts mit E-Mails und VBA zutun.

Hier der Link: http://clever-forum.de/read.php?11,209630,209637#msg-209637

und hier der Code:

01.
Sub MailVersenden() 
02.
    Dim obNachricht As Object 
03.
    Dim obMail As Object 
04.
    Set obMail = CreateObject("Outlook.Application") 
05.
    Set obNachricht = obMail.CreateItem(0) 
06.
    With obNachricht 
07.
        .To = "DieMail@Web.de"  '<== hier steht stattdessen deine Variable, ohne "" 
08.
        .Subject = "Erinnerung" 
09.
        .Body = "Liebe Kati," & vbLf & vbLf & "dein Termin ist am 01.12.2009 fällig." & vbLf _ 
10.
            & "Denke bitte unbedingt daran." 
11.
        .ReadReceiptRequested = False 
12.
        .send 
13.
    End With 
14.
    Set obNachricht = Nothing 
15.
    Set obMail = Nothing 
16.
End Sub


Leider konnt ich das ganze noch nicht testen, da mir aufgefallen ist dass ich kein Outlook installiert habe.


Ich weiß irgendwie peinlich.
Bitte warten ..
Neuester Wissensbeitrag
CPU, RAM, Mainboards

Angetestet: PC Engines APU 3a2 im Rack-Gehäuse

Erfahrungsbericht von ashnod zum Thema CPU, RAM, Mainboards ...

Ähnliche Inhalte
Microsoft Office
gelöst Verschieben von Zellinformation in andere Spalte (per VBA) excel 2010 (5)

Frage von thomas1972 zum Thema Microsoft Office ...

VB for Applications
Bilder vom LDAP in VBA - Excel (3)

Frage von Roadrunner777 zum Thema VB for Applications ...

VB for Applications
gelöst VBA Excel Recordset - Abfrage auf SQL-Server (4)

Frage von Aximand zum Thema VB for Applications ...

Heiß diskutierte Inhalte
Windows Server
DHCP Server switchen (25)

Frage von M.Marz zum Thema Windows Server ...

Grafikkarten & Monitore
Win 10 Grafikkarte Crash von Software? (13)

Frage von Marabunta zum Thema Grafikkarten & Monitore ...

Router & Routing
gelöst Empfehlung günstiges ADSL2+ nur Modem (10)

Frage von TimMayer zum Thema Router & Routing ...

Server-Hardware
Lenovo Server System X 3650 M5 Festplatten (9)

Frage von Hendrik2586 zum Thema Server-Hardware ...