Добрый день! не могу понять как мне сделать, макрос копирует столбец и вставляет как значение, после удаляет символы, но вылезает ошибка Преобразовать в число, с зеленым уголочком и нужно вручную проводить.
Как макрос сделать, чтобы после копирования, сразу было значение.
В вручную все проходит хорошо, а макросом вылезает эта ошибка.
Как макрос сделать, чтобы после копирования, сразу было значение.
В вручную все проходит хорошо, а макросом вылезает эта ошибка.
| Код |
|---|
Range("A2:A8").Copy
Worksheets("Лист1").Range("A2:A8").PasteSpecial Paste:=xlPasteValues
Selection.Replace What:=",", Replacement:="", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
Selection.Replace What:=".", Replacement:=",", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
Selection.Replace What:="$", Replacement:="", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
|
