Vba: як відформатувати комірки у відсотках

Щоб відформатувати кожну комірку в діапазоні у відсотках, можна використовувати такий базовий синтаксис у VBA.

 SubFormatPercent ()
    Dim i As Integer

    For i = 2 To 11
    Range(" A " & i).NumberFormat = " 0.00% "
    Next i
    
End Sub

У цьому конкретному прикладі кожна клітинка в діапазоні A2:A11 форматується як відсоткове значення з двома знаками після коми.

У наступному прикладі показано, як використовувати цей синтаксис на практиці.

Приклад: відформатуйте клітинки у відсотках за допомогою VBA

Припустимо, у нас є наступний список значень в Excel:

Скажімо, ми хочемо відформатувати кожне значення у відсотках.

Наприклад:

• 0,22 має бути відформатовано як 22%.
• 0,35 має бути відформатовано як 35%.

І так далі.

Для цього ми можемо створити такий макрос:

 SubFormatPercent ()
    Dim i As Integer

    For i = 2 To 11
    Range(" A " & i).NumberFormat = " 0.00% "
    Next i
    
End Sub

Коли ми запускаємо цей макрос, ми отримуємо такий результат:

Кожне значення тепер відформатовано у відсотках із двома знаками після коми.

Зауважте, що кількість нулів після десяткової коми у властивості NumberFormat визначає кількість десяткових знаків для відображення в кожному відсотку.

Ми могли б використати такий синтаксис, щоб не відображати знаки після коми в кожному відсотку:

 SubFormatPercent ()
    Dim i As Integer

    For i = 2 To 11
    Range(" A " & i).NumberFormat = " 0% "
    Next i
    
End Sub

Коли ми запускаємо цей макрос, ми отримуємо такий результат:

Зауважте, що десяткові знаки видалено з кожного відсоткового значення.

Примітка . Ви можете знайти повну документацію щодо властивості VBA NumberFormat тут .

Додаткові ресурси

У наступних посібниках пояснюється, як виконувати інші типові завдання у VBA:

VBA: Як сортувати аркуш за кількома стовпцями
VBA: як підрахувати кількість рядків у діапазоні
VBA: як відфільтрувати стовпець