Vba: so formatieren sie zellen als prozentsatz

Sie können die folgende grundlegende Syntax in VBA verwenden, um jede Zelle in einem Bereich als Prozentsatz zu formatieren.

 SubFormatPercent ()
    Dim i As Integer

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

In diesem speziellen Beispiel wird jede Zelle im Bereich A2:A11 als Prozentwert mit zwei Dezimalstellen formatiert.

Das folgende Beispiel zeigt, wie diese Syntax in der Praxis verwendet wird.

Beispiel: Zellen mit VBA als Prozentsatz formatieren

Angenommen, wir haben die folgende Werteliste in Excel:

Nehmen wir an, wir möchten jeden Wert als Prozentsatz formatieren.

Zum Beispiel:

• 0,22 sollte als 22 % formatiert werden.
• 0,35 sollte als 35 % formatiert werden.

Und so weiter.

Dazu können wir das folgende Makro erstellen:

 SubFormatPercent ()
    Dim i As Integer

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

Wenn wir dieses Makro ausführen, erhalten wir die folgende Ausgabe:

Jeder Wert wird jetzt als Prozentsatz mit zwei Dezimalstellen formatiert.

Beachten Sie, dass die Anzahl der Nullen nach dem Dezimalpunkt in der NumberFormat- Eigenschaft die Anzahl der Dezimalstellen angibt, die in jedem Prozentsatz angezeigt werden sollen.

Wir könnten die folgende Syntax verwenden, um in jedem Prozentsatz keine Dezimalstellen anzuzeigen:

 SubFormatPercent ()
    Dim i As Integer

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

Wenn wir dieses Makro ausführen, erhalten wir die folgende Ausgabe:

Beachten Sie, dass die Dezimalstellen aus jedem Prozentwert entfernt wurden.

Hinweis : Die vollständige Dokumentation für die VBA-Eigenschaft NumberFormat finden Sie hier .

Zusätzliche Ressourcen

In den folgenden Tutorials wird erläutert, wie Sie andere häufige Aufgaben in VBA ausführen:

VBA: So sortieren Sie ein Blatt nach mehreren Spalten
VBA: So zählen Sie die Anzahl der Zeilen im Bereich
VBA: So filtern Sie eine Spalte