If you create a Range object you can assign a string value to it
directly, and all the cells in the range will take on that value.
Dim rng as Excel.Range
Dim myval As String
Set rng = Range("A1:A10")
myval = "Do it!"
rng.Value = myval
HTH,
JP
On Aug 12, 3:16*pm, Asif <A...@discussions.microsoft.com> wrote:
> I'm trying to assign value from Source cells into the destionation cell using
> following statements.
>
> dCell.Value = sCell.Value
>
> Is it possible to assign value in destination cells without using multiple
> copy-paste?
>
> --
> Thanx & regards,
> Asif
|