selecting a row with a variable

VB Code:

For a = 4 To last
    If Sheets("Software Personnel").Range("K" & a).Value = "M760" Then
        Sheets("Software Personnel").Select
        Rows(a).Select
        Selection.Cut
        Sheets("M760 Personnel").Select
        Rows(m760Last + count).Select
        ActiveSheet.Paste
        count = count + 1
    End If
Next

When I try to run this code... I get an error "1004 Select Method of Range class failed" and doesn't like this line:

VB Code:

Rows(a).Select

Any ideas? Any different algorithms that would work?

Thanks,
Alex

This is how I highlight a row.....hope it helps

Code:

---

oXLApp.Worksheets("Sheet1").Select
ActiveCell.EntireRow.Select
Selection.Delete Shift:=xlUp

---

thanks

VB Code:

For a = 1 to 20
     Sheets("New Personnel").Range("BB" & a).EntireRow.Select
     Selection.Cut
     Selection.Delete Shift:=xlUp
Next

I get:

Quote:

---

1004 Select method of Range class failed

---

and it doesn't like this line:

Quote:

---

Sheets("New Personnel").Range("BB" & a).EntireRow.Select

---

any ideas?

This works fine for me, have you declared a as an integer variable data type?

Is there a reason why Vlookup is not an option? Vlookup displays information from one cell by finding something in another. It's also be fast I would have thought.