change Selection to specific Range

[Damian]

I am trying to change Selection in my code to a specific Range.

I want it to be: Range("B31:O31", [Last])

When I try to replace Selection in the code below I get an error when I try
to run in.
If Selection.Rows.Count > 1 Then
Set Rng = Selection

Any ideas?
Thank You.