Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit
GELÖST

Word Seitenumbruch löschen

Frage Entwicklung VB for Applications

Mitglied: MarcoBorn

MarcoBorn (Level 1) - Jetzt verbinden

09.02.2015, aktualisiert 11.02.2015, 1388 Aufrufe, 3 Kommentare

Hallo Forum,
mit folgenden Code versuche ich, alle Seitenumbrüche in Word zu löschen:

01.
  Selection.HomeKey Unit:=wdStory 
02.
  Selection.EndKey Unit:=wdStory, Extend:=wdExtend 
03.
  Selection.Find.ClearFormatting 
04.
  Selection.Find.Replacement.ClearFormatting 
05.
  With Selection.Find 
06.
    .Text = "^m" 
07.
    .Replacement.Text = "" 
08.
    .Forward = True 
09.
    .Wrap = wdFindStop 
10.
    .Format = False 
11.
    .MatchCase = False 
12.
    .MatchWholeWord = False 
13.
    .MatchWildcards = False 
14.
    .MatchSoundsLike = False 
15.
    .MatchAllWordForms = False 
16.
  End With 
17.
  Selection.Find.Execute Replace:=wdReplaceAll
Den Code habe ich direkt vom Makrorecorder übernommen, aber leider funktioniert das Ganze nicht. Hat Word beim Löschen von Steuerzeichen per VBA ein Problem, oder muss ich dabei anders vorgehen?

Vielen Dank für Eure Hilfe,
M. Born
Mitglied: colinardo
LÖSUNG 09.02.2015, aktualisiert 11.02.2015
Hi Marco,
probiers mal hiermit, das macht hier testweise das gewünschte:
01.
Sub RemoveAllManualPageBreaks() 
02.
    With ThisDocument.Content.Find 
03.
        .Text = "^m" 
04.
        .Replacement.Text = "" 
05.
        .Execute Replace:=wdReplaceAll 
06.
    End With 
07.
End Sub
Grüße Uwe
Bitte warten ..
Mitglied: MarcoBorn
09.02.2015 um 13:45 Uhr
Hallo Uwe,
vielen Dank für Deinen Code. Ich muss gleich auf Dienstreise, werde es aber am Mittowch testen.

Viele Grüße,
Marco
Bitte warten ..
Mitglied: MarcoBorn
11.02.2015 um 11:58 Uhr
Hallo Uwe,
ich habe Deinen Code probiert und er funktioniert.

Vielen Dank,
Marco
Bitte warten ..
Ähnliche Inhalte
Microsoft Office
gelöst Schnellbausteine aus Word 2007 nach Word 2016 übernehmen (2)

Frage von TiTux zum Thema Microsoft Office ...

Windows Netzwerk
GPO- Word Vorlagen (2)

Frage von Technology-L zum Thema Windows Netzwerk ...

Microsoft Office
gelöst Standard Ansicht Word Navigationsleiste (9)

Frage von leofabian zum Thema Microsoft Office ...

Neue Wissensbeiträge
Heiß diskutierte Inhalte
Rechtliche Fragen
gelöst Geschäftsführer Email gefaked (18)

Frage von xbast1x zum Thema Rechtliche Fragen ...

Vmware
gelöst Update auf ESXI 6.5 Installieren (15)

Frage von zeroblue2005 zum Thema Vmware ...

Vmware
VMware ESX - Start einer VM verhindern (15)

Frage von emeriks zum Thema Vmware ...

Festplatten, SSD, Raid
gelöst Welche Software für Bandlaufwerk (14)

Frage von djonas zum Thema Festplatten, SSD, Raid ...