Save cell location to a variable

  • Thread starter Thread starter Alberto Ast
  • Start date Start date
A

Alberto Ast

I need to save my active cell location into a variable so later I can select
a range from a specific cell all the way to the saved one cell.

For example I have data from A1:B20.. row 20 will change each time.
Then I do as follows:
Range ("A1:B1").select
Range(Selection, Selection.End(xlDown)).Select

Then I move one cell to the right
ActiveCell.Offset(0, 1).Select
Next I want to copy data from C1:G1 all the way to last record on column A
Range("C1:G1").Select
Selection.Copy

Here the tricky part
Range("C2:Cx).select
Paste

Hope is not too much detail for a simple question.
Thanks
 
Hello

you could declare a range variable

Dim Mycell as range

and replacewith
Set MyCell = ActiveCell


Then replace
Range("C2:Cx).select
with
Range("C2",MyCell).select
 
This was great... thanks...

Charabeuh said:
Hello

you could declare a range variable

Dim Mycell as range

and replace
with
Set MyCell = ActiveCell


Then replace
Range("C2:Cx).select
with
Range("C2",MyCell).select
Click to expand...
 
Back
Top