Cecilio Pérez Maqueda

Cecilio Pérez Maqueda

Con hambre de aprender Macros
 14,1K puntos  México @cecilioperezmaqueda desde - visto

Actividad pública reciente

Ha respondido en

Extraer resultado de una fórmula

Escribe la siguiente fórmula en G42 =SI(D46<E46,D46,"")
Ha respondido en y en 2 temas más

Necesito sumar 3 columnas más en una fórmula, más que no se en donde meterla, se los agradecería

O sea que tu base de datos abarca la columna (A:E) Si es así entonces cambia en tu código Lo siguiente Range("H1").Select ActiveCell.FormulaR1C1 = "=DSUM(C[-7]:C[-3],2,R[1]C:R[2]C)" Range("H2").Select ya que lo que hace es seleccionar H1 regresas 7...
Ha valorado "Excelente" la respuesta

¿Puedo usar Find en vba para copiar algún dato en específico?

respondió: Quizás te estás olvidando en qué hoja realizás la búsqueda. Por ejemplo asegurate así: Set busco = Sheets("XML 2018").Columns("F").Find(Codi, , , xlWhole) Pero como además querés que la búsqueda se haga a partir de cierta fila la instrucción correcta...
Ha respondido en y en 2 temas más

Macro para copiar datos de una hoja a otra en excel

Pues intenta así Sub macro () Dim wb as Workbook:Set wb = Thisworkbook Dim Ho as Worksheet: set Ho=wb.Sheets ("RE-DE-02 POA") Dim Hd as worksheet:set Hd=wb.Sheets ("PRESUPUESTO") For i = 15 To Ho.range ("F" & Rows.count).End(xlUp).Row...
Ha valorado "Excelente" la respuesta

Indicar la celda inicial a mi rutina

respondió: A la excelente respuesta dada puede que esto aporte algo más https://youtu.be/DV7taRXLEzY https://youtu.be/_XegDeHiORc
Ha respondido en y en 2 temas más

Consolidar datos de varias hojas de Excel en una sola

Sub uniendohojas() For Sig = 2 To Worksheets.Count Worksheets(Sig).UsedRange.Copy _ Worksheets(1).Range("a1048576").End(xlUp).Offset(0, 0) Next Application.DisplayAlerts = False End Sub prueba y comentas
Ha respondido en y en 2 temas más

Eliminar celdas vacías de una columna

Ya probaste algo así, adáptalo a tus necesidades Range("b6").Select fin = Range("b" & Rows.Count).End(xlUp).Row Set ran = Range("b6:b" & fin).SpecialCells(xlCellTypeBlanks) ran.EntireRow.Delete
Ha respondido en

¿Cómo copiar información de una hoja a otra?

A ver prueba esto si te sirve, adapta lo que necesites, o dime datos concretos para ayudarte, saludos Sub uniendohojas() For Sig = 2 To Worksheets.Count Worksheets(Sig).UsedRange.Copy _ Worksheets(1).Range("a1048576").End(xlUp).Offset(1) Next...
Ha respondido en

No puedo hacer que una macro guarde un archivo excel con el nombre de una celda

Prueba algo así Sub guardando() Nombre = "C:\Users\I5\Desktop\" & Range("c20").Value & ".xls" ActiveWorkbook.SaveAs Nombre End Sub
Ha respondido en y en 1 temas más

Macro para hacer rápida el recorrido de miles de celdas en una columna

Por el momento puedes Poner lo siguiente Application.screenUpdating= False antes de j=2 y justo antes de end Sub escribe Application.screenUpdating= True En cuanto tenga un tiempo libre o un espacio, le acomodamos el With para aligerar otro poco O si...
Ha respondido en y en 2 temas más

Macro que recorre celdas filas busca datos y los copia en otra hoja

¿Y en qué columna se encuentran los datos a comparar?
Ha respondido en y en 2 temas más

Macro para insertar un valor en una celda de excel

A ver si te entendí mientras tengas datos en la columna A quieres insertar determinada palabra en la columna "B" me imagino que varia los datos de la columna A Prueba y comentas En este ejemplo supuse que tus datos inician en la celda A1 puedes...
Ha respondido en y en 1 temas más

Corregir Range en VBA a ejecutar en lista desplegable

Quieres qué al realizar cualquier cambio en el rango ("A2:¿A300") automáticamente se limpie tu celda B2? Ya intentaste algo así como Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address = "$A$2:$A$300 Then Range("B2").ClearContents...

Experiencia

Me apasiona el excel y más las macros aunque voy iniciando ,con dedicación sé que puedo desarrollarme

Trabajo

  • Servicios SA de CV
    Auxiliar , 2015 - actualidad