Я написал макрос для удаления специальных символов на листе на основе значений ascii, но проблема в том, что он заменяет содержимое ячейки. Например, p;j;h
который должен стать p,j,h
становится ,,
(пропуская данные). Нужно ли включать какие-либо дополнительные операторы или как еще настроить свой код?
sub specialcharecters()
Dim i As Long
For i = 32 To 43
Selection.Replace what:=Chr(i), replacement:=", ", LookAt:=xlPart, SearchOrder:= _
xlByRows, MatchCase:=False, SearchFormat:=False, ReplaceFormat:=False
Next i
END sub