Удалить кавычки в строке - VBA

Формулировка задачи:

Здравствуйте! На листе1 в строке 431 пятой колонки находится слово в кавычках - "Белая" Мне нужно убрать кавычки Я ввожу стринговую переменную и инициализирую её данными из ячейки. str = Trim(Worksheets(1).Cells(431, 5).Value) Получается переменная str = "Белая" Пишу: If (str Like "*" & Chr(34) & "*" & Chr(34) & "*") Then str= Replace(str, Chr(34), "") Но кавычки не убираются((( При этом для интереса написала ещё вот так: str1 = Chr(34) & "Белая" & Chr(34) И в этом случае конструкция If срабатывает и кавычки убираются. Так что же не так с первым вариантом, когда переменная инициализируется данными ячейки? Мелочь, но никак не могу обойти( Помогите, пожалуйста... Спасибо.


textual

Код к задаче: «Удалить кавычки в строке - VBA»

Range("E:E").Replace "'", "", xlPart '"''"
Эта работа вам не подошла?

Вы всегда можете заказать любую учебную работу у наших авторов от 20 руб.


СДЕЛАЙТЕ РЕПОСТ

5   голосов, оценка 4.600 из 5

Источник