I have the following code that is not acting as I was hoping it would:

Dim SelectedRange As Range, RangeCheck As Range

Set SelectedRange = Sheet1.Range("C2:C10")
SelectedRange.Select
For Each RangeCheck In SelectedRange
Range(RangeCheck).Select

When I use the SelectedRange.Select command it selects the correct command,
but when it gets to the Range(RangeCheck).Select is selects cell AR644
instead of the first cell in the given range.

What am I doing wrong??

Any help would be greatly appreciated.

cdb