Excel Avanzado

Macros, Vba en Excel y muchos ejemplos de nuestro Curso de Excel Avanzado

Excel Avanzado
Ejemplo1.1 150x150, Función WeekDay en VBA

Función WeekDay en VBA

| 1 comentario

La función Weekday es utilizada para devolver un número (valor) que representa el día de la semana, dado un valor de fecha.

Sintaxis:

Weekday ( date, [ firstdayofweek ] )

Argumentos:

  • Date: Requerido. Una fecha expresada como número o fecha (formato).
  • Firstdayofweek: Opcional. Un valor que especifica el primer día de la semana.

Valores:

Los valores que puede tomar firstdayofweek son:

  • vbUseSystemDayOfWeek, cuyo valor es 0 y es predeterminado para que el primer día de la semana sea elespecificado en la configuración del sistema.
  • vbSunday, cuyo valor es 1 y es predeterminado para Domingo.
  • vbMonday, cuyo valor es 2 y es predeterminado para Lunes.
  • vbTuesday, cuyo valor es 3 y es predeterminado para Martes.
  • vbWednesday, cuyo valor es 4 y es predeterminado para Miércoles.
  • vbThursday, cuyo valor es 5 y es predeterminado para Jueves.
  • vbFriday, cuyo valor es 6 y es predeterminado para Viernes.
  • vbSaturday, cuyo valor es 7 y es predeterminado para Sábado.

Nota: En caso no especificar el firstdayofweek, VBA utilizará vbSunday como predeterminado.

Ejemplo 1:

Sub Numdia1()
'
'Proceso para devolver un número que representa el día de la semana, dado un valor de fecha
'
Dia = Range("A1")
Diavalor = Weekday(Dia)
MsgBox "El valor numérico para la fecha seleccionada es: " & Diavalor
End Sub

Nota: La fecha corresponde al de la celda "A1" de la hoja activa, además el primer día de la semana esta predeterminado para Domingo.

Imagen del proceso en VBA:

Ejemplo1.1 300x70, Función WeekDay en VBA

(Para mayor visualización de  la imagen, hacer click en la misma)

Imagen del resultado en la Hoja de Excel:

Ejemplo1.2 300x120, Función WeekDay en VBA

(Para mayor visualización de  la imagen, hacer click en la misma)

Ejemplo 2:

Sub Numdia2()
'
'Proceso para devolver un número que representa el día de la semana, dado un valor de fecha
'
Dia = #1/26/2017#
Diavalor = Weekday(Dia, vbMonday)
MsgBox "El valor numérico para la fecha seleccionada es: " & Diavalor
End Sub

Nota: La fecha corresponde al ingresado en VBA en el siguiente formato ( #mes/día/año# ), además el primer día de la semana esta predeterminado para Lunes.

Imagen del proceso en VBA:

Ejemplo2.1 300x75, Función WeekDay en VBA

(Para mayor visualización de  la imagen, hacer click en la misma)

Imagen del resultado en VBA:

Ejemplo2.2 300x100, Función WeekDay en VBA

(Para mayor visualización de  la imagen, hacer click en la misma)

Descargas:

Weekday ejemplos (Excel con macros que contiene los ejemplos explicados anteriormente)

 

Elaborado por: Renzo Farro Cornelio

Un comentario

  1. Hola, muchas gracias por la información, tengo una duda no se si me puedes ayudar, te dejo mi correo

Deja una respuesta

Los campos requeridos estan marcados con *.