Vba: como formatar células como porcentagem

Você pode usar a seguinte sintaxe básica no VBA para formatar cada célula em um intervalo como uma porcentagem.

 SubFormatPercent ()
    Dim i As Integer

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

Este exemplo específico formata cada célula no intervalo A2:A11 como um valor percentual com duas casas decimais.

O exemplo a seguir mostra como usar essa sintaxe na prática.

Exemplo: formatar células como porcentagem usando VBA

Suponha que temos a seguinte lista de valores no Excel:

Digamos que queremos formatar cada valor como uma porcentagem.

Por exemplo:

• 0,22 deve ser formatado como 22%.
• 0,35 deve ser formatado como 35%.

E assim por diante.

Podemos criar a seguinte macro para fazer isso:

 SubFormatPercent ()
    Dim i As Integer

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

Quando executamos esta macro, recebemos a seguinte saída:

Cada valor agora é formatado como uma porcentagem com duas casas decimais.

Observe que o número de zeros após o ponto decimal na propriedade NumberFormat especifica o número de casas decimais a serem exibidas em cada porcentagem.

Poderíamos usar a seguinte sintaxe para não exibir casas decimais em cada porcentagem:

 SubFormatPercent ()
    Dim i As Integer

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

Quando executamos esta macro, recebemos a seguinte saída:

Observe que as casas decimais foram removidas de cada valor percentual.

Nota : Você pode encontrar a documentação completa da propriedade NumberFormat do VBA aqui .

Recursos adicionais

Os tutoriais a seguir explicam como realizar outras tarefas comuns em VBA:

VBA: Como classificar uma planilha por múltiplas colunas
VBA: Como contar o número de linhas no intervalo
VBA: como filtrar uma coluna