Lotus Notes / Domino Sonstiges > OLE/COM-Programmierung

Lotus-Notes-Vorlage via Excel-Makro aufrufen

<< < (3/6) > >>

Tode:
Dass VBA mit den Klassen nichts anfangen kann ist vollkommen egal und normal. Mache doch bitte mal nach Call db.OpenMail ein Msgbox db.Title & " - " & db.Server & " - " & db.FilePath

Ist das wirklich die Mail- Datenbank des aktuellen Benutzers?

Ach ja: Stationary ist falsch. Die Ansicht heisst Stationery

Drehstuhlpilot:
Wie's aussieht läuft der Navigator nun. Die Mail-Datenbank ist auch tatsächlich die richtige.

Allerdings scheitere ich nun bereits im Ansatz bei der While-Schleife zum Prüfen der NotesViewEntry-Einträge und werde mich wohl oder übel nach einer anderen Lösung umsehen müssen.

Dennoch nochmal vielen Dank für die Hilfe und Unterstützung.

Tode:
Nicht gleich verzweifeln... Einmal gebe ich Dir noch nen "Schubs" in die richtige Richtung:


--- Code: ---found = False
Set ve = nav.GetFirstEntry()
While found = false and not ve is Nothing
  Set vorlagedoc = ve.Document
  If vorlagedoc.GetitemValue( "MailStationeryName" )(0) = "Name Deiner Vorlage" Then
    found = True
  End If
  Set ve = nav.GetNextentry(ve)
Wend

if found = True then
  '- hier kommt der code, um eine Kopie zu erstellen
End If
--- Ende Code ---

Aber vermutlich wäre es wirklich das beste, jemanden zu engagieren... Denn von ErrorHandling, Reaktion wenn die Vorlage nicht existiert, Dokument zum bearbeiten öffnen, etc. haben wir ja überhaupt noch nicht gesprochen...

Drehstuhlpilot:
In der Zeile


--- Code: ---Set ve = nav.GetFirstEntry()
--- Ende Code ---

wird der Laufzeitfehler 438 gemeldet. Muss ve hier als was anderes als Object deklariert werden?

jBubbleBoy:
zeig doch mal deinen ganzen Code, nur eine Zeile ist da nicht ausreichend.

Navigation

[0] Themen-Index

[#] Nächste Seite

[*] Vorherige Sete