Hi
Firstly thanks for the taking the time to read this.

I am using the below formulae to find a cell within a worksheet.
The difficulty I have is I would like to be able to find the cell, choose a range below it, then find another cell within the range selected, choose another range and copy it to another sheet.
My problem is that although I am able to find the first cell (Investment (LocB) and define the range, the next find i use looks at the whole sheet and finds another "regular" that was not even in the second range, but was in the first range that was used to find the first cell.

Any assistance or ideas would be appreciated.

Worksheets("Liabilities_Partner").Activate
With Worksheets("Liabilities_Partner").Range("b1:b500")
Set c = .Find("Investment (LocB)")
c.Select
ActiveCell.Offset(0, 0).Range("A1:A100").Select
Set c = .Find("Regular")
c.Select
ActiveCell.Offset(0, 1).Range("A1:AZ1").Select
Selection.Copy
End With

Thanks
Strybes

I can't work with that method, so I'd approach it differently -- HTH.

Worksheets("Liabilities_Partner").Activate
On Error GoTo 100
x = Application.Match("Investment (LocB)", Range("B1:B500"), 0)
y = Application.Match("Regular", Cells(x, 2).Resize(100), 0)
Cells((x + y) - 1, 2).Offset(, 1).Resize(, 51).Copy
Exit Sub
100:
MsgBox "Error!"