|
Nur zum Verständnis. Aus Überschrift1, Text zu Überschrift1, Überschrift2, Text zu Überschrift2, Überschrift3, Text zu Überschrift 3 soll z.B. Überschrift3, Text zu Überschrift 3, Überschrift1, Text zu Überschrift1, Überschrift2, Text zu Überschrift2 werden? Gibt es ein Inhaltsverzeichnis das danach aktualisiert werden soll? Oder soll die Sortierung nur im Inhaltsverzeichnis stattfinden und nicht Dokumententext?
Wie gut ist dein VBA? Das solltest du auch selbst hinbekommen. Oder von mir aus mit Chat GPT. ICh würde zunächst die Anzahl der Überschriften ermitteln, dann mit Redim ein zweidimensionales Array anlegen wobei die erste dimension die Position der Überschriften ist und die zweite Dimension der zugehörige Text. Die Position der Überschriften kannst du mit Rnd * Anzahl Überschriften zufällig berechnen und dann im Array ablegen. Beachte, dass nur dort was abgelegt werden darf, wo noch nichts drin steht. leerst du dein Dokument und gehst mit einer Schleife durch das Array um den Text von oben nach unten ins Dokument zu schreiben.
Wenn du das so ChatGpt beibringst, sollte ein akzeptables Ergebnis rauskommen.
Gruß Mr. K.
|