Findes det et program der kan slette gentagne sætninger i Word

Jeg kender ikke et program til dette, men du kan lave en VBA kode som kan.

i Word, tast ALT+F11
klik Insert, Module

i det hvide modulvindue indsætter du en kopi af nedenstående.

Når det er gjort, skulle du kunne taste F5 tasten, og koden kørere og rydder op i din fil.

HUSK altid at tage en backup af din fil inden du kører en kode!!

Koden er ikke pæn, men virker:

'********************
Sub RemoveDubbletHyperlinks()
Dim myLink As Hyperlink
Dim myLinkTest As Hyperlink
Dim bolAllTested As Boolean
Dim intCountLinks As Integer
Dim intConuntAllLinks As Integer
Do Until bolAllTested = True
    For Each myLink In ActiveDocument.Hyperlinks
        intCountLinks = 0
        For Each myLinkTest In ActiveDocument.Hyperlinks
            If myLink.Address = myLinkTest.Address Then
                intCountLinks = intCountLinks + 1
                If intCountLinks > 1 Then
                    myLinkTest.Range.Delete
                    intCountLinks = 0
                    GoTo startover
                End If
            End If
        Next
    Next
    bolAllTested = True
startover:
Loop
End Sub

Du kan også gøre det så simpelt som her:

Dit dokument:

Link Link Link

\\Rediger/Søg og erstat:
link link link
Erstat med link
/ptj_11

pjt_11:
Dog kun hvis links ligger i forlængelse, og ikke i en tabel....

Tak for hjælpen.

Store Stygge>>
Du har ret. Jeg skal vist holde op med at læse indlæggene så sent. Så kunne det være, at jeg opfattede alt hvad jeg læste.
/ptj_11

hasse16: Velbekomme
pjt_11: Det er bedre at agere end ikke at agere ;0)