Contar Días (2)

jues · el 21 de octubre

Saludos @JSDJSD espero estes bien como ya me dio un excelente soporte adaptando a Macros Vba las fórmulas de mi anterior post:

Espero también pueda ayudarme con los resultados de estas dos últimas fórmulas que me faltan en los TextBox26: y TextBox32:

TextBox26: si alguno de los TetxBox16, 17, 18, 19, 20, 21, 22 es mayor que el ComboBox2 entonces se debe de restar el TetxBox que cumpla con la condición menos el ComboBox2 siendo así el resultado que se debe mostrar en el TextBox26 de manera simultánea y automática será la sumatoria de los resultados individuales de cada TetxBox mediante la combinación de las siguientes operaciones equivalentes en Vba:

SI(TextBox16>ComboBox2; TextBox16-ComboBox2)+SI(TextBox17>ComboBox2; TextBox17-ComboBox2)+SI(TextBox18>ComboBox2;TextBox18-ComboBox2)+SI(TextBox19>ComboBox2;TextBox19-ComboBox2)+SI(TextBox20>ComboBox2;TextBox20-ComboBox2)+SI(TextBox21>ComboBox2;TextBox21-ComboBox2)+SI(TextBox22>ComboBox2;TextBox22-ComboBox2)

TextBox32: si la fecha contenida en alguno de los TetxBox9, 10, 11, 12, 13, 14, 15 Coincide con alguna de las fechas del Rango 'USUARIOS &PRIVILEGIOS'!$BS27:BS56 entonces los TetxBox16, 17, 18, 19, 20, 21, 22 Vacíos se deberán contar con valor igual a “1” (Textbox=””=1) mientras que los TetxBox16, 17, 18, 19, 20, 21, 22 Llenos se deberán contar con valor igual a “0” (TetxBox<>””=0) de forma similar a lo que ya ocurre con los resultados del TextBox30 siendo así el resultado que se debe mostrar en el TextBox32 de manera simultánea y automática será el resultado de la combinación de las siguientes operaciones equivalentes en Vba:

SI(COINCIDIR(TetxBox9, 10, 11, 12, 13, 14, 15;'USUARIOS &PRIVILEGIOS'!$BS27:BS56;0);TetxBox16, 17, 18, 19, 20, 21, 22=””=1;TetxBox16, 17, 18, 19, 20, 21, 22<>””=0)

HHE PRUEBA (3) (1).xlsm

JSDJSD · el 21 de octubre

Fijándonos solamente en el textbox26 sería esto lo que necesitas ?

jues · el 22 de octubre

Correcto tal cual se ajusta a lo que necesito muy acertado como siempre usted

JSDJSD · el 22 de octubre

Prueba y comenta

JSDJSD · el 22 de octubre

HHE PRUEBA (3) (1) (1).xlsm

jues · el 26 de octubre

Saludos @JSDJSD espero estés bien los resultados del Texbox26 están conforme a lo esperado sin embargo con el Texbox32 al hacer pruebas obtuve algunos resultados que difieren de los resultados esperados por lo que hice unos cálculos manuales que me condujeron al replanteamiento de mi enunciado original para asegurar la exactitud de los resultados:

Si la fecha contenida en alguno de los TetxBox 9, 10, 11, 12, 13, 14, 15 Coincide con alguna(s) de las fechas del Rango 'USUARIOS & PRIVILEGIOS'!$BS$27:$BS$56 entonces Únicamente el(los) TextBox (16, 17, 18, 19, 20, 21, 22) que esté(n) asociado(s) con esta(s) fecha(s) cuando este(n) Vacío(s) se deberá(n) contar con un valor igual a “1” (Textbox=””=1) mientras el(los) TetxBox (16, 17, 18, 19, 20, 21, 22) que no esté(n) asociado(s) con esta(s) fecha(s) cuando este(n) Lleno(s) se deberá(n) contar con un valor igual a “0” (TetxBox<>””=0) conforme a las siguientes condiciones:

