Thema Datum  Von Nutzer Rating
Antwort
12.09.2011 16:38:27 Julia
Solved
Blau Textbereich mit Hilfe von Anfang und EndeCode finden, markieren und ausblenden
 13.09.2011 09:47:49 Dekor
NotSolved
14.09.2011 14:54:30 Gast6471
NotSolved

Ansicht des Beitrags:
Von:
Dekor		 Datum:
13.09.2011 09:47:49		 Views:
895		 Rating:
     
Antwort:
  Ja
Thema:
Textbereich mit Hilfe von Anfang und EndeCode finden, markieren und ausblenden

Hallo Julia,

bin mir aber mit dem Objekt wdstory nicht ganz sicher, aber im Prinzip geht es so.

Sub TEST()
'
' Alle mit #XX gekennzeichneten Texte ausblenden
'
'
    Selection.HomeKey Unit:=wdStory
    ActiveWindow.ActivePane.View.ShowAll = True
'Anfang Schleife - Ausstieg falls Dokumentende erreicht
Do While Not wdstory.EOF
' 
    Selection.Find.ClearFormatting
    With Selection.Find
        .Text = "#XX"
    End With
    Selection.Find.Execute
    Selection.Extend
    Selection.Find.ClearFormatting
    With Selection.Find
        .Text = "#XX"
    End With
    Selection.Find.Execute
    With Selection.Font
        .Hidden = True
    End With
    Selection.MoveRight Unit:=wdCharacter, Count:=1
    Selection.Find.ClearFormatting
'Ende Schleife
Loop
'
End Sub

 

Gruß Detlev

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
12.09.2011 16:38:27 Julia
Solved
Blau Textbereich mit Hilfe von Anfang und EndeCode finden, markieren und ausblenden
 13.09.2011 09:47:49 Dekor
NotSolved
14.09.2011 14:54:30 Gast6471
NotSolved