I want to autofill a range of cells from row 3 to 9 in a given column just
like this

Range("B3").Select
Selection.AutoFill Destination:=Range("B3:B9")

When I use a variable the autofill returns an "Autofill method of range
class failed" error. Need help please

Cells(3, LastCol ).Select
Selection.AutoFill Destination:=Range(Cells(3, LastCol), Cells(9, LastCol ))

Thanks in adavance

Have you tried

Range("B3:B9")= Range("B3")

--
HTH,
Barb Reinhardt



"LuisE" wrote:

> I want to autofill a range of cells from row 3 to 9 in a given column just
> like this
>
> Range("B3").Select
> Selection.AutoFill Destination:=Range("B3:B9")
>
> When I use a variable the autofill returns an "Autofill method of range
> class failed" error. Need help please
>
> Cells(3, LastCol ).Select
> Selection.AutoFill Destination:=Range(Cells(3, LastCol), Cells(9, LastCol ))
>
> Thanks in adavance

Thanks Barb,

I just tried but it doesn't work.

Have you tried Just

Range("B3:B9").Select

i usually do something like this:

Sub test()
Dim lastcol As Long
lastcol = 4
Dim ws As Worksheet
Set ws = Worksheets("Sheet1")
With ws
.Cells(3, lastcol).AutoFill Destination:=.Range(.Cells(3, lastcol),
_
.Cells(9, lastcol))
End With
End Sub

--


Gary


"LuisE" <(E-Mail Removed)> wrote in message
news:E1252226-4741-44A9-AA50-(E-Mail Removed)...
>I want to autofill a range of cells from row 3 to 9 in a given column just
> like this
>
> Range("B3").Select
> Selection.AutoFill Destination:=Range("B3:B9")
>
> When I use a variable the autofill returns an "Autofill method of range
> class failed" error. Need help please
>
> Cells(3, LastCol ).Select
> Selection.AutoFill Destination:=Range(Cells(3, LastCol), Cells(9, LastCol ))
>
> Thanks in adavance

wordwrap!

Sub test()
Dim lastcol As Long
lastcol = 4
Dim ws As Worksheet
Set ws = Worksheets("Sheet1")
With ws
.Cells(3, lastcol).AutoFill Destination:=.Range(.Cells(3, lastcol),_
.Cells(9, lastcol))
End With
End Sub

--


Gary


"Gary Keramidas" <GKeramidasATmsn.com> wrote in message
news:(E-Mail Removed)...
>i usually do something like this:
>
> Sub test()
> Dim lastcol As Long
> lastcol = 4
> Dim ws As Worksheet
> Set ws = Worksheets("Sheet1")
> With ws
> .Cells(3, lastcol).AutoFill Destination:=.Range(.Cells(3, lastcol),
> _
> .Cells(9, lastcol))
> End With
> End Sub
>
> --
>
>
> Gary
>
>
> "LuisE" <(E-Mail Removed)> wrote in message
> news:E1252226-4741-44A9-AA50-(E-Mail Removed)...
>>I want to autofill a range of cells from row 3 to 9 in a given column just
>> like this
>>
>> Range("B3").Select
>> Selection.AutoFill Destination:=Range("B3:B9")
>>
>> When I use a variable the autofill returns an "Autofill method of range
>> class failed" error. Need help please
>>
>> Cells(3, LastCol ).Select
>> Selection.AutoFill Destination:=Range(Cells(3, LastCol), Cells(9, LastCol ))
>>
>> Thanks in adavance
>
>