Jump to content

Recommended Posts

Buenas tardes, necesito vuestra ayuda.

Tengo una columna donde hay valores numericos y ceros (de o3 a o100). Necesito que empezando de la celda o3, se copie ese valor a la celda A1, despues la o4 se copie a la A1 de nuevo,asi sucesivamente hasta la o100.Lo unico que debe saltarse los ceros. He intentado con la grabadora de macros, pero se hace muy largo.Supongo que sera con un bucle, pero no se hacerlo.

Adjunto el codigo de ejemplo.

Gracias

 Range("A1").Select
    Application.CutCopyMode = False
    ActiveCell.FormulaR1C1 = "=R[2]C[14]" 'copio valor o3
    Range("A1").Select
    Application.CutCopyMode = False
    ActiveCell.FormulaR1C1 = "=R[3]C[14]" 'copio valor o4
    Range("A1").Select
    Application.CutCopyMode = False
    ActiveCell.FormulaR1C1 = "=R[4]C[14]" 'copio valor 05
    Range("A2").Select

Edited by joseppp
Link to post
Share on other sites
Sub macro()

    Dim cont, ufh2 As Long
    With Hoja2
        ufh2 = .Range("O" & .Rows.Count).End(xlUp).Row
        
        For cont = 3 To ufh2
            If .Cells(cont, 15) <> 0 Then
                .Range("A1") = .Cells(cont, 15)
            End If
        Next cont
    End With
    
End Sub

Prueba el adjunto y comenta, pulsa flecha azul

Calendario1 prueba 1.xlsm

Edited by JSDJSD
Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
  • Crear macros Excel

  • Posts

    • nosotros usamos este link descargamos de SAT los xml y guardamos en una ruta y el programa tiene para importar los xml a excel, teda la opción de elegir la ruta, pero ese es de paga tiene de prueba de 10 días, ese que te pase es gratis checalo tambien @DiegoLG. a ver si le funciona saludos 
    • descarga este programa: descargarcfdi.zip y instalalo, ese programa tiene para importar xml a excel checalo, y me dices yo no puedo instalara programa en mi maquina no tengo permiso es maquina de mi trabajo, nosotros a qui en la empresa usamos uno de paga y ese es gratuito y la pagina dice Convertir tus archivos XML a Excel Podrás convertir la información de tus comprobantes fiscales (XML) exportándolos a MS Excel. Tendrás todos los datos de tus XML, incluidos los conceptos. Se genera un archivo de Excel con más de 120 columnas con los datos de los XML. Se desglosan los impuestos retenidos y trasladados por tipo y tasa.
    • Prueba y comenta... en el video veras que solo pone un si pero es que me he equivocado al subirlo el que he subido es de una prueba anterior, en realidad pasa todos los marcados. EEDD2020-3.xlsm
    • @DiegoLG En los ejemplos se extraen datos de nodos normales de xml, eso lo puedo hacer, lo que no he podido es extraer información de los nodos dentro de la seccion CDATA.   Gracias
  • Recently Browsing

    No registered users viewing this page.

×
×
  • Create New...

Important Information

Privacy Policy