Macro en excel

hola, Max !

segun los datos que expones, prueba con una macro +/- como la siguiente:
deberas adaptar/corregir/modificar/... donde los datos 'reales' sean diferentes de cualquier supuesto :))

si cualquier duda [o informacion adicional]... comentas ?
saludos,
hector.

en un modulo de codigo 'general' ==Sub Traspasa_datos()
Application.ScreenUpdating = False
With Worksheets("hoja1")
If .AutoFilterMode Then .Cells.AutoFilter
.[a1].AutoFilter Field:=1, Criteria1:="a"
With .AutoFilter.Range
With .Offset(1).Resize(.Rows.Count - 1)
.Copy Worksheets("hoja2").[a65536].End(xlUp).Offset(1)
.EntireRow.Delete
End With
End With
.[a1].AutoFilter
.UsedRange
End With
End Sub

__ la consulta original __

No se como trasladar automaticamente de una hoja a otra, ciertas filas que cumplan con la condicion
de que la primera celda de izquierda a derecha sea igual a "A". Es decir:
Hoja1
A Camisa
A Pantalon
B Reloj
C Zapatos
A Lentes
Despues del proceso ejecutado por la macro...
Hoja1
B Reloj
C Zapatos
Hoja2
A Camisa
A Pantalon
A Lentes
... lo debo procesar cada dia, y los datos deberan ser continuos... deberan entrar en la fila inferior al ultimo dato de la hoja2...