Solved

In range, name a single-cell range the text in the field to the right of the cell

Posted on 2011-03-10
3
227 Views
Last Modified: 2012-05-11
I have various named ranges that, for example, go from N6:S22.  However within this range, in the column Q, in each row in the range, the cell in column Q needs to be range-named the text that is in column R for that cell.  For example, cell Q15 needs to be range-named what the text is in cell R22.  So, i have a range names "ss_WAL" that is N6:S22,  I need to loop through the Q6:Q22 cells and range-name them the values in R6:R22.  All this must be done in VBA.  I have the below but am not sure how to proceed.
With ThisWorkbook.Worksheets("Datasource").Range("ss_WAL")
                    .Cells(intCount, 4).AddComment Me.txtRangeName.Value  'Adds comment with range name
                    .Cells(intCount, 4).Name = .Cells(intCount, 5).text   'Defines the name of the range for the column number
End With

Open in new window

0
Comment
Question by:ssmith94015
[X]
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
  • 2
3 Comments
 
LVL 30

Accepted Solution

by:
SiddharthRout earned 500 total points
ID: 35098534
You can do this simply using this

With Worksheets("Datasource")
    For i = 6 To 22
        .Range("Q" & i).Name = .Range("R" & i).Value
    Next
End With

Open in new window


Sid
0
 

Author Comment

by:ssmith94015
ID: 35102177
Sid, let me try that.  
0
 

Author Closing Comment

by:ssmith94015
ID: 35109909
It works perfectly.  Now, am posting another related question on this top that extends what I need to do.
0

Featured Post

Ransomware-A Revenue Bonanza for Service Providers

Ransomware – malware that gets on your customers’ computers, encrypts their data, and extorts a hefty ransom for the decryption keys – is a surging new threat.  The purpose of this eBook is to educate the reader about ransomware attacks.

Question has a verified solution.

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

Suggested Solutions

Technology opened people to different means of presenting information, but PowerPoint remains to be above competition. Know why PPT still works today.
Freeze panes is an option within all variants of Excel to enable parts of a sheet to remain stationary when the cursor is in another part of the sheet. This is a very useful feature which is overlooked or under used.
This Micro Tutorial demonstrate the bugs in Microsoft Excel for Mac with Pivot Charts.
This is Part 3 in a 3-part series on Experts Exchange to discuss error handling in VBA code written for Excel. Part 1 of this series discussed basic error handling code using VBA. http://www.experts-exchange.com/videos/1478/Excel-Error-Handlin…

739 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