ferelias

Elsa Matilde respondió: ¿Por qué se ejecuta más de 1 vez? Esta macro debiera estar en un módulo, y ejecutarse cuando la celda tome el valor 'cerrado', es decir que en el evento Worksheet_Change debieras colocar estas instrucciones: Private Sub Worksheet_Change(ByVal Target...

tavopz respondió: Lo que se me ocurra es que agregues una instrucción que refresque la tabla mediante código, algo como: ActiveSheet. PivotTables("TablaX"). RefreshTable Esta instrucción podrías incluirla dentro de un ciclo para que se ejecute cada cierto tiempo.

Elsa Matilde respondió: Suponiendo que quieras que arranque la macro al abrir el libro, coloca esta instrucción en el evento Open del libro. Application. OnTime Now + TimeValue("00:03:00"), "CbioHoja" Y luego en un módulo, copiá esta rutina, ajustando el nombre de la hoja...

rahoyos respondió: No lo hagas con un InputBox, crea mejor una nueva Form con los controles necesarios y encontrarás que una de las propiedades del TextBox es 'Contraseña' que precisamente es la que buscas. Requiere un poco más de trabajo pero la puedes reutilizar sin...

Elsa Matilde respondió: La instrucción que necesitas es: Application.OnKey "{F4}", "nombredetumacro" Ejemplo: Private Sub Workbook_WindowActivate(ByVal Wn As Window) Application.OnKey "{F4}", "nombredetumacro" End Sub Luego para volverla al estado normal: Private Sub...

fejoal respondió: Bastaría que tengas y uses en el condicional una variable booleana (True/False) para controlar la aparición del mensaje. Si bien no mencionaste si es una macro que se ejecuta ante un evento o es disparada manualmente, la rutina debería inicializase...

fejoal respondió: Acaba de salir el archivo solicitado. Espero que te sirva. Un abrazo! Fernando

fejoal respondió: Ooops... Es cierto. De un desarrollo anterior me quedó un "Private" delante del código. Para que funcione, simplemente quita la palabra "Private" que está antes de Sub TrataMenu(Estado As Boolean) y graba el archivo. Así debería funcionar OK. Un...