Sub MAIN

BeginnDokument

BearbeitenErsetzen .Suchen = "=E4", .Ersetzen = "ä", .Richtung = 0, .GroßKleinschreibung = 0, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1
BearbeitenErsetzen .Suchen = "=C4", .Ersetzen = "Ä", .Richtung = 0, .GroßKleinschreibung = 0, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1
BearbeitenErsetzen .Suchen = "=fc", .Ersetzen = "ü", .Richtung = 0, .GroßKleinschreibung = 0, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1
BearbeitenErsetzen .Suchen = "=DC", .Ersetzen = "Ü", .Richtung = 0, .GroßKleinschreibung = 0, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1
BearbeitenErsetzen .Suchen = "=f6", .Ersetzen = "ö", .Richtung = 0, .GroßKleinschreibung = 0, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1
BearbeitenErsetzen .Suchen = "=D6", .Ersetzen = "Ö", .Richtung = 0, .GroßKleinschreibung = 0, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1
BearbeitenErsetzen .Suchen = "=df", .Ersetzen = "ß", .Richtung = 0, .GroßKleinschreibung = 0, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1
BearbeitenErsetzen .Suchen = "=^a", .Ersetzen = " ^a", .Richtung = 0, .GroßKleinschreibung = 0, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1


REM Reihenfolge!

BearbeitenErsetzen .Suchen = "è", .Ersetzen = "è", .Richtung = 0, .GroßKleinschreibung = 1, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1

BearbeitenErsetzen .Suchen = "Ã" + Chr$(182), .Ersetzen = "ö", .Richtung = 0, .GroßKleinschreibung = 1, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1

BearbeitenErsetzen .Suchen = "é", .Ersetzen = Chr$(233), .Richtung = 0, .GroßKleinschreibung = 0, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1

BearbeitenErsetzen .Suchen = "‘", .Ersetzen = Chr$(132), .Richtung = 0, .GroßKleinschreibung = 0, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1

BearbeitenErsetzen .Suchen = "’", .Ersetzen = Chr$(146), .Richtung = 0, .GroßKleinschreibung = 0, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1

BearbeitenErsetzen .Suchen = "›", .Ersetzen = ">", .Richtung = 0, .GroßKleinschreibung = 1, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1

BearbeitenErsetzen .Suchen = "‹", .Ersetzen = "<", .Richtung = 0, .GroßKleinschreibung = 1, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1



REM OPTIONAL, NEU

BearbeitenErsetzen .Suchen = "=09", .Ersetzen = "^t", .Richtung = 0, .GroßKleinschreibung = 0, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1
BearbeitenErsetzen .Suchen = "=20", .Ersetzen = " ", .Richtung = 0, .GroßKleinschreibung = 0, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1
BearbeitenErsetzen .Suchen = "=26", .Ersetzen = "&", .Richtung = 0, .GroßKleinschreibung = 0, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1
BearbeitenErsetzen .Suchen = "=2B", .Ersetzen = "+", .Richtung = 0, .GroßKleinschreibung = 0, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1
BearbeitenErsetzen .Suchen = "=2C", .Ersetzen = ",", .Richtung = 0, .GroßKleinschreibung = 0, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1
BearbeitenErsetzen .Suchen = "=2D", .Ersetzen = "-", .Richtung = 0, .GroßKleinschreibung = 0, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1
BearbeitenErsetzen .Suchen = "=2E", .Ersetzen = ".", .Richtung = 0, .GroßKleinschreibung = 0, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1
BearbeitenErsetzen .Suchen = "=2F", .Ersetzen = "\", .Richtung = 0, .GroßKleinschreibung = 0, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1
BearbeitenErsetzen .Suchen = "=3A", .Ersetzen = ":", .Richtung = 0, .GroßKleinschreibung = 0, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1
BearbeitenErsetzen .Suchen = "=3D", .Ersetzen = "=", .Richtung = 0, .GroßKleinschreibung = 0, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1
BearbeitenErsetzen .Suchen = "=3F", .Ersetzen = "?", .Richtung = 0, .GroßKleinschreibung = 0, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1
BearbeitenErsetzen .Suchen = "=5F", .Ersetzen = "_", .Richtung = 0, .GroßKleinschreibung = 0, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1
BearbeitenErsetzen .Suchen = "=7C", .Ersetzen = "|", .Richtung = 0, .GroßKleinschreibung = 0, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1
BearbeitenErsetzen .Suchen = "=96", .Ersetzen = "-", .Richtung = 0, .GroßKleinschreibung = 0, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1
BearbeitenErsetzen .Suchen = "=5B", .Ersetzen = "[", .Richtung = 0, .GroßKleinschreibung = 0, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1
BearbeitenErsetzen .Suchen = "=5D", .Ersetzen = "]", .Richtung = 0, .GroßKleinschreibung = 0, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1
BearbeitenErsetzen .Suchen = "=A9", .Ersetzen = "©", .Richtung = 0, .GroßKleinschreibung = 0, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1
BearbeitenErsetzen .Suchen = "=80", .Ersetzen = "Euro", .Richtung = 0, .GroßKleinschreibung = 0, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1

