Si desea que se actualice automáticamente el día de la semana de hoy, este artículo es para usted. Este artículo se centra en actualizar al usuario el día actual de la semana a través de msgbox en vba.
Pregunta): Quiero un código para determinar el día de la semana.
Necesitamos seguir los pasos a continuación para iniciar el editor de VB
- Haga clic en la pestaña Desarrollador
- Desde el grupo de código, seleccione Visual Basic
- Haga clic en Insertar y luego en Módulo
- Esto creará un nuevo módulo
- Ingrese el siguiente código en el Módulo
Sub Hoy ()
Seleccione Case DatePart ("w", Date, vbMonday)
Caso 1
MsgBox "Mon"
Caso 2
MsgBox "Mar"
Caso 3
MsgBox "Mié"
Caso 4
MsgBox "Jue"
Caso 5
MsgBox "Vie"
Caso 6
MsgBox "Sat"
Caso 7
MsgBox "Sol"
Finalizar Seleccionar
End Sub
Nota: La fecha de hoy es el 5 de junio de 2015, es decir, el viernes.
"VbMonday" se utiliza para devolver el lunes como primer día de la semana; en caso de que el domingo sea el primer día de la semana, entonces debe usar "VbSunday"
- Presione la tecla de método abreviado ALT + F8 para abrir la ventana Macro
- Seleccione la macro que acaba de crear
- Haga clic en Ejecutar y obtendremos el nombre de la fecha de hoy.
- Si desea cambiar el formato de viernes a viernes
- Necesitas hacer pequeños cambios en el código.
Sub Hoy ()
Seleccione Case DatePart ("w", Date, vbMonday)
Caso 1
MsgBox "Lunes"
Caso 2
MsgBox "Martes"
Caso 3
MsgBox "Miércoles"
Caso 4
MsgBox "Jueves"
Caso 5
MsgBox "Viernes"
Caso 6
MsgBox "Sábado"
Caso 7
MsgBox "Domingo"
Finalizar Seleccionar
End Sub
- Esta vez podrá mostrar el nombre completo del día.
En esto podemos usar el cuadro de mensaje de VBA para notificar al usuario sobre el día actual de la semana.
