Since no one can answer my original, how do I select the las

[slim]

I have the following code

Sub matrix()
Worksheets("matrix").Select

Set designingmark = ActiveSheet.Rows("1:1").Find("MA")
If Not designingmark Is Nothing Then
Range(designingmark.Address).Select
End If

Set makingmark = ActiveSheet.Columns("A:A").Find("MA")
If Not makingmark Is Nothing Then
Range(makingmark.Address).Select
End If

Range(designingmark.Rows, makingmark.Columns).Select

how do I select the last cell in the range that is currently selected

[Barrie Davidson]

On 2002-05-14 07:06, slim wrote:
I have the following code

Sub matrix()
Worksheets("matrix").Select

Set designingmark = ActiveSheet.Rows("1:1").Find("MA")
If Not designingmark Is Nothing Then
Range(designingmark.Address).Select
End If

Set makingmark = ActiveSheet.Columns("A:A").Find("MA")
If Not makingmark Is Nothing Then
Range(makingmark.Address).Select
End If

Range(designingmark.Rows, makingmark.Columns).Select

how do I select the last cell in the range that is currently selected

Try this (I think it's what you want):

Range(designingmark.Rows, makingmark.Columns).SpecialCells(xlCellTypeLastCell).Select

Hope this helps you out.