return beginning and ending of range

[RSXchin]

Let's say I highlight rows 5 to 11
How do I tell an event to do the same thing to each of these rows?

I don't have a real application for this at this exact moment, but I can tell it would be beneficial.

 

[RSXchin]

This is what I was looking for.
I wanted it to do it for column A, no matter where I selected.

Sub test()
    Dim r As Range
    For Each r In Selection.Rows
        Cells(r.Row, 1) = "This"
    Next r
End Sub

 

[Weaver]

Let's say I highlight rows 5 to 11
How do I tell an event to do the same thing to each of these rows?

I don't have a real application for this at this exact moment, but I can tell it would be beneficial.

Ah, I get what you mean now. I understood from your original post that you'd be selecting entire rows anyway.