Ahora podrá crear mis propias formulas Se emociona
Introducción a Macros y VBA
¿Qué es VBA y qué son las macros?
Espacio de VBA
Diagrama de flujo
Variables y tipos de datos
Funciones y subrutinas
Grabar y correr macros
Quiz: Introducción a Macros y VBA
Funciones y subrutinas
Sintaxis de funciones y subrutinas
Crear una función
Crear una subrutina
Message Box
Input Box
Select Case
If - Then
Ciclos For - Next
Ciclos Do While - Loop
Quiz: Funciones y subrutinas
Resumen y conclusión
Resumen y conclusión
No tienes acceso a esta clase
¡Continúa aprendiendo! Únete y comienza a potenciar tu carrera
Si ya tienes una cuenta,
Crear una función
8/17Recursos
Aprender a crear funciones en Visual Basic te dará autonomía y eficiencia en tus proyectos, permitiéndote resolver problemas específicos mediante la personalización del entorno. Las funciones te pueden ahorrar tiempo y esfuerzo, facilitando tu trabajo con tareas repetitivas o cálculos complejos. En este artículo, descubrirás cómo crear una función en Visual Basic y cómo implementarla en Excel para maximizar tus resultados.
¿Cómo crear una función en Visual Basic?
Crear una función en Visual Basic es un proceso metódico que empieza por la definición de un problema que necesitas resolver. Por ejemplo, calcular un año después de agregar un número fijo al año actual.
¿Cuáles son los pasos para definir una función básica?
- Definir la función y sus parámetros: Declara una función pública en tu módulo que contemple un número entero como atributo de entrada y que devuelva un número entero.
- Definir la operación: Realiza la operación deseada, como sumar un valor fijo al atributo de entrada.
- Asegurar la corrección técnica: Comprueba que la función está correctamente configurada. Visual Basic proporciona señales visuales para posibles errores, como el subrayado en rojo.
- Guardar el resultado: El resultado de la operación debe ser asignado al nombre de la función para retornar el valor esperado.
¿Cómo se puede probar la función?
Para verificar la funcionalidad correcta de tu función dentro de Visual Basic, usa la ventana "Inmediato" (disponible en el menú "Ver"). Allí:
- Utiliza un signo de interrogación seguido del nombre de tu función.
- Introduce un valor numérico que se ajusta al tipo de dato esperado.
- Presiona Enter para ver el resultado calculado.
Este método es inmediato para verificar la función con diferentes parámetros, asegurando su correcto funcionamiento.
¿Cómo usar la función en Excel?
Una vez definida en Visual Basic, la función personalizada puede ser integrada en Excel. Esto te permite ampliar el potencial de tus hojas de cálculo al utilizar operaciones específicas no disponibles en las funciones estándar de Excel.
- Implementar la función: Escribe
igual ( = )y el nombre de tu función en una celda de Excel, selecciona o ingresa el parámetro adecuado. - Verificación del resultado: Excel devolverá el cálculo basado en la lógica definida en Visual Basic, tal como lo verías en el entorno de desarrollo.
¿Qué hacer en caso de ingresar datos incorrectos?
Visual Basic maneja los errores redondeando valores erróneos al tipo esperado. Por ejemplo, si ingresas un decimal cuando se espera un entero, este se redondeará automáticamente. Esto garantiza que las funciones permanezcan robustas ante entradas inesperadas.
¿Cuál es el siguiente paso en el aprendizaje de Visual Basic?
Te animamos a aplicar lo aprendido creando una función propia, como calcular el cuadrado de un número. Este ejercicio te ayudará a familiarizarte más con la sintaxis y lógica del lenguaje. ¡Comparte tus resultados para seguir mejorando y compartir tus avances! Con práctica continua, te volverás cada vez más competente y eficiente en el uso de Visual Basic.
Aportes 309
Preguntas 24
Ordenar por:
Es increíble no sabia que se podía hacer esto, ahora puedo hacer una función que se llame " el loco Hugo" y que haga algo útil.
Jajajaja.
Decidí crear una función para edad.
Mi primera prueba de Función con VBA
Public Function prueba(X As Integer) As Integer
prueba = X * 38
End Function
Aquí mi solución, yo más o menos se programar, pero el crear un script tan sencillo con un lenguaje que no conozco me emociono.
Wow profe Ana, cuando le dio “=” en excel y le salió la función prueba cambió mi vida. Puedo hacer mis propias funciones!!!
Hecho!
.
Si queremos crear una formula que contenga mas de un parámetro, el separador que se debe usar es coma (,) o punto y coma (😉 según el idioma que uses, y recuerda que dentro del libro de excel los parámetros se pudieran tan cual fueron crearon en la función, y esta función ejecutara con estos parámetros las indicaciones dadas. Importante, integer lo podemos usar para números máximos de 3 caracteres, mayores de ahí recomendable usar long
En el momento en que la profe Ana ingresa 1.5 VBA ejecuta redondeo puesto que no reconoce el número como decimal. Para que se reconozca como decimal se debe ingresar con coma (,) y no con punto(.). De esa manera si se ingresa el decimal con el signo coma (,) automáticamente arroja un error puesto que no lo reconoce como entero (Integer).
Function DIAS_HABilES(D_HABILES As Long, FECHA As Date, Rango_Festivo As Range)
Dim Fhabil As Date
Dim dia
Dim n_vuelta
Dim FESTIVo
Fhabil = FECHA
n_vuelta = 1
Dfes = 0
'‘MsgBox Rango_Festivo.Address
’'Hoja2.Range(“A:A”).NumberFormat = “General”
Do Until dia >= D_HABILES
Set CELDA = Rango_Festivo.Find(What:=Fhabil * 1, LookIn:=xlValues, LookAt:=xlPart)
If CELDA Is Nothing Then FESTIVo = 0 Else FESTIVo = 1
''MsgBox n_vuelta
'Valido si el dia es habil
If Weekday(Fhabil, vbSaturday) = 1 Or Weekday(Fhabil, vbSunday) = 1 Or FESTIVo = 1 Then
If dia = D_HABILES Then dia = dia - 1
Fhabil = FECHA + n_vuelta
Else
' MsgBox "dia " & dia
' MsgBox Format(fhabil, "dd-mm-yyyy") & "-" & Format(fhabil, "dddd")
If dia <> D_HABILES Then dia = dia + 1
If dia <> D_HABILES Then Fhabil = FECHA + n_vuelta
End If
n_vuelta = n_vuelta + 1
Loop
DIAS_HABilES = Fhabil
End Function
Funcion avanzar desde una fecha n cantidad de dias Habiles
mis aportes
¡Lo logré!
Sabía que existía visual basic pero ni idea que servía para crear funciones.
Está hecho 👇
Al momento de probar la formula que creé me lanzó un error, sobre que no estaban habilitadas ciertas funciones.
No estoy segura si es la forma correcta pero modifique la ventana de Centro de confianza como se ve en la imagen y ya empezo a funcionar.
Si alguien tiene el mismo problema espero que les sirva.
Buen día:
Envió mi primera función:
Feliz día.
Aplique una condicional para devolver un booleano
Hola, me sale error ' Se ha producido el error '13' en tiempo de ejecución : no coinciden los tipos , agradezco su ayuda
me sale error alguien me podria ayudar
Ya empezamos
Primera funcion en VBA 
Public Function porsimismo(X As Integer) As Integer
porsimismo = X * X
End Function
Public Function AL_CUADRADO(X As Integer) As Integer
AL_CUADRADO = X * X
End Function
Así me quedo
Public Function multiplica(X As Integer) As Integer
multiplica = X * X
End Function
Buenas tardes profesora me arrojó bien el resultado
- Done 👍
Ejercicio de la clase
Es la primera vez que utilizo esto y de verdad no tenía idea de para que servía, ahora que lo he visto le veo el gran potencial que tiene y cuantos dolores de cabeza me hubiera ahorrado en el pasado, con el tiempo desarrollé un método propio para ejecutar funciones en las celdas de Excel que llevan una cantidad de parámetros impresionantes que ahora seguro se ejecutaran de manera mas eficiente.
![]()
¿Qué es?
**Programar con Visual Basic for Applications (VBA)** implica escribir código para automatizar tareas en aplicaciones de Microsoft, como Excel. Se utiliza para crear macros, funciones y subrutinas que optimizan flujos de trabajo y mejoran la eficiencia.
Para empezar, instala Excel y accede al editor de VBA desde la pestaña "Desarrollador". Luego, puedes seguir estos pasos:
1. Define el problema que deseas resolver.
2. Escribe tu código en el editor de VBA.
3. Prueba tu función en el entorno de inmediato para verificar resultados.
## **¿Una función en Visual Basic es parte de su programación?**
Sí, hacer una función es parte de programar con Visual Basic. Al crear funciones, defines un conjunto de instrucciones que realizan una tarea específica, lo que permite reutilizar código y simplificar procesos en tus macros de Excel. En el contexto de Visual Basic, las funciones se utilizan para ejecutarse de manera eficiente y resolver problemas específicos, como se explicó en la clase sobre cómo crear funciones. Esto es fundamental para desarrollar habilidades en programación y automatizar tareas.
Saludos, Maria CRM
```txt
```
```js
Public Function prueba(x As Integer) As Integer
prueba = x * x
End Function
````Public Function prueba(x As Integer) As Integer`
` prueba = x * x`
` `
`End Function`
Asignación de la profesora:
Intenté hacer dos funcione, me salieron bien. gran curso.
Esta son las funciones que escribí en clase:
y las pruebas:
Buen día:
Comparto resultado de mi primera función
Feliz día.
Ejercicio
Ame esta clase
la suma m la hace cuando pongo el código en inmediato, pero me sale este aviso siempre, que hago? por favor ayuda
Aqui tengo el ejercicio hecho.
Ahi va el codigo para multiplicar la variable por si misma
Función para calcular el índice de masa corporal.
*aquí realicé el ejercicio aplicando el valor del IVA en Chile con el ejercicio de multiplicación*
Nombrada en Honor a Cosmo : 
Muy contenta con este aprendizaje..
Que genial ..!!
Función multiplicar un número por si mismo
wow, ser capaz de crear tus propias funciones, eso si esta loquisimo
Por lo que puedo observar, hay muchas formas de llegar al resultado, ya sea x\*x o x^2, lo importante es llegar a la solución. 
Realizada, ahora a crear mis propias formulas. :)
Este es el código 
y este es el resultado
lo hice asi suponiendo que es la funcion de area de un circulo, si alguien sabe una forma directa de poner exponente, agradezco.
gracias por tanto Platzi :D
![]()
mi parte:
¿Por qué en la ventana de Inmediato, se coloca '?"?
¿Es solo para llamar a la función o tiene alguna otra función? y qué más puede hacer?
Function de multiplicar un numero por sí mismo
realice el ejercicio y se puso en amarillo, porque?
Done
EJEMPLO MULTIPLICAR UN NUMERO ENTERO POR SÍ MISMO :
EN VBA
Public Function Multiplicar(x As Integer) As Integer Multiplicar = x \* x End Function
Logrado!
Genial, mi primera funcion con VBA
Here my homework
Public Function MultiplicarPorSiMismo(x As Integer) As Integer
MultiplicarPorSiMismo = x \* x
End Function
Public Function loc(M As Integer) As Integer
loc = M \* 5
End Function
?loc(5)
25
Public Function cuadrado(X As Double) As Double
cuadrado = X \* X
End Function
Entorno VBA función que multiplica X\*X
Este es el código:
`Public Function EsSiMismo(X As Integer) As Integer`
` EsSiMismo = X * X`
`End Function`
¿Quieres ver más aportes, preguntas y respuestas de la comunidad?