REM Unklar

BearbeitenErsetzen .Suchen = "=93", .Ersetzen = Chr$(147), .Richtung = 0, .GroßKleinschreibung = 0, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1
BearbeitenErsetzen .Suchen = "=84", .Ersetzen = Chr$(147), .Richtung = 0, .GroßKleinschreibung = 0, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1
BearbeitenErsetzen .Suchen = "=94", .Ersetzen = Chr$(148), .Richtung = 0, .GroßKleinschreibung = 0, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1
BearbeitenErsetzen .Suchen = "=B7", .Ersetzen = "^a-", .Richtung = 0, .GroßKleinschreibung = 0, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1

BearbeitenErsetzen .Suchen = "=A7", .Ersetzen = "§", .Richtung = 0, .GroßKleinschreibung = 0, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1


BearbeitenErsetzen .Suchen = "=?iso-8859-1?Q?", .Ersetzen = Chr$(34), .Richtung = 0, .GroßKleinschreibung = 0, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1

BearbeitenErsetzen .Suchen = "?=", .Ersetzen = Chr$(34), .Richtung = 0, .GroßKleinschreibung = 0, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1

BearbeitenErsetzen .Suchen = Chr$(34) + Chr$(34), .Ersetzen = Chr$(34), .Richtung = 0, .GroßKleinschreibung = 0, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1


REM URLS

BeginnDokument

BearbeitenErsetzen .Suchen = "%E4", .Ersetzen = "ä", .Richtung = 0, .GroßKleinschreibung = 0, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1
BearbeitenErsetzen .Suchen = "%C4", .Ersetzen = "Ä", .Richtung = 0, .GroßKleinschreibung = 0, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1
BearbeitenErsetzen .Suchen = "%fc", .Ersetzen = "ü", .Richtung = 0, .GroßKleinschreibung = 0, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1
BearbeitenErsetzen .Suchen = "%DC", .Ersetzen = "Ü", .Richtung = 0, .GroßKleinschreibung = 0, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1
BearbeitenErsetzen .Suchen = "%f6", .Ersetzen = "ö", .Richtung = 0, .GroßKleinschreibung = 0, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1
BearbeitenErsetzen .Suchen = "%D6", .Ersetzen = "Ö", .Richtung = 0, .GroßKleinschreibung = 0, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1
BearbeitenErsetzen .Suchen = "%df", .Ersetzen = "ß", .Richtung = 0, .GroßKleinschreibung = 0, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1


REM URLS OPTIONAL, NEU

