Paste Active cell data till the end within defined NamedRange

Posted on 2014-01-14
Last Modified: 2014-01-14
Hi Expert,

Want to paste active cell data within NamedRange down.

I have Named Range of 10 columns lets "Name1".
I type "ABC" on 5th column.
I want to paste value "ABC" till 10th column with in the named range "Name1".

I have tried with below code but no success any help will be appriciated.

Range(ActiveCell, Cells(Rows.Count, ActiveCell.Column + 1).End(xlDown).Offset(, -1)).Value = ActiveCell.Value
Question by:satmisha
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
  • 3
  • 2
LVL 50

Expert Comment

ID: 39779004

pls try

Range(ActiveCell, ActiveCell.End(xlDown).Row, ActiveCell.End(xlToRight).Column).Value = ActiveCell.Value

Open in new window


Author Comment

ID: 39779017

"It says that wrong number of arguments and invalid property assignment."
LVL 50

Accepted Solution

Rgonzo1971 earned 135 total points
ID: 39779019

pls try

Range(ActiveCell, Cells(Range("Name1").Rows.Count + Range("Name1").Row - 1, Range("Name1").Columns.Count + Range("Name1").Column - 1)).Value = ActiveCell.Value

Open in new window


Author Comment

ID: 39779090
you rock bro.

Hope in days to come i'll be quick as you, actually I just started with vba.

Anyways! Thanks a lot.

Author Closing Comment

ID: 39779096
Damn good solution Pal.

Being a beginner if u cd suggest me few pointers\topics to learn then it wd be a gr8 help for me.

Thnx a ton again. bi

Featured Post

Industry Leaders: 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!

Question has a verified solution.

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

Suggested Solutions

Title # Comments Views Activity
Delete row if does not start with 0 43 39
Pull Phone Number out of Cell 3 12
exchange, office 365 13 37
Expand information down with a lot of information 35 39
In this article we discuss how to recover the missing Outlook 2011 for Mac data like Emails and Contacts manually.
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 Micro Tutorial demonstrates in Microsoft Excel how to consolidate your marketing data by creating an interactive charts using form controls. This creates cool drop-downs for viewers of your chart to choose from.
Polish reports in Access so they look terrific. Take yourself to another level. Equations, Back Color, Alternate Back Color. Write easy VBA Code. Tighten space to use less pages. Launch report from a menu, considering criteria only when it is filled…

730 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