Dante Amor

H o l a: Te anexo la macro Private Sub CommandButton1_Click() 'Por.Dante Amor 'Actualizar Bitácora Set h2 = Sheets("BITACORA") u2 = h2.Range("B" & Rows.Count).End(xlUp).Row If u2 < 9 Then u2 = 9 h2.Range("B9:G" & u2).Clear h2.Range("B9:G" &...

H o l a: Para realizar el código, me puedes enviar tus 2 libros, el libro que tiene el listbox y el otro libro con los datos. Me dices cómo se llama tu formulario También me dices en qué hoja y en qué columnas está la información que se va a cargar....

H o l a: No puedo descargar el archivo, podrías enviarme a mi correo, 2 archivos txt y un archivo de excel que muestre cómo quieres el resultado de esos 2 archivos txt. En total envíame 3 archivos.

H o l a: Me puedes comentar lo siguiente: 1. ¿La hoja "resultados" ya existe? 2. ¿La hoja "resultados" está visible o está oculta? 3. En la hoja "resultados" en dónde quieres pegar cada rango, que pegue el primer rango en la celda A1, el siguiente...

H o l a: La macro que pusiste funciona si modificas la celda ya sea capturando directamente en la celda y presionando enter o seleccionando un dato de la lista de validación. La macro la tienes que poner en los eventos de la hoja: Sigue las...

Me parece que lo que ya necesitas es convertir tu archivo de excel a un ejecutable (.exe) Para ello tienes que descargar un software para convertir excel a ejecutable. Puedes encontrar varios software en la red, algunos son gratis y otros tienen un...

H o l a: Dime la siguiente información: - ¿Qué versión de excel tienes? - ¿La versión la tienes en español? Existen varios detalles a corregir. 1. En tu fórmula de la celda D4 tienes esto: ="Instrucciones Cumplimiento...

H o l a: Con la siguiente macro estableces la hora de inicio = "7:35 a.m." La macro revisará la hora cada minuto y si son las 7:35 a.m., entonces guardará el archivo, el siguiente guardado lo hará a las 8:05 Declare Function SetTimer Lib "user32"...

H o l a: Para enviar la imagen en el cuerpo del correo, una opción es con HTML: Sub env() Set objOutlook = CreateObject("Outlook.Application") Set objNamespace = objOutlook.GetNamespace("MAPI") Set objItem = objOutlook.CreateItem(olMailItem)...

H o l a: Tu macro3 empieza así: Sub Macro3() ' ' Macro3 Macro ' descomposicion variables relativas ' ' Acceso directo: CTRL+o ' ActiveCell.FormulaR1C1 = "=IF(R[-1]C+1>=11,""X"",R[-1]C+1)" Pero cuál es la celda incial? Es decir, ¿en cuál celda pones...