Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1260to1264
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

E-Mailadresse aus Zelle in LotusNotes

E-Mailadresse aus Zelle in LotusNotes
Markus
Hallo zusammen,
ich habe per Makrorecorder einen Code erstellt, welcher den PDF-Creater öffnet und aus mein Tabellenblatt im Lotus als PDF anhängt.
jetzt möchte ich noch aus diesem Blatt Zelle M30 die E-Mailadresse in Lotus übernehmen und den Betreff
sowie den Mailtext ändern.
Hat jemand eine Lösung für mich?
Ich kann leider nichts finden.
Danke Gruß Markus.
Sub Email_WR()
Application.ActivePrinter = "PDF zu E-Mail auf Ne01:"
ExecuteExcel4Macro _
"PRINT(1,,,1,,,,,,,,2,""PDF zu E-Mail auf Ne01:"",,TRUE,,FALSE)"
End Sub

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: E-Mailadresse aus Zelle in LotusNotes
24.04.2012 11:34:59
Markus
Hallo,
ich habe es jetzt noch einmal damit probiert, leider funktioniert es nicht.
Lotus wird geöffnet, die Parameter werden jedoch nicht geändert. (Lotus 8.5.1)
Woran liegt das?
Danke und Gruß Markus
Sub Email_WR()
ExecuteExcel4Macro _
"PRINT(1,,,1,,,,,,,,2,""PDF zu E-Mail auf Ne01:"",,TRUE,,FALSE)"
Dim strEmpfaenger, strBetreff, strText, strcc, strbcc As String
Dim strFile As String
strEmpfaenger = "Empfaenger@domain.tld"
strBetreff = "BetreffText"
strText = "Test"
strText = "Bitte beachten Sie ..."
'strFile = "D:\logo.sys" 'ActiveDocument.FullName
'NotesMailSend strEmpfaenger, strBetreff, strText, strcc, _
strbcc, strFile
End 

Sub

Anzeige

309 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige