Text durch Absatzmarke ersetzen

Moderator: ModerationP

Text durch Absatzmarke ersetzen

Beitragvon Gast » 10. Jul 2021, 11:10

Hallo,
in einer Markierung wird Text durch eine Absatzmarke ersetzt.
Hiermit funktioniert es. Wird aber der Text kopiert und z.B. in notepad eingefügt, werden die durch den Code eingefügten Absatzmarken nicht berücksichtigt. Es wird ein fortlaufender Text dargestellt.
Was ist der Grund dafür bzw. wie bekommt man auch im kopierten Text das Return?
Gruß Hubert
Code: Alles auswählen
  With Selection
    .Find.ClearFormatting
    .Find.Replacement.ClearFormatting
      With .Find
      .Text = "xyz"
      .Replacement.Text = "^13"'oder vbcrlf
      .Forward = True
      .Wrap = wdFindContinue
      .Format = False
      .MatchCase = False
      .MatchWholeWord = False
      .MatchWildcards = False
      .MatchSoundsLike = False
      .MatchAllWordForms = False
    End With
    .Find.Execute Replace:=wdReplaceAll
Gast
 

Re: Text durch Absatzmarke ersetzen

Beitragvon theoS » 10. Jul 2021, 15:59

Vbcrlf sollte es eigentlich tun.
Da du hier die Suchen/Ersetzen Funktion verwendest, kannst du das mal mit ^p als Ersetzentext versuchen.
theo s.
Benutzeravatar
theoS
Im Profil kannst Du frei den Rang ändern
 
Beiträge: 5724
Registriert: 19. Apr 2008, 00:14

Re: Text durch Absatzmarke ersetzen

Beitragvon Gast » 10. Jul 2021, 16:09

Hallo,
^p funktioniert
Danke, Gruß Hubert
Gast
 


Zurück zu Word Forum (provisorisch)

Wer ist online?

Mitglieder in diesem Forum: 0 Mitglieder und 15 Gäste