Thema Datum  Von Nutzer Rating
Antwort
06.02.2022 15:46:29 Erich Körber
NotSolved
Blau Nach erstem Fund und ändern der Fundstelle zum nächsten Absatz gehen
06.02.2022 18:26:33 xlKing
NotSolved
07.02.2022 13:24:56 Erich Körber
NotSolved
07.02.2022 14:46:23 Erich Körber
Solved
07.02.2022 18:37:10 xlKing
NotSolved

Ansicht des Beitrags:
Von:
xlKing
Datum:
06.02.2022 18:26:33
Views:
315
Rating: Antwort:
  Ja
Thema:
Nach erstem Fund und ändern der Fundstelle zum nächsten Absatz gehen

Hallo Erich,

erstmal Respekt dass du dich in deinem hohen Alter noch mit VBA-Programmierung beschäftigst. Finde ich besser als irgendwelche Gedächtnisspiele, deren Ergebnisse man nach kurzer Zeit entweder auswendig kennt oder immer wieder vergisst. Wenn ich mal dein Alter erreiche, werde ich auch versuchen, durch Programmierung (evtl. in einer weiteren neuen Sprache) fit im Kopf zu bleiben.

Nun zu deinem Problem: Du durchsuchst erneut das gesamte Dokument nach Treffern, obwohl du eigentlich nur jeden Absatz einmal durchsuchen willst. Wie du die Absätze mit einer Schleife durchläufst hab ich dir ja gestern gezeigt. Genauso würde ich es wieder machen. Dann ist gesichert, dass zum nächsten Absatz gesprungen wird, egal ob nun ein Treffer gefunden und verändert wurde oder nicht. Du musst also nur statt ActiveDocument.Range den Range im jeweiligen Paragraphen durchsuchen.

Irgendwie werd ich das Gefühl nicht los, dass du hier Übungsaufgaben absolvierst. Dir dann einen weiteren fertigen Code vorzusetzen wäre demnach kontraproduktiv. Vielleicht probierst du erstmal meinen Tipp selbst, bevor ich dir die Lösung verrate.

Gruß Mr. K.


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
06.02.2022 15:46:29 Erich Körber
NotSolved
Blau Nach erstem Fund und ändern der Fundstelle zum nächsten Absatz gehen
06.02.2022 18:26:33 xlKing
NotSolved
07.02.2022 13:24:56 Erich Körber
NotSolved
07.02.2022 14:46:23 Erich Körber
Solved
07.02.2022 18:37:10 xlKing
NotSolved