BearbeitenErsetzen .Suchen = "%09", .Ersetzen = "^t", .Richtung = 0, .GroßKleinschreibung = 0, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1
BearbeitenErsetzen .Suchen = "%20", .Ersetzen = " ", .Richtung = 0, .GroßKleinschreibung = 0, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1
BearbeitenErsetzen .Suchen = "%26", .Ersetzen = "&", .Richtung = 0, .GroßKleinschreibung = 0, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1
BearbeitenErsetzen .Suchen = "%2B", .Ersetzen = "+", .Richtung = 0, .GroßKleinschreibung = 0, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1
BearbeitenErsetzen .Suchen = "%2C", .Ersetzen = ",", .Richtung = 0, .GroßKleinschreibung = 0, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1
BearbeitenErsetzen .Suchen = "%2D", .Ersetzen = "-", .Richtung = 0, .GroßKleinschreibung = 0, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1
BearbeitenErsetzen .Suchen = "%2E", .Ersetzen = ".", .Richtung = 0, .GroßKleinschreibung = 0, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1
BearbeitenErsetzen .Suchen = "%2F", .Ersetzen = "\", .Richtung = 0, .GroßKleinschreibung = 0, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1
BearbeitenErsetzen .Suchen = "%3A", .Ersetzen = ":", .Richtung = 0, .GroßKleinschreibung = 0, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1
BearbeitenErsetzen .Suchen = "%3D", .Ersetzen = "=", .Richtung = 0, .GroßKleinschreibung = 0, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1
BearbeitenErsetzen .Suchen = "%3F", .Ersetzen = "?", .Richtung = 0, .GroßKleinschreibung = 0, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1
BearbeitenErsetzen .Suchen = "%5F", .Ersetzen = "_", .Richtung = 0, .GroßKleinschreibung = 0, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1
BearbeitenErsetzen .Suchen = "%7C", .Ersetzen = "|", .Richtung = 0, .GroßKleinschreibung = 0, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1
BearbeitenErsetzen .Suchen = "%96", .Ersetzen = "-", .Richtung = 0, .GroßKleinschreibung = 0, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1
BearbeitenErsetzen .Suchen = "%5B", .Ersetzen = "[", .Richtung = 0, .GroßKleinschreibung = 0, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1
BearbeitenErsetzen .Suchen = "%5D", .Ersetzen = "]", .Richtung = 0, .GroßKleinschreibung = 0, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1

BearbeitenErsetzen .Suchen = "%22", .Ersetzen = Chr$(34), .Richtung = 0, .GroßKleinschreibung = 0, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1


REM OPTIONAL 2

BearbeitenErsetzen .Suchen = "^a^a", .Ersetzen = "^a", .Richtung = 0, .GroßKleinschreibung = 0, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1


REM NEU 1

BearbeitenErsetzen .Suchen = "ü", .Ersetzen = "ü", .Richtung = 0, .GroßKleinschreibung = 1, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1
BearbeitenErsetzen .Suchen = "Ãœ", .Ersetzen = "Ü", .Richtung = 0, .GroßKleinschreibung = 1, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1
BearbeitenErsetzen .Suchen = "ä", .Ersetzen = "ä", .Richtung = 0, .GroßKleinschreibung = 1, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1
BearbeitenErsetzen .Suchen = "Ã" + Chr$(34), .Ersetzen = "Ä", .Richtung = 0, .GroßKleinschreibung = 1, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1
BearbeitenErsetzen .Suchen = "Ö", .Ersetzen = "Ö", .Richtung = 0, .GroßKleinschreibung = 1, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1
BearbeitenErsetzen .Suchen = "ß", .Ersetzen = "ß", .Richtung = 0, .GroßKleinschreibung = 0, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1
BearbeitenErsetzen .Suchen = "É", .Ersetzen = "É", .Richtung = 0, .GroßKleinschreibung = 1, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1
BearbeitenErsetzen .Suchen = "§", .Ersetzen = "§", .Richtung = 0, .GroßKleinschreibung = 0, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1
BearbeitenErsetzen .Suchen = "®", .Ersetzen = "®", .Richtung = 0, .GroßKleinschreibung = 0, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1

BearbeitenErsetzen .Suchen = "À", .Ersetzen = "ä", .Richtung = 0, .GroßKleinschreibung = 1, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1

BearbeitenErsetzen .Suchen = "ÃŒ", .Ersetzen = "ü", .Richtung = 0, .GroßKleinschreibung = 1, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1

BearbeitenErsetzen .Suchen = "Ã?", .Ersetzen = "ß", .Richtung = 0, .GroßKleinschreibung = 1, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1

