Custom change Macro's Range value, from cells input.

The code below works fine, I can copy selected area into new sheet. However, I wish to custom change the Range("A1:AO164") value, for example, at cells(1,1) I key in A1, then cells(1.2) I key in A56, then this changes will reflect to the value in this macro to Range("A1:A56").
I tried using this way :

Dim A as string
cells(1,1).text = a
cells(1,2).text = b
Range("a:b").Select

However, this silly act not working, please help me on this issue, I already run out of idea ~!

Please Login or Register  to view this content.

Please Login or Register  to view this content.

Note also that cells(1,1).text = a should be cells(1,1).Value = a
BUT: That line would have replaced the contents of Cell A1 with whatever was in variable A.
In this case A is empty, thus it would have erased the contents of A1!

Also note that A = Range("A1").Value is read:
(let) the contents of var A get what's in cell A1.
But your original said:
(let) cell A1 get the value stored in var A (it was empty)