ActiveCell.Value = "=TSColor(" & dValue.Address & ")"
becomes
ActiveCell.Value = "=TSColor(" & dValue.Address(0,0) & ")"

stvgarner wrote:
>
> That did it, Thanks!!!
>
> Do you know if there is a way to make the range not be absolute (C7
> instead of $C$7)? Not to worried about this part though.
>
> --
> stvgarner
> ------------------------------------------------------------------------
> stvgarner's Profile: http://www.excelforum.com/member.php...o&userid=20599
> View this thread: http://www.excelforum.com/showthread...hreadid=533460

--

Dave Peterson