Si TetxBox9 Coincide con Rango 'USUARIOS &PRIVILEGIOS' entonces TextBox 16 =””=1

Si TetxBox10 Coincide con Rango 'USUARIOS &PRIVILEGIOS' entonces TextBox 17 =””=1

Si TetxBox11 Coincide con Rango 'USUARIOS &PRIVILEGIOS' entonces TextBox 18 =””=1

Si TetxBox12 Coincide con Rango 'USUARIOS &PRIVILEGIOS' entonces TextBox 29 =””=1

Si TetxBox13 Coincide con Rango 'USUARIOS &PRIVILEGIOS' entonces TextBox 20 =””=1

Si TetxBox14 Coincide con Rango 'USUARIOS &PRIVILEGIOS' entonces TextBox 21 =””=1

Si TetxBox15 Coincide con Rango 'USUARIOS &PRIVILEGIOS' entonces TextBox 22 =””=1

Si TetxBox9 No Coincide con Rango 'USUARIOS &PRIVILEGIOS' entonces TextBox 16 <>””=0

Si TetxBox10 No Coincide con Rango 'USUARIOS &PRIVILEGIOS' entonces TextBox 17 <>””=0

Si TetxBox11 No Coincide con Rango 'USUARIOS &PRIVILEGIOS' entonces TextBox 18 <>””=0

Si TetxBox12 No Coincide con Rango 'USUARIOS &PRIVILEGIOS' entonces TextBox 29 <>””=0

Si TetxBox13 No Coincide con Rango 'USUARIOS &PRIVILEGIOS' entonces TextBox 20 <>””=0

Si TetxBox14 No Coincide con Rango 'USUARIOS &PRIVILEGIOS' entonces TextBox 21 <>””=0

Si TetxBox15 No Coincide con Rango 'USUARIOS &PRIVILEGIOS' entonces TextBox 22 <>””=0

Ejemplo 1: Los días 12 (TetxBox9) y 13 (TetxBox10) de Febrero son feriados, pero como los TextBox que estan asociados a estas fechas: TextBox 16 =”” y TextBox 17 =”” se cuentan con valor igual a “1” por lo tanto el TextBox32 = 2

jues · el 26 de octubre

Ejemplo 2: Los días 28 (TetxBox12) y 29 (TetxBox13) de Marzo son feriados, pero como los TextBox que estan asociados a estas fechas: TextBox 19 <>”” se cuenta con valor igual a “0” mientras que el TextBox 20 =”” se cuenta con valor igual a “1” por lo tanto el TextBox32 = 1

jues · el 26 de octubre

Ejemplo 3: El día 12 (TetxBox14) de Octubre es feriado, pero el TextBox que está asociado a esta fecha: TextBox 20 =”” se cuenta con valor igual a “1” por lo tanto el TextBox32 = 1

JSDJSD · el 27 de octubre

Ok, lo miro

JSDJSD · el 27 de octubre

JSDJSD · el 27 de octubre

En 26/10/2024 at 16:13 , jues dijo:

Ejemplo 2: Los días 28 (TetxBox12) y 29 (TetxBox13) de Marzo son feriados, pero como los TextBox que estan asociados a estas fechas: TextBox 19 <>”” se cuenta con valor igual a “0” mientras que el TextBox 20 =”” se cuenta con valor igual a “1” por lo tanto el TextBox32 = 1

Editado el el 27 de octubre por JSDJSD

JSDJSD · el 27 de octubre

En 26/10/2024 at 16:16 , jues dijo:

Ejemplo 3: El día 12 (TetxBox14) de Octubre es feriado, pero el TextBox que está asociado a esta fecha: TextBox 20 =”” se cuenta con valor igual a “1” por lo tanto el TextBox32 = 1

Editado el el 27 de octubre por JSDJSD