Dante Amor

H o l a: Pon la siguiente macro en los eventos de tu hoja: Private Sub Worksheet_SelectionChange(ByVal Target As Range) 'Por.Dante Amor 'Exit Sub If Target.Count > 1 Then Exit Sub If Target.Value = "" Then If ActiveSheet.AutoFilterMode Then...

H o l a: Si no están habilitadas las macros, no se podría ejecutar una macro para habilitar las macros. Para que las macros estén habilitadas revisa el siguiente enlace: http://excelforo.blogspot.mx/2013/06/vba-habilitar-macros-de-excel.html Otra...

H o l a: Tal vez se cambia el formato por cambiar la versión. Pero prueba lo con lo siguiente, lo que hice fue grabar una macro obteniendo todos los parámetros de impresión de la hoja. Después estoy asignado cada parámetro de la hoja origen en la...

H o l a: Prueba la siguiente macro: Sub Macro4() ' Range("D13:D38").FormulaR1C1 = _ "=IF(R[4]C[-1]=R14C21,'Centralizador Anual'!R7C3,"""")" End Sub Si tienes problemas, entonces quita las celdas combinadas y prueba nuevamente. ':) S a l u d o s . D a...

H o l a: Mejor envíame tu archivo y me explicas con ejemplos qué es lo que necesitas. Mi correo [email protected] En el asunto del correo escribe tu nombre de usuario “Javier Sanz” y el título de esta pregunta.

H o l a: Te anexo la macro, pon tus datos en la "Hoja1", empieza a poner los nombres en la columna "A" en la fila 2 de la "Hoja1", el número de veces lo pones en la columna "B". Los resultados quedarán en la "Hoja2" Sub Repetir() 'Por.Dante Amor Set...

H o l a: Envíame tu archivo y me explicas con un ejemplo qué es lo primero en lo que quieres que te ayude. Tienes varias peticiones en esta pregunta, así que vamos a avanzar una por una de tus peticiones. Mi correo [email protected] En el asunto del...

H o l a: Pon las siguientes macro en tu formulario, cambia "abc" por el password que desees. Private Sub CommandButton1_Click() 'Por.Dante Amor If TextBox1 = "abc" Then For Each h In Sheets h.Visible = -1 Next Unload Me Else MsgBox "Password...

H o l a: Me perdí un poco en la explicación. Entiendo que si en la celda BB3 dice "Si" entonces que se imprima el rango "A1:AJ602" Pero ya no entendí si en la celda BB3 va a decri "SI" o va a decir "VERDADERO" Tampoco entendí en cuál hoja está la...

H o l a: Te anexo la macro Sub CopiarLibro() 'Por.Dante Amor Application.ScreenUpdating = False Application.DisplayAlerts = False Set l1 = ThisWorkbook ruta = l1.Path & "\" nombre = "nombrearch" l1.SaveCopyAs ruta & nombre & ".xlsm" Set l2 =...