Thema Datum  Von Nutzer Rating
Antwort
19.03.2019 18:58:07 maomaq
NotSolved
Blau Liste von Wörtern um ihre Synonyme erweitern
19.03.2019 23:39:22 Gast85475
NotSolved
20.03.2019 10:00:16 maomaq
NotSolved
21.03.2019 01:17:31 Gast85475
NotSolved
21.03.2019 23:21:54 maomaq
NotSolved
22.03.2019 22:17:03 Gast85475
NotSolved
22.03.2019 22:39:51 Gast85475
NotSolved
22.03.2019 22:44:10 Gast85475
NotSolved

Ansicht des Beitrags:
Von:
Gast85475
Datum:
19.03.2019 23:39:22
Views:
587
Rating: Antwort:
  Ja
Thema:
Liste von Wörtern um ihre Synonyme erweitern

Ändere in deinem zweiten Codeschnipsel mal die Zeile

Set mySynInfo = SynonymInfo(Word:=oCell.Value, LanguageID:=wdEnglishUS)

in

Set mySynInfo = SynonymInfo(Word:=oCell.Value, LanguageID:=WdLanguageID.wdGerman)

ab. Es geht doch um deutsche Wörter und nicht um englische? ;)

 

Das Makro wirft dann das aus:

Gebäude (1) Haus (noun)        
Heizung (1) Ofen (noun)        
Schloss (5) Palais (noun) Verschluss (noun) Abbrach (verb) Annahm (verb) Zuriegelte (verb)
Lüftung (1) Abzug (noun)        
energetisch (0) No meanings found        

 

Grüße


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
19.03.2019 18:58:07 maomaq
NotSolved
Blau Liste von Wörtern um ihre Synonyme erweitern
19.03.2019 23:39:22 Gast85475
NotSolved
20.03.2019 10:00:16 maomaq
NotSolved
21.03.2019 01:17:31 Gast85475
NotSolved
21.03.2019 23:21:54 maomaq
NotSolved
22.03.2019 22:17:03 Gast85475
NotSolved
22.03.2019 22:39:51 Gast85475
NotSolved
22.03.2019 22:44:10 Gast85475
NotSolved