Dante Amor

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...

H o l a: Con esta fórmula matricial =INDICE(C1:C50,MAX((A1:A50=1)*(B1:B50=1920)*FILA(C1:C50))) Cambia =1 por el número de folio, cambia 1920 por la referencia, cambia el 50 por la última fila con datos. Para aceptar la fórmula matricial, edita la...

H o l a: Crea una hoja llamada "INICIO", en esa hoja pon un botón. Asigna la siguiente macro al botón que creaste. Sub MostrarHoja() 'Por.Dante Amor Application.ScreenUpdating = False hoja = InputBox("Hoja que deseas mostrar:", "MOSTRAR HOJA") If...

H o l a: Puedes enviarme tu archivo para revisarlo, me explicas paso a paso qué debo hacer para reproducir el problema. Mi correo [email protected] En el asunto del correo escribe tu nombre de usuario “Vicente Quispe Gonzalez” y el título de esta...

H o l a: Suponiendo que tus datos inician en la fila 3. Pon la siguiente fórmula en la celda E3 =JERARQUIA(D3,$D$3:$D$8,1)+0.000001*FILA() Nota: tal vez tengas que poner en la fórmula ; (punto y coma) en lugar de , (coma) Cambia en la fórmula el...

H o l a: ¿Tienes el destinatario en la columna P? ¿Cómo se llama la hoja donde tienes los datos? Prueba con la siguiente macro, cambia "Hoja1" por el nombre de la hoja en donde tienes los datos. Sub Correo() 'Por.Dante Amor Set h = Sheets("Hoja1")...

H o l a: No sé en qué momento o cómo llamas al procedimiento CamposVacios, pero algo más técnico y más general podría ser así: Public Sub CamposVacios() 'Por.Dante Amor CmdGuardar.Enabled = True For Each ctrl In Controls If TypeName(ctrl) = "TextBox"...

H o l a: Te anexo la macro para cortar las filas. Cambia en la macro "Hoja4" por el nombre de tu hoja que tiene los datos. Cambia "Hoja5" por el nombre de tu hoja donde se van a pegarlas filas. Sub CortarFilas() 'Por.Dante Amor...

H o l a: En el siguiente enlace puedes ver cómo leer los nombres de los módulos. http://www.cpearson.com/excel/vbe.aspx Sigue las instrucciones que aparecen en el apartado de "Introduction".

H o l a: Te anexo la macro para que al seleccionar una celda con nombre de macro, se ejecute la macro con el nombre seleccionado. Pon la siguiente macro en los eventos de la hoja. Private Sub Worksheet_SelectionChange(ByVal Target As Range)...