So verwenden sie die floor-funktion in vba (mit beispielen)
Sie können die Floor- Methode in VBA verwenden, um die Zahl in einer Zelle auf das nächste signifikante Vielfache zu runden.
Hier ist eine gängige Methode, diese Funktion in der Praxis zu verwenden:
SubToFloor ()
Dim i As Integer
For i = 2 To 10
Range("C" & i) = WorksheetFunction.Floor(Range("A" & i), Range("B" & i))
Next i
End Sub
Dieses spezielle Makro rundet jeden Wert im Bereich A2:A10 auf das nächste signifikante Vielfache, das im Bereich B2:B10 angegeben ist, und zeigt die Ergebnisse im Bereich C2:C10 an.
Das folgende Beispiel zeigt, wie diese Syntax in der Praxis verwendet wird.
Beispiel: So verwenden Sie die Floor-Funktion in VBA
Angenommen, wir haben eine Liste von Werten in Spalte A und eine weitere Liste signifikanter Vielfacher in Spalte B, auf die wir jeden Wert runden möchten zu:
Wir können das folgende Makro mit der Floor -Methode in VBA erstellen, um jeden Wert in Spalte A auf das signifikante Vielfache in Spalte B zu runden:
SubToFloor ()
Dim i As Integer
For i = 2 To 10
Range("C" & i) = WorksheetFunction.Floor(Range("A" & i), Range("B" & i))
Next i
End Sub
Wenn wir dieses Makro ausführen, erhalten wir die folgende Ausgabe:
Spalte C zeigt das Ergebnis der Verwendung der Floor -Methode für jeden Wert in Spalte A.
Wir können zum Beispiel sehen:
- 12,2452, abgerundet auf das nächste Vielfache von 0,001, ergibt 12,245 .
- 14,927, abgerundet auf das nächste Vielfache von 0,01, ergibt 14,92 .
- -5,23, abgerundet auf das nächste Vielfache von 0,1, ist -5,3 .
Und so weiter.
Hinweis : Die vollständige Dokumentation zur VBA- Floor -Methode finden Sie hier .
Zusätzliche Ressourcen
In den folgenden Tutorials wird erläutert, wie Sie andere häufige Aufgaben in VBA ausführen:
So runden Sie Werte in VBA
So runden Sie Werte in VBA
So runden Sie Werte in VBA auf 2 Dezimalstellen