Cecilio Pérez Maqueda

Sub quiebres() Dim wb As Workbook: Set wb = ThisWorkbook Dim Ho As Worksheet: Set Ho = wb.Sheets("Resumen") Dim Hd As Worksheet: Set Hd = wb.Sheets("Registro") Dim ucel 'ucel = Hd.Range("A" & Rows.Count).End(xlUp).Row + 1 'For i = 2 To Ho.Range("A" &...

De haberte entendido seria algo así, Nota:Adapta los nombres de tus hojas a los datos reales Sub quieres() 'by Cecilio Perez maqueda Dim wb As Workbook: Set wb = ThisWorkbook Dim Ho As Worksheet: Set Ho = wb.Sheets("Hoja1") Dim Hd As Worksheet: Set...

Sin macros sería así Selecciona la columna completa Formato de celdas Personalizada En donde dice tipo Escribes los 13 ceros 0000000000000 ¿O necesitas macros?

Sub quiebres() Dim wb As Workbook: Set wb = ThisWorkbook Dim Ho As Worksheet: Set Ho = wb.Sheets("Gastos") Dim Ho1 As Worksheet: Set Ho1 = wb.Sheets("Ingresos") Dim Hd As Worksheet: Set Hd = wb.Sheets("Balance general") Dim ucel 'ucel = Hd.Range("A"...

¿Quieres eliminar datos repetidos de la columna "A"?

Te paso un ejemplo muy sencillo, puedes adaptarlo fácilmente a tus necesidades Sub quieres() 'by Cecilio Perez maqueda Dim wb As Workbook: Set wb = ThisWorkbook Dim Ho As Worksheet: Set Ho = wb.Sheets("contabilidad") Dim Hd As Worksheet: Set Hd =...

¿No veo la suma que mencionas en tu consulta? ¿O sea que en Range("O7") quieres el resultado de la resta de K7 - m7?

Desarrollé esta macro y te copia los formatos, puedes Sub quiebres() Dim wb As Workbook: Set wb = ThisWorkbook Dim Ho As Worksheet: Set Ho = wb.Sheets("Hoja1") Dim Hd As Worksheet: Set Hd = wb.Sheets("Hoja2") Dim ucel 'ucel = Hd.Range("A" &...

Solo tienes que cambiar por esta parte Sub quiebres() Set h1 = Sheets("hoja1") Set h2 = Sheets("hoja2") u2 = h2.Range("A" & Rows.Count).End(xlUp).Row For i = 2 To 1000 If h1.Cells(i, "G") > 0 Then h1.Cells(i, "A").Copy h2.Cells(u2, "A") h1.Cells(i,...

Te paso un ejemplo, lo que está entre paréntesis son las variables que tienes que adaptar, si te das cuenta lleva comillas, por que en tu planteamiento que haces en "hoja1, te falta cerrar comillas, checa que primero va el nombre del libro y luego el...