Fiscalia

Tendriamos que ver varios detalles, Verifica que el último foquito del teclado no este encendido (Scroll Lock) cuanto eso te pasa, si es así solo presiona nuevamente el botón de Scroll Lock

Solo que mlupilla no nos dice si tiene más de 15 años trabajando, asumiendo que no, no le coresponde la prima de antigüedad

al pie de mis mensajes, haz click en el vinculo de [b:9c79dfa7ef]e-mail[/b:9c79dfa7ef]

Lo que pasa es que esta protegida, lo lamento. Copia este código: [code:1:e044bfdc16]Function DIALAB(FechaInicial As Date, NroDias As Integer, Optional IncluyeSab As Integer = 0, Optional Feriados) As Date Dim i, Aux As Date, Cont, x As Integer Aux = FechaInicial + 1 If IncluyeSab = 0 Then FechaInicial = FechaInicial + NroDias For i = Aux To FechaInicial If Weekday(i, 1) = 1 Or Weekday(i, 1) = 7 Then Cont = Cont + 1 Next FechaInicial = FechaInicial + Cont Cont = 0 For i = Aux To FechaInicial If Weekday(i, 1) > 1 And Weekday(i, 1) < 7 Then Cont = Cont + 1 Next If Cont <> NroDias Then FechaInicial = FechaInicial + Abs(NroDias - Cont) Else FechaInicial = FechaInicial + NroDias For i = Aux To FechaInicial If Weekday(i, 1) = 1 Then Cont = Cont + 1 Next FechaInicial = FechaInicial + Cont Cont = 0 For i = Aux To FechaInicial If Weekday(i, 1) <> 1 Then Cont = Cont + 1 Next If Cont <> NroDias Then FechaInicial = FechaInicial + Abs(NroDias - Cont) End If If IncluyeSab = 0 And Not IsMissing(Feriados) Then Cont = 0 Aux = Aux '- 1 For x = 1 To Feriados.Count If Feriados(x) >= Aux And Feriados(x) <= FechaInicial Then If Weekday(Feriados(x), 1) > 1 And Weekday(Feriados(x), 1) < 7 Then Cont = Cont + 1 End If Next FechaInicial = FechaInicial + Cont Else If IncluyeSab <> 0 And Not IsMissing(Feriados) Then Cont = 0 Aux = Aux - 1 For x = 1 To Feriados.Count If Feriados(x) >= Aux And Feriados(x) <= FechaInicial Then If Weekday(Feriados(x), 1) <> 1 Then Cont = Cont + 1 End If Next FechaInicial = FechaInicial + Cont End If End If If Weekday(FechaInicial, 1) = 1 Then FechaInicial = FechaInicial + 1 If IncluyeSab = 0 Then If Weekday(FechaInicial, 1) = 7 Then FechaInicial = FechaInicial + 2 End If DIALAB = FechaInicial End Function[/code:1:e044bfdc16]

El portal de tramitanet te triangula, como dice el Lic., al servidor del IDSE del IMSS, solo a quienes se inscribierón al tramitanet antes del IDSE pueden usar el servicio de tramitanet

Horas Extras.- [list:c2484061be]Integran las que excedan de tres horas al días y tres veces a la semana.[/list:u:c2484061be] Prima Dominical.- [list:c2484061be]Se integra como variable, yo no lo pondría como fijo, porque si por algun motivo no se presentarán, ya no procederia el pago de la P.Dom.[/list:u:c2484061be]Gratificaciones.- [list:c2484061be]Integrarán las que no esten contempladas en el Art. 27 LSS.[/list:u:c2484061be]

el buen amigo Gabriel Aranda, contactalo

solo copia la macro al libro donde lo quieras

Silver, lo malo de la macro es que busca los repedidos si estan seguidos, o sea en orden, si tus datos estas aleatoriamente dificilmente te los encontrará. angora, claro que si me será un placer ayudarte

[quote:5af03728b3="cpgpe"]...Lo busco manualemnte y no existe....[/quote:5af03728b3] Solo existe este detalle Lic.

