Thema Datum  Von Nutzer Rating
Antwort
07.05.2013 09:19:15 Niels Söth
NotSolved
Blau Aus Excel heraus farbige Word-Textstellen suchen
 07.05.2013 13:33:13 Gast89289
NotSolved

Ansicht des Beitrags:
Von:
Gast89289		 Datum:
07.05.2013 13:33:13		 Views:
804		 Rating:
     
Antwort:
  Ja
Thema:
Aus Excel heraus farbige Word-Textstellen suchen

Als erstes würd ich dazu raten in der obersten Zeile (vor allen anderen Dingen)

Option Explicit

zu setzen (falls noch nicht geschehen) und erstmal alle Variablen zu deklarieren, die verwendet werden.

In deinem Code arbeitest du mit late binding, daher müsstest du alles was in meinen Codeschnipseln mit Word. anfängt in Object ändern. Alternativ könntest du auch early binding verwenden, gehe dazu bitte im VBA-Menü Extras -> Verweise... und suche nach Microsoft Word x Object Library (das x steht für die Version), setz bei ihr einen hacken und bestätige das Fenster. Dann sollten angaben wie Word.Range auch in Excel funktionieren.

 

Als nächstes

Dim objDoc As Word.Document
Set objDoc = AppWD.Documents.Open(WordPfad)

und weiter unten dann

Dim rngWD As Word.Range
Set rngWD = objDoc.Content

With rngWD.Find
  .Forward = True
  .Format = True
  .Font.Color = Farbe
End With

zum suchen schreibe

rngWD.Find.Execute

Gruß

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
07.05.2013 09:19:15 Niels Söth
NotSolved
Blau Aus Excel heraus farbige Word-Textstellen suchen
 07.05.2013 13:33:13 Gast89289
NotSolved