Excel макрос

Макрос замены точки на запятую в выделенных ячейках

Sub Макрос_замены_точки_на_запятую()
Selection.Replace What:=".", Replacement:=","
End Sub


Макрос замены запятой на точку в выделенных ячейках

Sub Макрос_замены_запятых_на_точки()
Selection.Replace What:=",", Replacement:="."
End Sub