BearbeitenErsetzen .Suchen = "„", .Ersetzen = Chr$(132), .Richtung = 0, .GroßKleinschreibung = 0, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1
BearbeitenErsetzen .Suchen = "â€" + Chr$(157), .Ersetzen = Chr$(148), .Richtung = 0, .GroßKleinschreibung = 0, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1
BearbeitenErsetzen .Suchen = "“", .Ersetzen = Chr$(148), .Richtung = 0, .GroßKleinschreibung = 0, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1

REM BearbeitenErsetzen .Suchen = "â‚", .Ersetzen = " Euro", .Richtung = 0, .GroßKleinschreibung = 0, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1

BearbeitenErsetzen .Suchen = "â‚", .Ersetzen = " €", .Richtung = 0, .GroßKleinschreibung = 0, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1
BearbeitenErsetzen .Suchen = "â‚", .Ersetzen = " €", .Richtung = 0, .GroßKleinschreibung = 0, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1
BearbeitenErsetzen .Suchen = "â€" + Chr$(34), .Ersetzen = Chr$(151), .Richtung = 0, .GroßKleinschreibung = 0, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1
BearbeitenErsetzen .Suchen = "âž" + Chr$(34), .Ersetzen = " - ", .Richtung = 0, .GroßKleinschreibung = 0, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1
BearbeitenErsetzen .Suchen = "•", .Ersetzen = Chr$(149), .Richtung = 0, .GroßKleinschreibung = 0, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1
BearbeitenErsetzen .Suchen = "…", .Ersetzen = Chr$(133), .Richtung = 0, .GroßKleinschreibung = 0, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1
BearbeitenErsetzen .Suchen = "„", .Ersetzen = Chr$(149), .Richtung = 0, .GroßKleinschreibung = 0, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1
BearbeitenErsetzen .Suchen = "‚", .Ersetzen = Chr$(130), .Richtung = 0, .GroßKleinschreibung = 0, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1


REM NEU 2

BearbeitenErsetzen .Suchen = "=E2Euro=9E", .Ersetzen = Chr$(34), .Richtung = 0, .GroßKleinschreibung = 0, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1
BearbeitenErsetzen .Suchen = "=E2Euro=9C", .Ersetzen = Chr$(34), .Richtung = 0, .GroßKleinschreibung = 0, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1

BearbeitenErsetzen .Suchen = "&bdquo;", .Ersetzen = Chr$(132), .Richtung = 0, .GroßKleinschreibung = 0, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1
BearbeitenErsetzen .Suchen = "&ldquo;", .Ersetzen = Chr$(147), .Richtung = 0, .GroßKleinschreibung = 0, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1

BearbeitenErsetzen .Suchen = Chr$(34) + Chr$(34), .Ersetzen = Chr$(34), .Richtung = 0, .GroßKleinschreibung = 0, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1


BearbeitenErsetzen .Suchen = "C3=A4", .Ersetzen = "ä", .Richtung = 0, .GroßKleinschreibung = 1, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1

BearbeitenErsetzen .Suchen = "=C3=B6", .Ersetzen = "Ö", .Richtung = 0, .GroßKleinschreibung = 1, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1

BearbeitenErsetzen .Suchen = "=C3=BC", .Ersetzen = "ü", .Richtung = 0, .GroßKleinschreibung = 1, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1

BearbeitenErsetzen .Suchen = "=C3=9C", .Ersetzen = "Ü", .Richtung = 0, .GroßKleinschreibung = 1, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1

BearbeitenErsetzen .Suchen = "=C3=9F", .Ersetzen = "ß", .Richtung = 0, .GroßKleinschreibung = 1, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1

BearbeitenErsetzen .Suchen = "=E9", .Ersetzen = Chr$(233), .Richtung = 0, .GroßKleinschreibung = 0, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1



REM UPDATE 09 FF

BearbeitenErsetzen .Suchen = "%C3%9F", .Ersetzen = "ß", .Richtung = 0, .GroßKleinschreibung = 1, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1

