Fiscalia

Lo que buscas tal vez lo encuentres en el Menú herramientas --> opciones, ó en el menú Formato --> Estilo

si existe, yo la uso, en mi caso tengo un formato en la hoja1 donde llamo el rango [color=green:c7f7bdab19]Formato [/color:c7f7bdab19]y la base de datos en la hoja2 donde hay una columna llave que nombro [color=green:c7f7bdab19]Lista[/color:c7f7bdab19], en la hoja1 estan ligados con fórmula los datos a la hoja2. [code:1:c7f7bdab19]Sub Impresión_sucesiva() Dim cant, ver As Byte cant = Application.InputBox("Cuántas copias necesita imprimir de cada Recibo?", "Cantidad de Copias", 2, , , , , 3) If cant <= 0 Then Exit Sub ver = MsgBox("¿Quiere una vista previa de Cada recibo antes de Imprimirlo?", vbYesNo + vbDefaultButton1, "Vista previa") For Each TY In Range("Lista") If IsEmpty(TY) Then Exit Sub ' se supone que no dejas registros intermedios vacíos [B3] = TY.Value Range("Formato").PrintOut Copies:=cant, Preview:=IIf(7 - ver = 0, False, True) Next TY End Sub [/code:1:c7f7bdab19]

[quote:9ff9285710="vabdo"]....No encuentro, donde bajar la nueva version 3.1.4[/quote:9ff9285710] http://www.imss.gob.mx/IMSS/IMSS_SITIOS/IMSS_06/Patrones/DIRSS/Nuevo+Sua/Complemento+3.htm

[quote:7ebf4b73ac="pepesoto"]... En casos de urgencia, recomendable es, usar la página del imss.... [/quote:7ebf4b73ac] Punto para el IMSS

[quote:d4bf40897f="lc_psantos"]Si te entregó la incapacidad no le descuentas el día, le pagas la semana completa. Esperemos más opiniones. Saludos[/quote:d4bf40897f] No hay obligatoriedad, a menos que este estipulado en el contrato

En Inglés 1er. Lunes de Febrero [code:1:c85fb37a74]=IF(WEEKDAY(DATE(A1,2,1),3)=0,DATE(A1,2,1),DATE(A1,2,1)+MOD(-WEEKDAY(DATE(A1,2,1),3),7))[/code:1:c85fb37a74] 3er. Lunes de Marzo [code:1:c85fb37a74]=IF(WEEKDAY(DATE(A1,3,1),3)=0,DATE(A1,3,1),DATE(A1,3,1)+MOD(-WEEKDAY(DATE(A1,3,1),3),7))+14[/code:1:c85fb37a74] 3er. Lunes de Noviembre [code:1:c85fb37a74]=IF(WEEKDAY(DATE(A1,11,1),3)=0,DATE(A1,11,1),DATE(A1,11,1)+MOD(-WEEKDAY(DATE(A1,11,1),3),7))+14[/code:1:c85fb37a74]

Corregido y Mejorado. Considerando que la celda A1 contiene el año a buscar 1er. Lunes de Febrero [code:1:49886048d2]=SI(DIASEM(FECHA(A1,2,1),3)=0,FECHA(A1,2,1),FECHA(A1,2,1)+RESIDUO(-DIASEM(FECHA(A1,2,1),3),7))[/code:1:49886048d2] 3er. Lunes de Marzo [code:1:49886048d2]=SI(DIASEM(FECHA(A1,3,1),3)=0,FECHA(A1,3,1),FECHA(A1,3,1)+RESIDUO(-DIASEM(FECHA(A1,3,1),3),7))+14[/code:1:49886048d2] 3er. Lunes de Noviembre [code:1:49886048d2]=SI(DIASEM(FECHA(A1,11,1),3)=0,FECHA(A1,11,1),FECHA(A1,11,1)+RESIDUO(-DIASEM(FECHA(A1,11,1),3),7))+14[/code:1:49886048d2]

El archivo funciona mendiante macros, por lo que se deben habilitar, tu excel deshabilita todas las macros que contengan los archivo, porque el nivel de seguridad que tienes es "Muy Alto" ó "Alto", con cambiarlo a nivel "Medio" se soluciona, ya que al detectar un archivo con macros te aparecerá un mensaje que te pregunta si deseas habilitar o no las macros. Ve al Menú de Herramientas → Macros → Seguridad. Ahí puedes cambiar el Nivel

