codeeiting

  1. pedie

    Please help with this macro, thanks

    Sub copyfrom2() With Sheets("Datas") r = 1 lr = .Cells(Rows.Count, "A").End(xlUp).Row For i = 2 To lr If .Cells(i, "B").Value >= .Cells(3, "H").Value Then .Cells(i, "A").Resize(, 7).Copy Sheets("Home").Cells(r, "f") r = r + 1 End If Next...

Some videos you may like

This Week's Hot Topics

Top