excel как заменить кавычки «» на "" автоматически в каждой ячейке?

Есть несколько способов. Пишу про два.
Первый - стандартным инструментом Поиск/Замена. Делается в два этапа. Сначала заменяем « на ", а потом » на ".
Правка -> Заменить.
В поле Найти: «
В поле Заменить на: "
Нажать "Заменить все"
и
Правка -> Заменить.
В поле Найти: »
В поле Заменить на: "
Нажать "Заменить все"
Второй – макросом. Макрос заменит обе кавычки за раз, в выделенном диапазоне.
Код
Sub Repl_quot_marks()
For Each cell In Selection
If cell.Value <> "" Then
cell.Replace What:="«", Replacement:=""""
cell.Replace What:="»", Replacement:=""""
End If
Next
End Sub
После вставки кода в Module1 проекта VBA, его можно запустить через меню Сервис ->Макросы (работа макросов в книге должна быть разрешена)