Thema Datum  Von Nutzer Rating
Antwort
Rot Text zwischen Klammern Formatvorlage zuweisen
02.03.2019 01:44:04 Thomas
NotSolved
02.03.2019 08:57:52 Gast18102
NotSolved

Ansicht des Beitrags:
Von:
Thomas
Datum:
02.03.2019 01:44:04
Views:
668
Rating: Antwort:
  Ja
Thema:
Text zwischen Klammern Formatvorlage zuweisen

Hallo zusammen,

ich habe folgendes Script, das bei einem bestehen Dokument den Text durchsucht und wenn es einen Text zwischen Klammern findet, soll der Text incl. der Klammern einer Formatvorlage zugewiesen werden:

Sub Makro1()
    Selection.Find.ClearFormatting
    Selection.Find.Replacement.ClearFormatting
    Selection.Find.Replacement.Style = ActiveDocument.Styles("Regieanweisung")
    
    With Selection.Find
        .Text = "(^?)"
        .Replacement.Text = ""
        .Forward = True
        .Wrap = wdFindContinue
        .Format = True
        .MatchCase = False
        .MatchWholeWord = False
        .MatchWildcards = False
        .MatchSoundsLike = False
        .MatchAllWordForms = False
    End With
    Selection.Find.Execute Replace:=wdReplaceAll
End Sub

Wie schaffe ich es, das (^?) ein bis sagen wir mal 100 Zeichen sein können? Geht das mit einer Schleife?

 

lg

Thomas


Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
Rot Text zwischen Klammern Formatvorlage zuweisen
02.03.2019 01:44:04 Thomas
NotSolved
02.03.2019 08:57:52 Gast18102
NotSolved