Saving a range for later reference


P

Pistolade

I need a macro that will save a range as "VariablesFor" & Job, where Jo
= Range("F1").Value, as well as save Job xlDown column A. The range
need to be on the same page, but need to not replace any pre existin
data. What I have so far is:
Sub SavingSet()
'
' SavingSet Macro
'
NewJob = Range("G1").Value
'
Range("A2:O33").Select
Selection.Copy
Sheets("VariablesQS").Select
ActiveWindow.SmallScroll Down:=12
Range("B1").End(xlDown).Offset(-1).Select
ActiveSheet.Paste
Selection.Names.Add Name:="VariablesFor" & NewJob
Sheets("Variables").Select
Range("G1").Select
Selection.Copy
Sheets("VariablesQS").Select
Range("A1").End(xlDown).Select
ActiveSheet.Paste
End Sub

However, The First .end(xlDown) doesn't bring it down nearly far enough
or it will just bring it down to row one million something. Then i
stops at the selection.Names.Add line, I don't know how to Tell it t
select the cells it pasted any other way, since the fresh paste wil
still be a selection, I would like to do it by referring to tha
selection.

Any help would be great.
Thanks,
-Pistolade
 
Ad

Advertisements


Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top