La función WorksheetFunction.Ceiling_Math en VBA se usa para redondear un número hacia arriba al múltiplo más cercano deseado. Es similar a la función CEILING.MATH en Excel y está disponible a partir de la versión 2013 de Excel. Esta función es muy útil cuando se necesita estandarizar cantidades o precios a múltiplos fijos.

Aquí te muestro cómo usar WorksheetFunction.Ceiling_Math en VBA:

Sub CeilingMathExample()

    Dim numero As Double
    Dim multiplo As Double
    Dim direccion As Integer
    Dim resultado As Double

    ' Establece el número a redondear
    numero = 6.7

    ' Establece el múltiplo al cual quieres redondear
    multiplo = 2

    ' Establece la dirección (opcional)
    ' 0 hacia arriba o hacia abajo dependiendo del signo de número
    ' 1 siempre hacia arriba
    '-1 siempre hacia abajo (hacia arriba en valor absoluto para números negativos)
    direccion = 1

    ' Usa la función Ceiling_Math para redondear el número
    resultado = Application.WorksheetFunction.Ceiling_Math(numero, multiplo, direccion)

    ' Muestra el resultado
    MsgBox "El resultado redondeado es: " & resultado

End Sub

Este código define una subrutina que redondea el número 6.7 hacia el múltiplo más cercano de 2, que en este caso sería 8 porque la dirección se establece en 1 (redondear hacia arriba).

Parámetros

• Number: El número que quieres redondear.
• Significance (opcional): El múltiplo al que deseas redondear. Si no se especifica, el valor predeterminado es 1.
• Mode (opcional): Un número que especifica la dirección del redondeo. Si este número es positivo o cero (0), se redondea hacia arriba. Si es negativo, se redondea hacia abajo. Si se omite, se asume como 0 (esto afecta solo los números negativos; los positivos siempre se redondean hacia arriba).

Ten en cuenta que esta función redondeará siempre hacia «arriba» en términos matemáticos, es decir, un número positivo se redondeará hacia el valor positivo más cercano y un número negativo se redondeará hacia el valor más negativo (que es más grande en términos absolutos pero más pequeño en la escala de números negativos).

Recuerda que para ejecutar el código VBA debes abrir el editor de VBA (presiona ALT + F11 en Excel), insertar un nuevo módulo (haz clic derecho sobre «VBAProject», elige «Insertar» y luego «Módulo») y pega el código dentro de este módulo. Luego puedes ejecutar el código presionando F5 mientras estás en el editor y la subrutina seleccionada.

Conoce nuestra tienda

Ver más productos

Mejora tu nivel y logra tus objetivo

Excel

Access

Power BI

Ayúdanos a hacer crecer el proyecto