В VBA это очень просто
Range("A1").Value = Range("A1").Value
Возможно, потребуется квалифицировать лист, если вы вызываете его из модуля et c.
Worksheets("Sheet 1").Range("A1").Value = Worksheets("Sheet 1").Range("A1").Value
Если вы делая это в больших масштабах, и вы не используете типы валюты или даты, вы можете использовать .Value2
, чтобы ускорить процесс.
https://docs.microsoft.com/en-us/office/vba/api/excel.range.value2
Range("A1").Value2 = Range("A1").Value2