create a dynamic Range()

[rbaldwin]

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("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

 

[steve]

change your
dim TR
to
Dim TR as range

 

[JE McGimpsey]

If I understood what you're trying to do:

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

 

[Bob Phillips]

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)