У меня есть поиск и замена для некоторых тегов HTML, а также замена труб с символами разрыва. Мне нужно заменить pipe на Chr13, а затем заменить Chr13 на Chr10 в качестве следующего шага - ниже представлен VBA, который у меня есть, но он вызывает сообщение «Ошибка компиляции: ошибка синтаксиса». Любой, кто сможет сообщить мне о проблеме по приведенному ниже коду, пожалуйста:
SearchOrder:= xlByRows, MatchCase:= False, SearchFormat:= False, _ ReplaceFormat:= False Selection.Заменить что:= "-", Замена:= "-", LookAt:= xlPart, _ SearchOrder:= xlByRows, MatchCase:= False, SearchFormat:= False, _ ReplaceFormat:= False Selection.Заменить What:= "", Replacement:= "", LookAt:= xlPart, _ SearchOrder:= xlByRows, MatchCase:= False, SearchFormat:= False, _ ReplaceFormat:= False Selection.Заменить What:= "", Replacement:= "", LookAt:= xlPart, _ SearchOrder:= xlByRows, MatchCase:= False, SearchFormat:= False, _ ReplaceFormat:= False Selection.Заменить What:= "ü", Замена:= "u", LookAt:= xlPart, _ SearchOrder:= xlByRows, MatchCase:= False, SearchFormat:= False, _ ReplaceFormat:= False Selection.Заменить What:= ">", Замена:= "", LookAt:= xlPart, _ SearchOrder:= xlByRows, MatchCase:= False, SearchFormat:= False, _ ReplaceFormat:= False Selection.Заменить What:= "<", Замена:= "", LookAt:= xlPart, _ SearchOrder:= xlByRows, MatchCase:= False, SearchFormat:= False, _ ReplaceFormat:= False Selection.Заменить What:= ";", Замена:= "", LookAt:= xlPart, _ SearchOrder:= xlByRows, MatchCase:= False, SearchFormat:= False, _ ReplaceFormat:= False Cells.Заменить What:= "|", Замена:= "" & Chr(13) & "", LookAt:= xlPart, SearchOrder:= xlByRows, MatchCase:= False, SearchFormat:= False, ReplaceFormat:= False ReplaceFormat:= False Клетки.Заменить What:= "Chr(13)", Replacement:= "" & Chr(10) & "", LookAt:= xlPart, SearchOrder _:= xlByRows, MatchCase:= False, SearchFormat:= False, ReplaceFormat:= False