Autor	Mensaje
Tópico: SE TRABA
ByPaco Mensajes: 9	Foro: Excel Enviado: Agosto 23, 2005 Asunto:
ByPaco Mensajes: 9	Tendriamos que ver varios detalles, Verifica que el último foquito del teclado no este encendido (Scroll Lock) cuanto eso te pasa, si es así solo presiona nuevamente el botón de Scroll Lock
Tópico: reclamo de finiquito
ByPaco Mensajes: 18	Foro: Seguridad Social Enviado: Agosto 22, 2005 Asunto:
ByPaco Mensajes: 18	Solo que mlupilla no nos dice si tiene más de 15 años trabajando, asumiendo que no, no le coresponde la prima de antigüedad
Tópico: FORMULA PARA IDENTIFICAR UN NUMERO IGUAL
ByPaco Mensajes: 12	Foro: Excel Enviado: Agosto 22, 2005 Asunto:
ByPaco Mensajes: 12	al pie de mis mensajes, haz click en el vinculo de [b:9c79dfa7ef]e-mail[/b:9c79dfa7ef]
Tópico: Pregunta para ByPaco
ByPaco Mensajes: 5	Foro: Excel Enviado: Agosto 22, 2005 Asunto: Re: Pregunta para ByPaco
ByPaco Mensajes: 5	Lo que pasa es que esta protegida, lo lamento. Copia este código: [code:1:e044bfdc16]Function DIALAB(FechaInicial As Date, NroDias As Integer, Optional IncluyeSab As Integer = 0, Optional Feriados) As Date Dim i, Aux As Date, Cont, x As Integer Aux = FechaInicial + 1 If IncluyeSab = 0 Then FechaInicial = FechaInicial + NroDias For i = Aux To FechaInicial If Weekday(i, 1) = 1 Or Weekday(i, 1) = 7 Then Cont = Cont + 1 Next FechaInicial = FechaInicial + Cont Cont = 0 For i = Aux To FechaInicial If Weekday(i, 1) > 1 And Weekday(i, 1) < 7 Then Cont = Cont + 1 Next If Cont <> NroDias Then FechaInicial = FechaInicial + Abs(NroDias - Cont) Else FechaInicial = FechaInicial + NroDias For i = Aux To FechaInicial If Weekday(i, 1) = 1 Then Cont = Cont + 1 Next FechaInicial = FechaInicial + Cont Cont = 0 For i = Aux To FechaInicial If Weekday(i, 1) <> 1 Then Cont = Cont + 1 Next If Cont <> NroDias Then FechaInicial = FechaInicial + Abs(NroDias - Cont) End If If IncluyeSab = 0 And Not IsMissing(Feriados) Then Cont = 0 Aux = Aux '- 1 For x = 1 To Feriados.Count If Feriados(x) >= Aux And Feriados(x) <= FechaInicial Then If Weekday(Feriados(x), 1) > 1 And Weekday(Feriados(x), 1) < 7 Then Cont = Cont + 1 End If Next FechaInicial = FechaInicial + Cont Else If IncluyeSab <> 0 And Not IsMissing(Feriados) Then Cont = 0 Aux = Aux - 1 For x = 1 To Feriados.Count If Feriados(x) >= Aux And Feriados(x) <= FechaInicial Then If Weekday(Feriados(x), 1) <> 1 Then Cont = Cont + 1 End If Next FechaInicial = FechaInicial + Cont End If End If If Weekday(FechaInicial, 1) = 1 Then FechaInicial = FechaInicial + 1 If IncluyeSab = 0 Then If Weekday(FechaInicial, 1) = 7 Then FechaInicial = FechaInicial + 2 End If DIALAB = FechaInicial End Function[/code:1:e044bfdc16]
Tópico: movimiento x tramitanet....
ByPaco Mensajes: 6	Foro: Seguridad Social Enviado: Agosto 22, 2005 Asunto:
ByPaco Mensajes: 6	El portal de tramitanet te triangula, como dice el Lic., al servidor del IDSE del IMSS, solo a quienes se inscribierón al tramitanet antes del IDSE pueden usar el servicio de tramitanet
Tópico: SORRY UNA DUDA ACERCA DE LA INTEGRACION
ByPaco Mensajes: 16	Foro: Seguridad Social Enviado: Agosto 22, 2005 Asunto: Re: SORRY UNA DUDA ACERCA DE LA INTEGRACION
ByPaco Mensajes: 16	Horas Extras.- [list:c2484061be]Integran las que excedan de tres horas al días y tres veces a la semana.[/list:u:c2484061be] Prima Dominical.- [list:c2484061be]Se integra como variable, yo no lo pondría como fijo, porque si por algun motivo no se presentarán, ya no procederia el pago de la P.Dom.[/list:u:c2484061be]Gratificaciones.- [list:c2484061be]Integrarán las que no esten contempladas en el Art. 27 LSS.[/list:u:c2484061be]
Tópico: CARTA PATRONAL EDITABLE
ByPaco Mensajes: 7	Foro: Software Enviado: Agosto 22, 2005 Asunto:
ByPaco Mensajes: 7	el buen amigo Gabriel Aranda, contactalo
Tópico: Pregunta para ByPaco
ByPaco Mensajes: 5	Foro: Excel Enviado: Agosto 22, 2005 Asunto:
ByPaco Mensajes: 5	solo copia la macro al libro donde lo quieras
Tópico: FORMULA PARA IDENTIFICAR UN NUMERO IGUAL
ByPaco Mensajes: 12	Foro: Excel Enviado: Agosto 22, 2005 Asunto:
ByPaco Mensajes: 12	Silver, lo malo de la macro es que busca los repedidos si estan seguidos, o sea en orden, si tus datos estas aleatoriamente dificilmente te los encontrará. angora, claro que si me será un placer ayudarte
Tópico: ARCHIVO CON VINCULOS.
ByPaco Mensajes: 6	Foro: Excel Enviado: Agosto 22, 2005 Asunto: Re: ARCHIVO CON VINCULOS.
ByPaco Mensajes: 6	[quote:5af03728b3="cpgpe"]...Lo busco manualemnte y no existe....[/quote:5af03728b3] Solo existe este detalle Lic.

Actualidades

Secciones

Herramientas

Especiales

Legislación

Herramientas

Dólar EUA

26/ABR/24

$17.1098

DOF 25/abr/24

INPC

MAR/24

134.065

Inflación +1.28%

Vista Rápida

1.47%

0.98%

8.128515

312.332

Accesos Directos

Tesis

Base de datos actualizada a:

Descargas

Comunidad

¿Qué es comunidad?

Declaración anual 2023 de Personas Físicas

Declaración anual 2023 de Personas Morales

Factura Electrónica CFDI 4.0

¿Nuevo en Fiscalia?

¿Eres miembro Fiscalia?

Contenido

Enlaces

Contáctanos

Sitios del Grupo