VBA Question

[peyman]

hi,
How can I write a code in a way to select the range A to F columns one row
less than active cell row no. . For example if the activecell address is D3
the range will be selected like A2:F2.
Thanks for your help.

 

[Gary''s Student]

Sub ordinate()
n = ActiveCell.Row - 1
Range("A" & n & ":F" & n).Select
End Sub

 

[peyman]

thanx Gary for your prompt reply.I'll try that

Sub ordinate()
n = ActiveCell.Row - 1
Range("A" & n & ":F" & n).Select
End Sub

 

[peyman]

it works well. Thanks again

Sub ordinate()
n = ActiveCell.Row - 1
Range("A" & n & ":F" & n).Select
End Sub

 

[Mike H]

Hi,

If I've understood correctly then try this

Range("A" & ActiveCell.Row - 1 & ":F" & ActiveCell.Row - 1).Select

Mike

 

[peyman]

yes Mike this works too.Thanks

Hi,

If I've understood correctly then try this

Range("A" & ActiveCell.Row - 1 & ":F" & ActiveCell.Row - 1).Select

Mike

 

[Mike H]

Your welcome

yes Mike this works too.Thanks

 

[Shane Devenshire]

Hi,

Here is another way:

ActiveCell.Offset(-1, -3).Resize(, 6).Select

 

[Rick Rothstein]

Here is yet another way...

Range("A1:F1").Offset(ActiveCell.Row - 2).Select