Elsa Matilde respondió:
Veo que tenés un bucle que recorre la hoja BASE hasta encontrar el valor buscado (ver *) Bien, del mismo modo tenés que colocarlo para recorrer la hoja1 del primer libro: Sheets("hoja1").Select Range("I2").Select While activecell.value <> "" cuenta =...