Obtener la fecha del primer día de la semana o último día de la semana en Access VBA
24/03/2022VBA: Echo
26/03/2022
'-----------------------------------------------------------------------------------------------------------------------------------------------
' Fuente : https://access-global.net/vba-cabecera-de-modulo
'-----------------------------------------------------------------------------------------------------------------------------------------------
' Título : SUSTITUIR_POR_EL_TÍTULO_DEL_MÓDULO
' Autor original : SUSTITUIR_POR_EL_AUTOR_ORIGINAL_DEL_CÓDIGO_POr_EL_QUE_NOS_HEMOS_BASADO_PARA_HACER_EL_NUESTRO.
' Creado : SUSTITUIR_POR_LA_FECHA
' Adaptado por : SUSTITUIR_POR_EL_AUTOR_DE_LA_ADAPTACIÓN
' Actualizado : SUSTITUIR_POR_LA_FECHA
' Propósito : SUSTITUIR_POR_UNA_BREVE_DESCRIPCIÓN_DE_QUÉ_COSAS_SE_PUEDEN_HACER_EN_ESTE_MÓDULO
' ¿Cómo funciona? : SUSTITUIR_POR_UNA_BREVE_DESCRIPCIÓN_DE_CÓMO_FUNCIONA
' Enumerar todas las funciones que aparecen en el módulo con una pequeña explicación de las mismas
' FUNCIÓN 1:SUSTITUIR_POR_UNA_BREVE_DESCRIPCIÓN_DE_CÓMO_FUNCIONA_LA-FUNCIÓN_1
' FUNCIÓN 2:SUSTITUIR_POR_UNA_BREVE_DESCRIPCIÓN_DE_CÓMO_FUNCIONA_LA-FUNCIÓN_2
' FUNCIÓN 3:SUSTITUIR_POR_UNA_BREVE_DESCRIPCIÓN_DE_CÓMO_FUNCIONA_LA-FUNCIÓN_3
' Entradas : NOMBRE_DE_LA_ENTRADA_1 Obligatorio/Opcional El valor string especifica el SUSTITUIR_POR_UNA_BREVE_DESCRIPCIÓN_DEL_PARÁMETRO
' NOMBRE_DE_LA_ENTRADA_2 Obligatorio/Opcional El valor string especifica el SUSTITUIR_POR_UNA_BREVE_DESCRIPCIÓN_DEL_PARÁMETRO
' Salidas : NOMBRE_DE_LA_SALIDA_01 Obligatorio/Opcional El valor string especifica el SUSTITUIR_POR_UNA_BREVE_DESCRIPCIÓN_DEL_PARÁMETRO
' NOMBRE_DE_LA_SALIDA_02 Obligatorio/Opcional El valor string especifica el SUSTITUIR_POR_UNA_BREVE_DESCRIPCIÓN_DEL_PARÁMETRO
'-----------------------------------------------------------------------------------------------------------------------------------------------
' Referencia/s : SUSTITUIR_POR_EL_NOMBRE_DE_REFERENCIA_1 (C:\ Sustituir_por_la_ruta_completa_de_las_librerías)
' Importante : SUSTITUIR_POR_UNA_BREVE_DESCRIPCIÓN_DE_LA_NOTA_IMPORTANTE
' Más información : SUSTITUIR_POR_UNA_O_VARIAS_URL
'-----------------------------------------------------------------------------------------------------------------------------------------------
' Test : Para adaptar este código en tu aplicación puedes basarte en este procedimiento test. Copiar el bloque siguiente al
' portapapeles y pega en el editor de VBA. Descomentar la línea que nos interese y pulsar F5 para ver su funcionamiento.
'
'Sub TITULO_test()
'
' CÓDIGO_MÍNIMO_QUE_AYUDE_A_CONOCER_RÁPIDAMENTE_EL_FUNCIONAMIENTO_DEL_MÓDULO
'
'End Sub
'-----------------------------------------------------------------------------------------------------------------------------------------------