Saludos Profesor Sergio, de ante mano gracias por responder, realice lo que me sugirió coloque el código donde me indicó, sin embargo me sigue arrojando el mismo error.
' Restaurar formato de fuente
With wsHistorico.Rows("2:2").Font
.ColorIndex = xlAutomatic
.TintAndShade = 0
End With
' Incrementar automáticamente el número de recibo
wsRecibo.Range("J2").Value = wsRecibo.Range("J2").Value + 1
'Corrección de Error en impresión
Application.Wait (Now + TimeValue("0:00:01"))
' Imprimir
wsRecibo.PrintOut Copies:=1, Collate:=True, IgnorePrintAreas:=False
Por
dorgelis, · publicado
necesito saber si existe la formula para que no cambien el codigo o la formula.
el archivo esta configurado por varias hojas
- La 1° hoja se llama VER (Donde muestro todas las celdas de fechas de las hojas)
- La 2° Segunda es enero, hasta diciembre. donde seleccionan reservado.
-----------------------
A la hoja VER le puse un codigo para q me muestre la posicion de la celda
Si haces doble click muestra la formula
=enero!M11
es posible ? cuando haga click que se vaya a la hoja enero y se ponga en la misma posicion
y bloquear la hoja VER, para que no modifiquen.
Y en la hoja enero y febrero, bloquar celdas, para que no dañen el codigo, solo les permita usar el boton del lado derecho del mouse.
{gracias
ReservasfULL2.rar