A Macro for copy with selection.. (please help me)

[Iván]

Friends, how I can copy specific a specific row range in other sheets with
conditions special. ie:
copy from:
Sheet1: A B C D
1 W 100 200 300
2 400 500 600
3 700 800 900
4 W 1000 1100 1200
5 1300 1400 1500
.... (I not know how many rows there)

to Sheet2 (ONLY range Ax to Dx when Ax = "W")
A B C D
1 W 100 200 300
2 W 1000 1100 1200
....
Thanks, Iván

 

[Don Guillett]

The easiest is to sort by W>copy. Record a macro if done often

 

[Tom Ogilvy]

worksheets("Sheets1").Columns(1).SpecialCells(xlConstants) _
.EntireRow.copy _
Destination:=Worksheets("Sheet2").Range("A1")