Funzione RoundUp VBA di Excel
Simile alla funzione del foglio di lavoro in cui arrotondiamo i numeri agli interi più vicini, in VBA abbiamo una funzione RoundUp che riduce il punto decimale per noi e la sintassi per utilizzare la funzione roundup è la seguente Round up (Number, Number of Digits After Decimal ) questi due argomenti nella funzione sono obbligatori.
Quando lavoriamo con numeri e calcoli, otteniamo numeri frazionari dopo il numero intero, ed è abbastanza comune nelle attività quotidiane. In genere non ci preoccupiamo dei valori decimali perché non hanno alcun impatto sul nostro risultato finale. In queste situazioni, dobbiamo arrotondare i numeri al numero intero più vicino o al numero intero immediato. Utilizzando la funzione RoundUp, possiamo effettivamente eseguire questa operazione.
Se hai cercato in VBA la funzione RoundUp, non devi averla trovata perché è una funzione del foglio di lavoro. Per accedere alla funzione RoundUp, è necessario utilizzare la classe della funzione del foglio di lavoro VBA.
![](https://cdn.know-base.net/9513401/vba_roundup_funciton_to_round_up_numbers_in_excel_2.png.webp)
Prima di questo, ricorda la sintassi della funzione RoundUp.
![](https://cdn.know-base.net/9513401/vba_roundup_funciton_to_round_up_numbers_in_excel_3.png.webp)
Esempi
Eseguiamo il compito di arrotondare per eccesso il numero “288.5264”. Vedremo tutti i numeri con questo esempio.
Esempio # 1 - Quando il secondo argomento è zero
Guarda il codice VBA sottostante.
Codice:
Sub RoundUp_Example1 () Dim k As Double k = WorksheetFunction.RoundUp (288.5264, 0) MsgBox k End Sub
![](https://cdn.know-base.net/9513401/vba_roundup_funciton_to_round_up_numbers_in_excel_4.png.webp)
- Quando esegui il codice sopra, convertirà il numero fornito, ovvero 288.5264, nel numero intero più vicino, ovvero 289
![](https://cdn.know-base.net/9513401/vba_roundup_funciton_to_round_up_numbers_in_excel_5.png.webp)
Esempio # 2 - Quando il secondo argomento è 1
Guarda il codice seguente per vedere cosa succede quando ne passiamo uno come secondo argomento.
Codice:
Sub RoundUp_Example2 () Dim k As Double k = WorksheetFunction.RoundUp (288.5264, 1) MsgBox k End Sub
![](https://cdn.know-base.net/9513401/vba_roundup_funciton_to_round_up_numbers_in_excel_6.png.webp)
- Questo codice convertirà il numero dato in un punto decimale, ovvero 288,6
![](https://cdn.know-base.net/9513401/vba_roundup_funciton_to_round_up_numbers_in_excel_7.png.webp)
Esempio # 3 - Quando il secondo argomento è 2
Guarda il codice seguente per vedere cosa succede quando ne passiamo due come secondo argomento.
Codice:
Sub RoundUp_Example3 () Dim k As Double k = WorksheetFunction.RoundUp (288.5264, 2) MsgBox k End Sub
![](https://cdn.know-base.net/9513401/vba_roundup_funciton_to_round_up_numbers_in_excel_8.png.webp)
- Questo codice convertirà il numero specificato in due punti decimali, ovvero 288,53
![](https://cdn.know-base.net/9513401/vba_roundup_funciton_to_round_up_numbers_in_excel_9.png.webp)
Esempio # 4 - Quando il secondo argomento è 3
Guarda il codice seguente per vedere cosa succede quando ne passiamo tre come secondo argomento.
Codice:
Sub RoundUp_Example4 () Dim k As Double k = WorksheetFunction.RoundUp (288.5264, 3) MsgBox k End Sub
![](https://cdn.know-base.net/9513401/vba_roundup_funciton_to_round_up_numbers_in_excel_10.png.webp)
- Questo codice convertirà il numero specificato in tre punti decimali, ovvero 288,527
![](https://cdn.know-base.net/9513401/vba_roundup_funciton_to_round_up_numbers_in_excel_11.png.webp)
Esempio # 5 - Quando il secondo argomento è -1
Guarda il codice seguente per vedere cosa succede quando passiamo meno uno come secondo argomento.
Codice:
Sub RoundUp_Example5 () Dim k As Double k = WorksheetFunction.RoundUp (288.5264, -1) MsgBox k End Sub
![](https://cdn.know-base.net/9513401/vba_roundup_funciton_to_round_up_numbers_in_excel_12.png.webp)
- Questo codice convertirà il numero dato nella decina più vicina, ovvero 290.
![](https://cdn.know-base.net/9513401/vba_roundup_funciton_to_round_up_numbers_in_excel_13.png.webp)
Esempio # 6 - Quando il secondo argomento è -2
Guarda il codice seguente per vedere cosa succede quando passiamo meno due come secondo argomento.
Codice:
Sub RoundUp_Example6 () Dim k As Double k = WorksheetFunction.RoundUp (288.5264, -2) MsgBox k End Sub
![](https://cdn.know-base.net/9513401/vba_roundup_funciton_to_round_up_numbers_in_excel_14.png.webp)
- Questo codice convertirà il numero specificato nel centinaio più vicino, ovvero 300.
![](https://cdn.know-base.net/9513401/vba_roundup_funciton_to_round_up_numbers_in_excel_15.png.webp)
Esempio # 7 - Quando il secondo argomento è -3
Guarda il codice seguente per vedere cosa succede quando passiamo meno tre come secondo argomento.
Codice:
Sub RoundUp_Example7 () Dim k As Double k = WorksheetFunction.RoundUp (288.5264, -3) MsgBox k End Sub
![](https://cdn.know-base.net/9513401/vba_roundup_funciton_to_round_up_numbers_in_excel_16.png.webp)
- Questo codice convertirà il numero nelle migliaia più vicine, ovvero 1000.
![](https://cdn.know-base.net/9513401/vba_roundup_funciton_to_round_up_numbers_in_excel_17.png.webp)
In questo modo, possiamo utilizzare la funzione ROUNDUP in VBA come parte della classe di funzioni del foglio di lavoro per arrotondare i numeri in base al secondo argomento fornito.