Søg/Erstat 100 ord

Er det samme ord/sætning?

Nej det er 100 forskellige ord jeg vil have fjernet som er flettet ind i alt muligt andet jeg gerne ville beholde

Så har jeg ikke anden løsning end Ctrl+b og et ord af gange..

Det ville jeg meget gerne uden om - da jeg regner med at skulle bruge det igen næste uge :/

Så laver du vel bare en kopi af dokumentet og gør det der?

:) næste uge er det nyt ark - så skulle sidde at lave det manuelt er ikke en løsning

Jeg vil gerne forsøge at hjælpe, hvis du vil sende filen.
hans.knudsensnabelamail.tele.dk

Prøv med følgende makro:

Sub Makro1()
Dim i As Integer
For i = 1 To 100
        Columns("A:A").Select
        Selection.Replace What:=Left(Cells(i, 2), 1), Replacement:="", LookAt:=xlPart, _
            SearchOrder:=xlByRows, MatchCase:=True
    Next
End Sub

Selection.Copy
    Columns("A:A").Select
    Selection.Replace What:="Blå", Replacement:="", LookAt:=xlPart, _
        SearchOrder:=xlByRows, MatchCase:=True, SearchFormat:=False, _
        ReplaceFormat:=False
    Range("B2").Select
    Application.CutCopyMode = False

HVis men tager udgangpunkt i ovenstående - kan man så ikke sætte nogle flere ord ind i "What:="Blå"" så den erstatter Blå, Gul eller Rød med Replacement:="" ?