BearbeitenErsetzen .Suchen = "%23", .Ersetzen = "#", .Richtung = 0, .GroßKleinschreibung = 1, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1

BearbeitenErsetzen .Suchen = "%0B", .Ersetzen = "", .Richtung = 0, .GroßKleinschreibung = 1, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1

BearbeitenErsetzen .Suchen = "amp;", .Ersetzen = "", .Richtung = 0, .GroßKleinschreibung = 1, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1

BearbeitenErsetzen .Suchen = "%0D", .Ersetzen = " ", .Richtung = 0, .GroßKleinschreibung = 1, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1

BearbeitenErsetzen .Suchen = "%7E", .Ersetzen = "~", .Richtung = 0, .GroßKleinschreibung = 1, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1



REM EINZELNE ANS ENDE EINGEFÜGT

BearbeitenErsetzen .Suchen = "Â", .Ersetzen = Chr$(160), .Richtung = 0, .GroßKleinschreibung = 0, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1

BearbeitenErsetzen .Suchen = "É", .Ersetzen = "é", .Richtung = 0, .GroßKleinschreibung = 1, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1

BearbeitenErsetzen .Suchen = "%C3%A9", .Ersetzen = "é", .Richtung = 0, .GroßKleinschreibung = 1, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1

BearbeitenErsetzen .Suchen = "ö‰", .Ersetzen = "é", .Richtung = 0, .GroßKleinschreibung = 1, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1

BearbeitenErsetzen .Suchen = "%A9", .Ersetzen = "©", .Richtung = 0, .GroßKleinschreibung = 0, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1

BearbeitenErsetzen .Suchen = "Ã", .Ersetzen = "ö", .Richtung = 0, .GroßKleinschreibung = 1, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1

BearbeitenErsetzen .Suchen = "Å'", .Ersetzen = "ö", .Richtung = 0, .GroßKleinschreibung = 1, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1

BearbeitenErsetzen .Suchen = "ű", .Ersetzen = "ü", .Richtung = 0, .GroßKleinschreibung = 1, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1

BearbeitenErsetzen .Suchen = Chr$(182), .Ersetzen = "", .Richtung = 0, .GroßKleinschreibung = 0, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1

BearbeitenErsetzen .Suchen = Chr$(172), .Ersetzen = "", .Richtung = 0, .GroßKleinschreibung = 0, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1

BearbeitenErsetzen .Suchen = Chr$(133), .Ersetzen = "...", .Richtung = 0, .GroßKleinschreibung = 0, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1


REM SETZT AN JEDE ENDZEILE MIT PUNKTUATION EINEN ABSATZ

BearbeitenErsetzen .Suchen = " ^a", .Ersetzen = "^a", .Richtung = 0, .GroßKleinschreibung = 0, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1

BearbeitenErsetzen .Suchen = ":^a", .Ersetzen = ": ^a^a", .Richtung = 0, .GroßKleinschreibung = 0, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1

BearbeitenErsetzen .Suchen = ")^a", .Ersetzen = ") ^a^a", .Richtung = 0, .GroßKleinschreibung = 0, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1

BearbeitenErsetzen .Suchen = ">^a", .Ersetzen = "> ^a^a", .Richtung = 0, .GroßKleinschreibung = 0, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1

BearbeitenErsetzen .Suchen = Chr$(34) + "^a", .Ersetzen = Chr$(34) + " ^a^a", .Richtung = 0, .GroßKleinschreibung = 0, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1

BearbeitenErsetzen .Suchen = ".^a", .Ersetzen = ". ^a^a", .Richtung = 0, .GroßKleinschreibung = 0, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1

BearbeitenErsetzen .Suchen = "!^a", .Ersetzen = "! ^a^a", .Richtung = 0, .GroßKleinschreibung = 0, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1

BearbeitenErsetzen .Suchen = "?^a", .Ersetzen = "? ^a^a", .Richtung = 0, .GroßKleinschreibung = 0, .GanzesWort = 0, .Mustervergleich = 0, .Reserviert23 = 0, .AllesErsetzen, .Format = 0, .Textfluß = 1


End Sub