Lotus Notes / Domino Sonstiges > Tipps und Tricks

TIPP: Klasse für Word - Automation

<< < (2/3) > >>

Axel:
SetFontAttributes ist eine Methode meiner Klasse (siehe angehängte Datenbank im ersten Post).


Dieser Code liegt dahinter:


--- Code: --- Sub SetFontAttributes(strFont As String, intSize As Integer, intBold As Integer, intItalic As Integer, intUnderline As Integer)        
With objWord.Selection.Font
.Name = Cstr(strFont)  'Schriftart
.Size = intSize  'Schriftgröße
.Bold = intBold  'Fett
.Italic = intItalic  'Kursiv
.Underline = intUnderline  'Unterstreichen
End With
End Sub

--- Ende Code ---

Axel

Axel:
Bei dir müsste das dann in etwa so aussehen:

...
Call wordObject.MailingLabel.CreateNewDocument ( "C1453")
...
With wordObject.Selection.Font
   .Name = "Courier New"  'Schriftart
   .Size = 14  'Schriftgröße
   .Bold = True  'Fett
   .Italic = False  'Kursiv
   .Underline = False  'Unterstreichen
End With     
...

Axel

MatzeW:
Danke für die Schnelle Hilfe

Es Funktioniert einwandfrei

MatzeW:
Hallo Ich bins nochmal!

Wie kann ich den Worddocument eine Bild Ressource von der NotesDatenbank mitgeben?


Call wordObject.Selection.InlineShapes.AddPicture( "C:\Logo.gif")

verlangt das ich einen Pfad mitgebe.


Gruß

Matthias

Axel:
Da fällt mir leider im Moment nicht viel dazu ein. Alle mir bekannten Methoden von Word um Bilder/Grafiken einzufügen benötigen eine Pfadangabe zu der entsprechenden Datei.

Die einzigste Idee die ich habe, wäre der Weg über die Zwischenablage oder dass man die Bild-Ressource aus der Notes-Datenbank temporär auf die Platte speichert. Ob das mit Bild-Resourcen aber überhaupt möglich ist kann ich nicht sagen.

Axel

Navigation

[0] Themen-Index

[#] Nächste Seite

[*] Vorherige Sete