Eduard Caballero respondió:
Tus datos son muy escasos pero te coloco este ejemplo. Acá tienes este ejemplo. Los datos serian nombre y empresa. La condición que pertenezcan a la empresa a Sub copia() Sheets(1).Select Range("B2").Select Do While Not IsEmpty(ActiveCell) If...
Macro. Copiar filas según condición.