Hi,

I want to place "1" in column 8 in every row in my range named
"LegendList". How do I do this?

I tried:

LegendList(, 8) = "1"

and I tried

With LegendList
.Cells(, 8) = "1"
end with

Neither works...
Help...please
Thanks,
Paul

try this to put the number 1 in each cell

Sub oneinrange()
Range("legendlist") = 1
End Sub

or 8 columns over
Sub oneinrange()
Range("legendlist").Offset(, 8) = 1
End Sub

--
Don Guillett
Microsoft MVP Excel
SalesAid Software
dguillett1@austin.rr.com
"rpsmith" <rpsmith@bpa.gov> wrote in message
news:8db13880-b1ac-4785-b63f-b303e2779d97@v26g2000prm.googlegroups.com...
> Hi,
>
> I want to place "1" in column 8 in every row in my range named
> "LegendList". How do I do this?
>
> I tried:
>
> LegendList(, 8) = "1"
>
> and I tried
>
> With LegendList
> .Cells(, 8) = "1"
> end with
>
> Neither works...
> Help...please
> Thanks,
> Paul