--It does work..Try the below code in Step Into mode (use F8 instead of F5)
--You are writing the stored value to the same cell
xlastdev = ActiveCell.Value
xnextDev = ActiveCell.Address
Range(xnextDev).ClearContents
Msgbox "Cleared"
Range(xnextDev).Value = xlastdev
--If you are looking to write to the next cell try
Range(xnextDev).OffSet(1) = xlastdev
If this post helps click Yes
---------------
Jacob Skaria
"Alberto Ast" wrote:
> I have saved an activecell value to a variable
>
> xlastdev = ActiveCell.Value
>
> Then have saved an activecell adress to anotehr variable
>
> xnextDev = ActiveCell.Address
>
> I want to assign the last value to the next address
>
> Range(xnextDev).Value = xlastdev
>
> But it does not work... it fail at the last command.
|