VBA 検索と置換の構文エラー

VBA 検索と置換の構文エラー

いくつかの HTML タグを検索して置換し、パイプをブレーク文字に置き換えています。パイプを Chr13 に置き換え、その後の手順として Chr13 を Chr10 に置き換える必要があります。以下は私が持っている VBA ですが、「コンパイル エラー: 構文エラー」が表示されます。以下に表示されるコードの問題を教えていただける方は、ぜひ教えてください。

SearchOrder:=xlByRows、MatchCase:=False、SearchFormat:=False、_ ReplaceFormat:=False Selection.Replace What:="—", Replacement:="-", LookAt:=xlPart、_ SearchOrder:=xlByRows、MatchCase:=False、SearchFormat:=False、_ ReplaceFormat:=False Selection.Replace What:="", Replacement:="", LookAt:=xlPart、_ SearchOrder:=xlByRows、MatchCase:=False、SearchFormat:=False、_ ReplaceFormat:=False Selection.Replace What:="", Replacement:="", LookAt:=xlPart、_ SearchOrder:=xlByRows、MatchCase:=False、SearchFormat:=False、_ ReplaceFormat:=False Selection.Replace What:="", Replacement:="", LookAt:=xlPart、_ SearchOrder:=xlByRows、MatchCase:=False、SearchFormat:=False、_ ReplaceFormat:=False Selection.Replace What:="ü", Replacement:="u", LookAt:=xlPart、_ SearchOrder:=xlByRows、MatchCase:=False、SearchFormat:=False、 _ ReplaceFormat:=False Selection.Replace What:=">", Replacement:="", LookAt:=xlPart, _ SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _ ReplaceFormat:=False Selection.Replace What:="<", Replacement:="", LookAt:=xlPart, _ SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _ ReplaceFormat:=False Selection.Replace What:=";", Replacement:="", LookAt:=xlPart, _ SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _ ReplaceFormat:=False Cells.Replace What:="|", Replacement:="" & Chr(13) & "", LookAt:=xlPart, SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, ReplaceFormat:=False ReplaceFormat:=False Cells.Replace What:="Chr(13)", Replacement:="" & Chr(10) & "", LookAt:=xlPart, SearchOrder _ :=xlByRows, MatchCase:=False, SearchFormat:=False, ReplaceFormat:=False

答え1

不足していますコンマ前に置換形式:=False

関連情報