Actividad pública reciente
Ha valorado "Excelente" la respuesta
Puedes revisar la macro que me enviaste?
Te anexo la macro actualizada Sub Grabar_Aviso() 'Por Dante Amor ' Grabar_Aviso Macro ' Application.ScreenUpdating = False Application.DisplayAlerts = False Set h1 = Sheets("Aviso de Cobro") If h1.Range("C11").Value = "" Then MsgBox "Debes...
Voto positivo a la respuesta
Crear macro que ordene datos repetidos alfabéticamente y luego inserte filas en blanco separando en grupos los datos repetidos
Te anexo la macro Sub Macro1() 'Por Dante Amor Range("A1").CurrentRegion.Sort Key1:=Range("A:A"), Header:=xlYes For i = Range("A" & Rows.Count).End(xlUp).Row To 2 Step -1 If ant <> Cells(i, "A").Value Then Rows(i + 1).Insert Shift:=xlDown ant =...
Ha empezado a seguir a 
Dante Amor
Dante Amor
Ha valorado "Buena" la respuesta
Error en Macro Necesito una solución
No entendí muy bien lo que hace la macro. Mejor explícame qué quieres hacer, te dejo algunos pasos, solamente completa la información: 1. Quieres copiar de la hoja "Aviso de Cobro", el rango "A1:M51" 2. Quieres crear una nueva hoja 3. En la nueva...
Educación
-
Universidad Nacional Autonoma de Honduras
-
Grant Thornton International