verschiedene formatvorlagen nutzen

  • Word

Es gibt 3 Antworten in diesem Thema. Der letzte Beitrag () ist von roddy.

    verschiedene formatvorlagen nutzen

    hallo,

    weiß nich so richtig ob ich in diser kategorie richtig bin,
    aber hier meine frage...

    ist möchte daten aus einer access datenbank via vba an word schicken und je nach dem ob

    wertA = wertB ist formatvorlage1 nutzen
    und wenn
    wertA=/=wertB ist formatvorlage2 nutzen

    weiß nicht ob es theoretisch möglich ist, aber trotzdem frage ich einmal.

    code kann ich nich schicken, weil ich ja nicht weiß wie ich es bauen soll...

    könnte nat in word 2 variablen einfügen also:

    if wert1=wert2 then wert2=var2 else wert2=var1

    und dann in meiner wordvorlage 2 felder angeben, aber dann gibt es dort ja in leerzeichen wenn eine andere formatvorlage genutzt wird...und das sieht ja komisch aus...


    thx für antworten... :) :) :)


    nofulaso
    Hallo und willkommen!

    Formatvorlagen kann man mit VBA über "Styles" zuweisen. In deinem Fall könnte das z. B. so aussehen:

    Visual Basic-Quellcode

    1. If WertA = WertB Then
    2. Selection.Style = ActiveDocument.Styles("Überschrift 1")
    3. Else
    4. Selection.Style = ActiveDocument.Styles("Überschrift 2")
    5. End If


    "Selection" stellt dabei den aktuell markierten Text dar. Ich hab jetzt einfach als Beispiel die Formatvorlagen "Überschrift 1" und "Überschrift 2" genommen.

    Wenn du Textmarken benutzt, kannst du auch direkt die Textmarken ansprechen, z. B. so:

    Visual Basic-Quellcode

    1. ActiveDocument.Bookmarks("Textmarke1").Range.Style = ActiveDocument.Styles("Überschrift 1")

    danke für deine antwort... aber müsste noch mal spezieller fragen...

    hier mal ein paar code schnippsel


    Visual Basic-Quellcode

    1.  Dim oApp As New Word.Application Dim oDoc As Word.Document
    2. 'Anweisungen'
    3. Set oDoc = oApp.Documents.Add(CurrentProject.Path & "\" & "test.doc")
    4. oDoc.CustomDocumentProperties("var_im_doc").Value = wert_für_var 



    und für wert_für_var
    müsste jetzt noch iwie 2 formatvolagen nutzen können...


    wäre sehr nice, wenn man du mir noch einmal helfen könntest :)

    lg nofulaso

    NoFuLaSo schrieb:

    und für wert_für_var
    müsste jetzt noch iwie 2 formatvolagen nutzen können...


    Also, ich verstehe das nicht so ganz.

    Wenn du meinst, dass bestimmte Stellen im Word-Dokument abhängig vom Wert von "var_im_doc" in einer von 2 bestimmten Formatvorlagen formatiert sein sollen, kannst du das realisieren, indem du im VB-Projekt des betreffenden Word-Dokuments unter "ThisDocument" im Open-Ereignis einen Code schreibst der die Formatvorlage zuweist (siehe meine erste Antwort). Dann wird der Code jedesmal ausgeführt, wenn das Dokument geöffnet wird.

    Open-Ereignis:

    Visual Basic-Quellcode

    1. Private Sub Document_Open()
    2. End Sub


    Soll das ganze Dokument in der Formatvorlage formatiert sein, geht das dann so:

    Visual Basic-Quellcode

    1. ThisDocument.Range.Style = ThisDocument.Styles("Überschrift 1")