¿Cómo usar la función WorksheetFunction.Ceiling_Precise en VBA?

En VBA (Visual Basic for Applications), que es el lenguaje de programación utilizado en Microsoft Excel, la función `WorksheetFunction.Ceiling_Precise` se utiliza para redondear un número hasta el múltiplo más cercano de significancia especificado.

Aquí te muestro cómo usar la función `Ceiling_Precise` en VBA:

Sub RedondearConCeilingPrecise()
    ' Declarar las variables
    Dim valorOriginal As Double
    Dim factor As Double
    Dim valorRedondeado As Double

    ' Asignar valores a las variables
    valorOriginal = 7.25 ' Por ejemplo, el número que deseas redondear
    factor = 0.05 ' El múltiplo al cual quieres redondear el número

    ' Utilizar la función WorksheetFunction.Ceiling_Precise para redondear
    valorRedondeado = Application.WorksheetFunction.Ceiling_Precise(valorOriginal, factor)

    ' Mostrar el resultado en un cuadro de diálogo
    MsgBox "El valor redondeado de " & valorOriginal & " es " & valorRedondeado
End Sub
  • Abre Microsoft Excel.
  • Presiona `ALT + F11` para abrir el editor de VBA (Microsoft Visual Basic para Aplicaciones).
  • Inserta un nuevo módulo si es necesario (clic derecho en el explorador de Proyectos -> Insertar -> Módulo).
  • Escribe la siguiente función de ejemplo en el módulo:

Este código define una subrutina llamada `RedondearConCeilingPrecise` que utiliza la función `Ceiling_Precise` de la colección `WorksheetFunction` para redondear un número (`valorOriginal`) al multiplo más cercano de `factor`.

Para ejecutar este código, simplemente presiona `F5` en el editor de VBA o ve al Excel y ejecuta la macro llamada `RedondearConCeilingPrecise` desde la pestaña de «Macros» en la vista de «Desarrollador». Esto debería mostrar un cuadro de mensaje con el valor redondeado.

Recuerda personalizar los valores de `valorOriginal` y `factor` según tus necesidades. El valor del `factor` puede ser cualquier valor positivo que desees y no solamente un valor decimal como 0.05. Si `factor` es 1, entonces simplemente redondeará al entero más cercano.

Conoce nuestra tienda

Ver más productos

Mejora tu nivel y logra tus objetivo

Excel

Excel cursos

Access

cursos de Access

Power BI

cursos power BI

Ayúdanos a hacer crecer el proyecto

Deja un comentario