Anzeige
Archiv - Navigation
1416to1420
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Word Absatz

Word Absatz
30.03.2015 20:21:35
Paul
Hallo,
folende Frage: brauche den Code,der mit in einem aktiven Wordokument das Word "Exclusiones" sucht. Danach zwei Absatz einfuegt und dann quasi die Worte "Apfel", "Birne" und "Ananas" in eine einzelne Zeile einfuegt. ich bekomme es irgendwie nicht ganz hin.
sollte dann so aussehen:
Exclusiones
Apfel
Birne
Ananas
Danke,
lg Paul

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Word Absatz
31.03.2015 08:08:41
JoWE
Hi Paul,
vllt. so:
Sub versuch()
Dim re As String
re = "Exclusiones" & vbCr & vbCr & _
vbCr & "Apfel" & vbCr & "Birne" & _
vbCr & "Ananas" & vbCr
With Selection.Find
.ClearFormatting
.Text = "Exclusiones"
.Replacement.ClearFormatting
.Replacement.Text = re
.Execute Replace:=wdReplaceAll, Forward:=True, _
Wrap:=wdFindContinue
End With
End Sub

Gruß
Jochen
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige