Usando una combinación de funciones integradas en Microsoft Excel y funciones que cree con VBA puede ayudar a encontrar soluciones a problemas más complejos. Puede crear funciones en un módulo de VBA en Excel que devolverá un resultado basado en un parámetro de entrada. La función que ha creado estará disponible para su uso en Excel, junto con todas las demás funciones integradas de Excel. En unos pocos pasos, puede crear una función para volver al día actual como una cadena, en base a la fecha actual del sistema.
Instrucciones
1 Haga clic en A1 y escriba "= AHORA ()" para obtener la fecha actual del sistema. Haga clic en la pestaña "desarrolladores" y haga clic en "Visual Basic" para iniciar el Editor de Visual Basic. Haga clic en el menú "Insertar" y haga clic en "Módulo" para insertar un nuevo módulo de código.
2 Crear una nueva función con una variable de tipo de datos "Fecha" como parámetro de entrada:
Función pública getDayOfWeek (dateEntered Como Fecha)
3 Crear una variable para contener el número del día:
Dim dayNum As Integer
4 Utilice la función de "Día de la semana" para devolver el número del día usando la variable "dateEntered":
dayNum = Weekday(dateEntered, vbSunday)
5 Use un "case" para determinar el día y devolver el nombre del día como una cadena:
Select Case dayNum
Caso 1
getDayOfWeek = "Sunday"
caso 2
getDayOfWeek = "Lunes"
caso 3
getDayOfWeek = "Martes"
caso 4
getDayOfWeek = "Miércoles"
caso 5
getDayOfWeek = "Jueves"
caso 6
getDayOfWeek = "Viernes"
caso 7
getDayOfWeek = "Sábado"
End Select
6 Termine su función escribiendo "End Function" en el final. Cambie de nuevo a Microsoft Excel y escriba "= getDayOfWeek (A1)" en B1 para mostrar el día actual con la fecha en A1.