Страницы: 1
RSS
В функции Replace ошибка при указании заменяемого текста
 
Всем доброго дня. Написал небольшой парсер, теперь удаляю ненужные символы, значения с ячеек. Но VBA ругается на следующую запись, я так подозреваю он распознает как некую команду, а мне нужно чтоб он просто находил как текст. На форуме порылся нашел записи про экранирование кавычками, сами кавычки экранируются, а вот data никак.
Код
Cells(j, 1) = Replace(Cells(j, 1), "" data-live", "")
 
Cells(j, 1) = Replace(Cells(j, 1), "data-live", "")
текст, заключается в кавычки - по ОДНОЙ с двух сторон

если вы хотите ЗАМЕНИТЬ кавычки, то можно (чтобы не путаться) писать через функцию СИМВОЛ - 34 для кавычки
Cells(j, 1) = Replace(Cells(j, 1), Chr(34) & " data-live", "") - эта команда удалит такое сочетание символов — " data-live
Изменено: Jack Famous - 03.07.2020 09:58:16
Во всех делах очень полезно периодически ставить знак вопроса к тому, что вы с давних пор считали не требующим доказательств (Бертран Рассел) ►Благодарности сюда◄
 
Jack Famous, спасибо Вам огромное!!!
 
Цитата
Jack Famous написал:
то можно (чтобы не путаться) писать через функцию СИМВОЛ - 34
конечно при множестве ковычек читаемость страдает при использовании
Код
Cells(j, 1) = Replace(Cells(j, 1), """ data-live", "")

но может оказаться еще хуже если
Код
Cells(j, 1) = Replace(Cells(j, 1), Chr(34) & " data-live", "")

это на любителя.
Изменено: БМВ - 03.07.2020 10:45:35
По вопросам из тем форума, личку не читаю.
 
Anton Anton, пожалуйста)
Название темы: VBA. Как заменить кавычки
Во всех делах очень полезно периодически ставить знак вопроса к тому, что вы с давних пор считали не требующим доказательств (Бертран Рассел) ►Благодарности сюда◄
Страницы: 1
Наверх