i need to pass to a Sub a parameter TargetRange As Range

i want my macro to pick up the target range location from a cell on on
of the sheets.

for example:

in cell a1 i have the value "B10"

i need to pass the value in a1 as a Range to my Sub.

i tried

Dim TR
TR
Range(Worksheets("DataFeeds1").Range(Worksheets("D ataFeeds1").Range("A1")).Value)

Sub mysub (Target As Range)
.....
end sub

But inside mySub Target is A1!!


Admittedly i'm somewhat new to this.
Your Help is sincerely appreciated

--
Message posted from http://www.ExcelForum.com

change your
dim TR
to
Dim TR as range


-----Original Message-----
i need to pass to a Sub a parameter TargetRange As Range

i want my macro to pick up the target range location
from a cell on one
of the sheets.

for example:

in cell a1 i have the value "B10"

i need to pass the value in a1 as a Range to my Sub.

i tried

Dim TR
TR =
Range(Worksheets("DataFeeds1").Range(Worksheets
("DataFeeds1").Range("A1")).Value)

Sub mysub (Target As Range)
.....
end sub

But inside mySub Target is A1!!


Admittedly i'm somewhat new to this.
Your Help is sincerely appreciated.


---
Message posted from http://www.ExcelForum.com/

.

If I understood what you're trying to do:

With Worksheets("DataFeeds1")
mysub .Range(.Range("A1").Value)
End With


In article ,
rbaldwin wrote:

i need to pass to a Sub a parameter TargetRange As Range

i want my macro to pick up the target range location from a cell on one
of the sheets.

for example:

in cell a1 i have the value "B10"

i need to pass the value in a1 as a Range to my Sub.

i tried

Dim TR
TR =
Range(Worksheets("DataFeeds1").Range(Worksheets("D ataFeeds1").Range("A1")).Val
ue)

Sub mysub (Target As Range)
....
end sub

But inside mySub Target is A1!!


Admittedly i'm somewhat new to this.
Your Help is sincerely appreciated.


---
Message posted from http://www.ExcelForum.com/

and use Set for the assignment

--

HTH

Bob Phillips
... looking out across Poole Harbour to the Purbecks
(remove nothere from the email address if mailing direct)

"steve" wrote in message
...
change your
dim TR
to
Dim TR as range


-----Original Message-----
i need to pass to a Sub a parameter TargetRange As Range

i want my macro to pick up the target range location
from a cell on one
of the sheets.

for example:

in cell a1 i have the value "B10"

i need to pass the value in a1 as a Range to my Sub.

i tried

Dim TR
TR =
Range(Worksheets("DataFeeds1").Range(Worksheets
("DataFeeds1").Range("A1")).Value)

Sub mysub (Target As Range)
.....
end sub

But inside mySub Target is A1!!


Admittedly i'm somewhat new to this.
Your Help is sincerely appreciated.


---
Message posted from http://www.ExcelForum.com/

.