LSS Articulo.-73

Con una macro, solo si [b:0d109523c4]no [/b:0d109523c4]está prortegido el libro [code:1:0d109523c4]Sub MostrarTodo() Dim oHoja As Worksheet bIsClosing = False For Each oHoja In ThisWorkbook.Worksheets oHoja.Visible = xlSheetVisible Next oHoja End Sub [/code:1:0d109523c4]

Autor	Mensaje
Tópico: ¿ Como establecer criterios configuracion de pagina ?
ByPaco Mensajes: 3	Foro: Excel Enviado: Diciembre 14, 2006 Asunto:
ByPaco Mensajes: 3	Lo que buscas tal vez lo encuentres en el Menú herramientas --> opciones, ó en el menú Formato --> Estilo
Tópico: Macro para impresión ininterrumpida
ByPaco Mensajes: 6	Foro: Excel Enviado: Diciembre 05, 2006 Asunto: Re: Macro para impresión ininterrumpida
ByPaco Mensajes: 6	si existe, yo la uso, en mi caso tengo un formato en la hoja1 donde llamo el rango [color=green:c7f7bdab19]Formato [/color:c7f7bdab19]y la base de datos en la hoja2 donde hay una columna llave que nombro [color=green:c7f7bdab19]Lista[/color:c7f7bdab19], en la hoja1 estan ligados con fórmula los datos a la hoja2. [code:1:c7f7bdab19]Sub Impresión_sucesiva() Dim cant, ver As Byte cant = Application.InputBox("Cuántas copias necesita imprimir de cada Recibo?", "Cantidad de Copias", 2, , , , , 3) If cant <= 0 Then Exit Sub ver = MsgBox("¿Quiere una vista previa de Cada recibo antes de Imprimirlo?", vbYesNo + vbDefaultButton1, "Vista previa") For Each TY In Range("Lista") If IsEmpty(TY) Then Exit Sub ' se supone que no dejas registros intermedios vacíos [B3] = TY.Value Range("Formato").PrintOut Copies:=cant, Preview:=IIf(7 - ver = 0, False, True) Next TY End Sub [/code:1:c7f7bdab19]
Tópico: OTRO PROBLEMA DEL SUA
ByPaco Mensajes: 11	Foro: Seguridad Social Enviado: Noviembre 22, 2006 Asunto:
ByPaco Mensajes: 11	[quote:9ff9285710="vabdo"]....No encuentro, donde bajar la nueva version 3.1.4[/quote:9ff9285710] http://www.imss.gob.mx/IMSS/IMSS_SITIOS/IMSS_06/Patrones/DIRSS/Nuevo+Sua/Complemento+3.htm
Tópico: IDSE TERRA
ByPaco Mensajes: 2	Foro: Seguridad Social Enviado: Noviembre 17, 2006 Asunto: Re: IDSE TERRA
ByPaco Mensajes: 2	[quote:7ebf4b73ac="pepesoto"]... En casos de urgencia, recomendable es, usar la página del imss.... [/quote:7ebf4b73ac] Punto para el IMSS
Tópico: PROBLEMA DE NOMINA
ByPaco Mensajes: 5	Foro: Seguridad Social Enviado: Noviembre 17, 2006 Asunto:
ByPaco Mensajes: 5	[quote:d4bf40897f="lc_psantos"]Si te entregó la incapacidad no le descuentas el día, le pagas la semana completa. Esperemos más opiniones. Saludos[/quote:d4bf40897f] No hay obligatoriedad, a menos que este estipulado en el contrato
Tópico: Fórmula para encontrar los dias de descanso laborales
ByPaco Mensajes: 4	Foro: Excel Enviado: Noviembre 17, 2006 Asunto:
ByPaco Mensajes: 4	En Inglés 1er. Lunes de Febrero [code:1:c85fb37a74]=IF(WEEKDAY(DATE(A1,2,1),3)=0,DATE(A1,2,1),DATE(A1,2,1)+MOD(-WEEKDAY(DATE(A1,2,1),3),7))[/code:1:c85fb37a74] 3er. Lunes de Marzo [code:1:c85fb37a74]=IF(WEEKDAY(DATE(A1,3,1),3)=0,DATE(A1,3,1),DATE(A1,3,1)+MOD(-WEEKDAY(DATE(A1,3,1),3),7))+14[/code:1:c85fb37a74] 3er. Lunes de Noviembre [code:1:c85fb37a74]=IF(WEEKDAY(DATE(A1,11,1),3)=0,DATE(A1,11,1),DATE(A1,11,1)+MOD(-WEEKDAY(DATE(A1,11,1),3),7))+14[/code:1:c85fb37a74]
Tópico: Fórmula para encontrar los dias de descanso laborales
ByPaco Mensajes: 4	Foro: Excel Enviado: Noviembre 17, 2006 Asunto: Re: Fórmula para encontrar los dias de descanso laborales
ByPaco Mensajes: 4	Corregido y Mejorado. Considerando que la celda A1 contiene el año a buscar 1er. Lunes de Febrero [code:1:49886048d2]=SI(DIASEM(FECHA(A1,2,1),3)=0,FECHA(A1,2,1),FECHA(A1,2,1)+RESIDUO(-DIASEM(FECHA(A1,2,1),3),7))[/code:1:49886048d2] 3er. Lunes de Marzo [code:1:49886048d2]=SI(DIASEM(FECHA(A1,3,1),3)=0,FECHA(A1,3,1),FECHA(A1,3,1)+RESIDUO(-DIASEM(FECHA(A1,3,1),3),7))+14[/code:1:49886048d2] 3er. Lunes de Noviembre [code:1:49886048d2]=SI(DIASEM(FECHA(A1,11,1),3)=0,FECHA(A1,11,1),FECHA(A1,11,1)+RESIDUO(-DIASEM(FECHA(A1,11,1),3),7))+14[/code:1:49886048d2]
Tópico: CANTIDAD CON LETRA
ByPaco Mensajes: 10	Foro: Excel Enviado: Noviembre 17, 2006 Asunto:
ByPaco Mensajes: 10	El archivo funciona mendiante macros, por lo que se deben habilitar, tu excel deshabilita todas las macros que contengan los archivo, porque el nivel de seguridad que tienes es "Muy Alto" ó "Alto", con cambiarlo a nivel "Medio" se soluciona, ya que al detectar un archivo con macros te aparecerá un mensaje que te pregunta si deseas habilitar o no las macros. Ve al Menú de Herramientas → Macros → Seguridad. Ahí puedes cambiar el Nivel
Tópico: Prima de riesgo para construccion
ByPaco Mensajes: 2	Foro: Seguridad Social Enviado: Noviembre 11, 2006 Asunto:
ByPaco Mensajes: 2	LSS Articulo.-73
Tópico: Desocultar varias hojas de archivo de excel
ByPaco Mensajes: 4	Foro: Excel Enviado: Noviembre 06, 2006 Asunto: Re: Desocultar varias hojas de archivo de excel
ByPaco Mensajes: 4	Con una macro, solo si [b:0d109523c4]no [/b:0d109523c4]está prortegido el libro [code:1:0d109523c4]Sub MostrarTodo() Dim oHoja As Worksheet bIsClosing = False For Each oHoja In ThisWorkbook.Worksheets oHoja.Visible = xlSheetVisible Next oHoja End Sub [/code:1:0d109523c4]

Actualidades

Secciones

Herramientas

Especiales

Legislación

Herramientas

Dólar EUA

06/DIC/22

$19.3422

DOF 05/dic/22

INPC

OCT/22

125.276

Inflación +6.79%

Vista Rápida

1.47%

0.98%

7.644324

298.012

Accesos Directos

Tesis

Base de datos actualizada a:

Descargas

Comunidad

¿Qué es comunidad?

Reforma Fiscal 2023

Régimen Simplificado de Confianza (RESICO)

Complemento Carta Porte (CFDI)

¿Nuevo en Fiscalia?

¿Eres miembro Fiscalia?

Contenido

Enlaces

Contáctanos

Sitios del Grupo