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.

 

[Weaver]

Maybe something like

Sub test()
    For Each r In Selection.Rows
        'do your thing here, where r is a range object defined by each row in turn
    Next r
End Sub

 

[RSXchin]

Thanks.
Are 'r' and 'c' predefined? or can I put whatever I want in their place?

 

[Weaver]

if you're being correct, you should dimension the range variable r

dim r as range

and yes, you can call it anything you like.

there isn't a c in there.

 

[RSXchin]

I'm sorry, I've seen other people use

for every c in range

does that mean cell?

 

[RSXchin]

this isn't working

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

 

[Weaver]

because r isn't an integer, it's a range object.

If you want to write to the first cell in the range try

r.cells(1,1)="This"

In your previous example, c can mean cell, but doesn't have to

dim c as range
for each c in selection

is fundamentally the same as

dim rhubarb as range
for each rhubarb in selection

but programmers are generally a lazy and cryptic bunch, so short variable names prevail.

 

[RSXchin]

I'm trying to make each cell in column A in the Range say "This"

 

[Weaver]

I'm trying to make each cell in column A in the Range say "This"

see post #7

 

[RSXchin]

Of course it works...
Sorry, I just didn't understand it. Thank you very much.