Thema Datum  Von Nutzer Rating
Antwort
Rot VBA Suche (Find)
 10.05.2013 14:15:59 Dennis
NotSolved
10.05.2013 17:17:14 Dennis
Solved

Ansicht des Beitrags:
Von:
Dennis		 Datum:
10.05.2013 14:15:59		 Views:
1365		 Rating:
     
Antwort:
  Ja
Thema:
VBA Suche (Find)

Hallo zusammen, ich bins mal wieder...

ich habe einen Bericht aus Access in Word exportiert. Das Funktioniert auch alles klasse. Allerdings müssen jetzt 

lateinische Wörte kursiv sein. Meine Idee dazu war:

Ich suche mir "einfach" die Lateinischen Begriffe (ich weiß genau welche es sind) raus mit find, diese formatier ich dann einfach in italic.

Gute überlegung, allerdings bekomme ich es nicht hin...

wordobj.Selection.Find.Text = "Enterobacteriaceae"
wordobj.Selection.Find.Replacement.Text = ""
wordobj.Selection.Font.Italic = True
wordobj.Selection.Find.Forward = True
wordobj.Selection.Find.Wrap = wdFindContinue
wordobj.Selection.Find.Format = False
wordobj.Selection.Find.MatchCase = True
wordobj.Selection.Find.MatchWholeWord = False
wordobj.Selection.Find.MatchWildcards = False
wordobj.Selection.Find.MatchSoundsLike = False
wordobj.Selection.Find.MatchAllWordForms = False
    
wordobj.Selection.Find.Execute Replace:=wdReplaceAll

 

Finden funktioniert, denn die FUnktion löscht das gesuchte Wort aus der Word Datei.....

 

Ich bedanke mich schon jetzt für Eure Hilfe!

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 VBA Suche (Find)
 10.05.2013 14:15:59 Dennis
NotSolved
10.05.2013 17:17:14 Dennis
Solved