jairo retorno

Hola tengo un problema... Tengo un libro el cual tengo el nombre de PANADERIA el cual contiene varias macros una de ellas es Sub Reloj() Application.ScreenUpdating = False ActiveSheet.Unprotect Range("A2").Formula = "=NOW()" Application.OnTime Now +...

Hola quisiera iniciar en esto pero no condigo como iniciar... Me gustaría hacer un tipo de reloj checador con un formulario que registre asistencia, salida de comer (calcule minutos por si se pasa), entrada de comer y salida del trabajo.. Y en caso...

Tengo una hoja la cual solo necesito que pongan valor numérico en un rango determinado... En este caso el rango es el sig. A1:D500 Entonces si intentan poner letras en ese rango que salga un msgbox de error...

Tengo este código: el cual me imprime perfectamente mi hoja deseada... Sub PAN_PEDIR() Application.ScreenUpdating = False If Range("E1") > 0 Then MsgBox "NO PODEMOS REALIZAR SU PEDIDO, PORFAVOR: VERIFIQUE SU PEDIDO", vbExclamation, "LO SENTIMOS" Exit...

Tengo esta macro el cual me muestra el cuadro de dialogo para crear libros.. Sub CREAR_INVENTARIOS() On Error Resume Next MsgBox "Puedes Crear Hasta 7 inventarios", vbInformation, "INVENTARIOS 2015 J.E.U" MsgBox "PRIMERO", , "INVENTARIOS 2015"...

Tengo un archivo excel con macros.. Lo que necesito saber si es que se puede.. Es que mi libro el cual lo llevare a otra compu este me abra como un programa osea que no me pregunte si deseo hablitar macros... Posiblemente la compu y su excel no tenga...

Hola tengo este código en una hoja: Private Sub Worksheet_Activate() Application.ScreenUpdating = False Call Reloj Application.DisplayStatusBar = False ExecuteExcel4Macro ("show.toolbar(""ribbon"",0)") Application.WindowState = xlMaximized...

Tengo una archivo excel el cual están ocultas y protegidas las hojas.. Mi cuestión es: Sera que pueda deshabilitar el atajo av pag y re pag. Para que no estén cambiando de hoja de ese modo.. Al igual que quisiera saber si hay alguna forma de que mi...

PARA DAN dan solicito tu ayuda... No se abre mi libro correctamente, cuando lo intento abrir me sale e error 91 y no se ve nada.. Espero me ayudes

Hola tengo el sig codigo: Sub guardaCopiaPANADERIA() On Error Resume Next Application.ScreenUpdating = False 'x Elsamatilde Sheets("PANADERIA").Select 'controla si existe hoja COPIA sino la crea Dim X As Byte For Each sh In Sheets If sh.Name =...