Given a single-cell named range, what expression gives a range of the cell's row?

Posted on 2011-02-21
Last Modified: 2012-05-11
A worksheet cell has been named" r_Cell".  
What is the expression that will provide a range with r_Cell's entire row?

Dim v_RowRange as Range

Set v_RowRange = ?    '// create a range that is the entire row of range("[r_Cell]")
Question by:AndresHernando
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
  • 5
  • 4
LVL 12

Accepted Solution

Alan3285 earned 125 total points
ID: 34941145


I think this is what you need:

    set v_RowRange = range(r_Cell).entirerow

LVL 50
ID: 34941152

maybe like

Sub test()

Dim v_RowRange As Range
Dim cRow As Long
cRow = Range("r_cell").Row
Set v_RowRange = Range(cRow & ":" & cRow)

End Sub

Open in new window

cheers, teylyn
LVL 50
ID: 34941155
Ahww! Alan, much better!!
Independent Software Vendors: We Want Your Opinion

We value your feedback.

Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!

LVL 50
ID: 34941162
.... although, you may want to include the quotes around r_Cell, like

    Set v_RowRange = Range("r_Cell").EntireRow

cheers, teylyn
LVL 12

Expert Comment

ID: 34941197
Yes - Depends on what he means by 'named' cell.

If it is 'named' in VBA something like:

set r_Cell = Range("A1")

then no quotes, but if 'named' in the normal user interface outside of VBA then he would need the quotes.

LVL 50
ID: 34941289
I work a lot with range names / named formulas / named ranges .... whatever you want to call them. So my antennae flag this as a range name (as in Insert > Name > Define or "Name Manager" in XL 2007 or later).  

That's my gut feel. I could be wrong. It could be a variable, but when I read ...

>> A worksheet cell has been named" r_Cell".  

... my antennae say "named range"!

In any case: as a VBA variable without quote marks, or as a named range with quote marks, your suggestion wins, if I had a say.

cheers, teylyn
LVL 50
ID: 34941355
Then again, if it's a VBA variable, you would not wrap it in a Range(), would you? More like ...

dim r_Cell as range
set r_Cell = Range("A1")

    set v_RowRange = r_Cell.entirerow

Open in new window

LVL 12

Expert Comment

ID: 34941501
Hi Teylyn,

Re-reading the OP, I agree that he probably means a defined name using Insert > Name > Define (or the "Name Manager" in later versions).

In that case, the quotes would be required.



Author Comment

ID: 34941509
Thank you both for the info!  --Andres
LVL 12

Expert Comment

ID: 34941646
Probably should have split the points, but thank you.

Featured Post

MS Dynamics Made Instantly Simpler

Make Your Microsoft Dynamics Investment Count  & Drastically Decrease Training Time by Providing Intuitive Step-By-Step WalkThru Tutorials.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

In Part II of this series, I will discuss how to identify all open instances of Excel and enumerate the workbooks, spreadsheets, and named ranges within each of those instances.
This article describes how you can use Custom Document Properties to store settings and other information in your workbook so that they will be available the next time you open the workbook.
The viewer will learn how to create a normally distributed random variable in Excel, use a normal distribution to simulate the return on an investment over a period of years, Create a Monte Carlo simulation using a normal random variable, and calcul…
Finds all prime numbers in a range requested and places them in a public primes() array. I've demostrated a template size of 30 (2 * 3 * 5) but larger templates can be built such 210  (2 * 3 * 5 * 7) or 2310  (2 * 3 * 5 * 7 * 11). The larger templa…

729 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question