Link to home
Start Free TrialLog in
Avatar of Michael Murphy
Michael MurphyFlag for Ireland

asked on

Words Divided at end of line - how to correct whose document (Word 2013)

I am editing a document in which words are split at the end of lines (line ends with hyphen and the word is completed on next line).
Is there any way of correcting all of these without having to manually adjust each one.
Avatar of Pawan Kumar
Pawan Kumar
Flag of India image

Try..

1. Control-Shift-Hyphen
2. Control-Shift-Spacebar
Avatar of Rgonzo1971
Rgonzo1971

Hi,

pls try

Home / Editing / Replace

if you don't see the Special button, click More.
Click Special
Click Optional Hyphen to remove manual hyphens.
or
Click Nonbreaking Hyphen to remove nonbreaking hyphens.

Leave the Replace with box empty.
Click Find Next, Replace, or Replace All.

Regards
You could do a find and replace,

Find: -
Replace:  (leave blank)

In Publisher there is a setting in Options that will produce Auto-Hyphenation. It can be disabled but it only applies to text Boxes that are created after the setting is disabled. Those created prior to changing the setting will retain their hyphens but again a Find and Replace should remove them.

Thanks
Rob H
SOLUTION
Avatar of Paul Sauvé
Paul Sauvé
Flag of Canada image

Link to home
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
Start Free Trial
Avatar of Michael Murphy

ASKER

Thanks for the information above.
The problem is that I have a lot of hyphens which I entered in the text which do NOT occur at the end of a Page and which I need to keep.   (ever-increasing; Indo-China; anti-clerical; Moulin-a-Vent etc)

I only want to delete the hypens at the end of lines (which divide whole words). I can do this manually, but I was wondering if there is a quick way of going about it.
ASKER CERTIFIED SOLUTION
Link to home
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
Start Free Trial
Hi,

pls try

Sub SearchHyphenEndOfLine()
    Dim iCount As Integer
    Selection.HomeKey Unit:=wdStory
    With Selection.Find
        .ClearFormatting
        .Text = "-"
        .Replacement.Text = ""
        .Forward = True
        .Wrap = wdFindContinue
        .Format = False
        .Execute
    End With

    Do While Selection.Find.Found = True And iCount < 1000
        iCount = iCount + 1
        HyphenLn = Selection.Information(wdFirstCharacterLineNumber)
        Set rng = ActiveDocument.Range(Selection.End, Selection.End + 1)
        If rng.Information(wdFirstCharacterLineNumber) > HyphenLn Then
            Selection.Delete
        End If
        Selection.Find.Execute
    Loop
End Sub

Open in new window

Regards
Where and how do I apply this. Will do it.
SOLUTION
Link to home
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
Start Free Trial