Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Trouble Setting Range
I am trying to establish the end of a range but keep running into an object
error. Below is a bit of code that and the error, "Method 'Range' of object '_Global' failed. Dim Drng As Long Dim RngEnd As String Drng = ActiveSheet.Cells(Rows.Count, "G").End(xlUp).Row .... Range("H5").Select RngEnd = "H" & Drng Selection.AutoFill Destination:=Range("H5:RngEnd") Any help is appreciated. |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Trouble Setting Range
Selection.AutoFill Destination:=Range("H5:" & RngEnd)
-- Jim Cone Portland, Oregon USA "Pablo" wrote in message I am trying to establish the end of a range but keep running into an object error. Below is a bit of code that and the error, "Method 'Range' of object '_Global' failed. Dim Drng As Long Dim RngEnd As String Drng = ActiveSheet.Cells(Rows.Count, "G").End(xlUp).Row .... Range("H5").Select RngEnd = "H" & Drng Selection.AutoFill Destination:=Range("H5:RngEnd") Any help is appreciated. |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
Trouble Setting Range
Pablo, are you sure that RngEnd shouldn't be Dimmed as Long. I always Dim my
'last rows' as Long. Dim RngEnd As Long Jim gave good guidance above. I just would have changed the Data Type to Long. Just my two cents. Good luck, Ryan--- -- Ryan--- If this information was helpful, please indicate this by clicking ''Yes''. "Jim Cone" wrote: Selection.AutoFill Destination:=Range("H5:" & RngEnd) -- Jim Cone Portland, Oregon USA "Pablo" wrote in message I am trying to establish the end of a range but keep running into an object error. Below is a bit of code that and the error, "Method 'Range' of object '_Global' failed. Dim Drng As Long Dim RngEnd As String Drng = ActiveSheet.Cells(Rows.Count, "G").End(xlUp).Row .... Range("H5").Select RngEnd = "H" & Drng Selection.AutoFill Destination:=Range("H5:RngEnd") Any help is appreciated. |
#4
Posted to microsoft.public.excel.programming
|
|||
|
|||
Trouble Setting Range
For the way Pablo wrote his code, RngEnd needs to be a String; here is what
is being assigned to it... RngEnd = "H" & Drng Drng was Dim'med as a Long and that variable is what Pablo assigned the end of data to. -- Rick (MVP - Excel) "ryguy7272" wrote in message ... Pablo, are you sure that RngEnd shouldn't be Dimmed as Long. I always Dim my 'last rows' as Long. Dim RngEnd As Long Jim gave good guidance above. I just would have changed the Data Type to Long. Just my two cents. Good luck, Ryan--- -- Ryan--- If this information was helpful, please indicate this by clicking ''Yes''. "Jim Cone" wrote: Selection.AutoFill Destination:=Range("H5:" & RngEnd) -- Jim Cone Portland, Oregon USA "Pablo" wrote in message I am trying to establish the end of a range but keep running into an object error. Below is a bit of code that and the error, "Method 'Range' of object '_Global' failed. Dim Drng As Long Dim RngEnd As String Drng = ActiveSheet.Cells(Rows.Count, "G").End(xlUp).Row .... Range("H5").Select RngEnd = "H" & Drng Selection.AutoFill Destination:=Range("H5:RngEnd") Any help is appreciated. |
#5
Posted to microsoft.public.excel.programming
|
|||
|
|||
Trouble Setting Range
Jim - Thank you. I thought it is something like this but I was mentally stuck.
"Jim Cone" wrote: Selection.AutoFill Destination:=Range("H5:" & RngEnd) -- Jim Cone Portland, Oregon USA "Pablo" wrote in message I am trying to establish the end of a range but keep running into an object error. Below is a bit of code that and the error, "Method 'Range' of object '_Global' failed. Dim Drng As Long Dim RngEnd As String Drng = ActiveSheet.Cells(Rows.Count, "G").End(xlUp).Row .... Range("H5").Select RngEnd = "H" & Drng Selection.AutoFill Destination:=Range("H5:RngEnd") Any help is appreciated. |
#6
Posted to microsoft.public.excel.programming
|
|||
|
|||
Trouble Setting Range
Ryan - Thank you. I see the value of this. It makes the variable more
versitable. "ryguy7272" wrote: Pablo, are you sure that RngEnd shouldn't be Dimmed as Long. I always Dim my 'last rows' as Long. Dim RngEnd As Long Jim gave good guidance above. I just would have changed the Data Type to Long. Just my two cents. Good luck, Ryan--- -- Ryan--- If this information was helpful, please indicate this by clicking ''Yes''. "Jim Cone" wrote: Selection.AutoFill Destination:=Range("H5:" & RngEnd) -- Jim Cone Portland, Oregon USA "Pablo" wrote in message I am trying to establish the end of a range but keep running into an object error. Below is a bit of code that and the error, "Method 'Range' of object '_Global' failed. Dim Drng As Long Dim RngEnd As String Drng = ActiveSheet.Cells(Rows.Count, "G").End(xlUp).Row .... Range("H5").Select RngEnd = "H" & Drng Selection.AutoFill Destination:=Range("H5:RngEnd") Any help is appreciated. |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
trouble setting colors | Charts and Charting in Excel | |||
Trouble Setting Up Graph With Scroll Bar | Excel Programming | |||
trouble setting plotarea size | Excel Programming | |||
Trouble setting visible property for PivotItems | Excel Programming | |||
Trouble setting total for on chart | Charts and Charting in Excel |