Изменение формата представления чисел нештатными средствами

С помощью небольшого макроса можно быстро установить выделенному диапазону ячеек формат «два знака после запятой». Данный макрос выглядит следующим образом (листинг 3.62).

Листинг 3.62. Формат «два знака после запятой»

Sub ChangeNumberFormat()

Selection.NumberFormat = «0.00»

End Sub

После выполнения макроса числа в выделенном диапазоне будут отображены с двумя знаками после запятой (например, число 54 будет показано как 54,0 0).

Для форматирования ячеек с использованием разделителя по разрядам можно применить такой макрос (листинг 3.63).

Листинг 3.63. Использование разделителя по разрядам

Sub ThreeNullSepatator()

Selection.NumberFormat = «#,##»

End Sub

В результате выполнения данного макроса число, например, 1234 5 67 будет представлено в виде 1 234 567. Не стоит забывать, что перед запуском макроса необходимо выделить диапазон, который должен быть отформатирован.

Чтобы отформатировать какой-либо диапазон с использованием разделителя по разрядам и отображением двух знаков после запятой, можно воспользоваться следующим макросом (листинг 3.64).

Листинг 3.64. Изменение формата

Sub ChangeNumerFormatEx()

Selection.NumberFormat = «#,##0.00»

End Sub

В данном случае перед запуском макроса также необходимо выделить требуемый диапазон.