Can I copy and paste the values with a condition??

[kbj0109]

Can anyone help me create a <acronym title="visual basic for applications" style="border-width: 0px 0px 1px; border-bottom-style: dotted; border-bottom-color: rgb(0, 0, 0); cursor: help; color: rgb(51, 51, 51); background-color: rgb(250, 250, 250);">VBA</acronym> code for my business?

I have a list of people in A column, and B column contains their numbers assigned to them.
Can I just copy the people who has the number greater than 100 and paste them into Column C and D?

The list starts from the cell of A2, and I want to paste the customers at the cell of C2.
Hope anyone can help me out here...

 

[Michael M]

Try

Sub MM1()
With Columns("B")
    .AutoFilter Field:=1, Criteria1:=">100"
    Range("A2:B" & Cells(Rows.Count, "A").End(xlUp).Row).SpecialCells(xlCellTypeVisible).Copy Range("C2")
    .AutoFilter
End With
End Sub