range adding

[Toman]

Hello guys,

I need your help ... with my code.

I have a small table (1 column, 7 rows ) in my sheet.
After click on command button I need to create(copy) the same one right next to the original... Thats no problem for me. It is simple copying.

The problem I can not cope with is adding the table (right next to previous)after each click.

I hope I explain myself clearly.

Thanks for your kind contributions.

[paul.robinson@it-tallaght.ie]

Hi
Not quiote sure if this is what you mean but try

Sub tester()
With Selection
.Copy Destination:=.Offset(0, 1)
.Offset(0, 1).Select
End With
End Sub

This will copy the selected range one column to the right, then select
that range. As you keep clicking the button further copies will be
copied to the right and so on.

regards
Paul

[Bob Phillips]

Dim cell As Range

For Each cell In Range("A1:A7")
cell.Offset(0, 1).Value = cell.Offset(0, 1).Value + cell.Value
Next cell


--
HTH

Bob Phillips

(remove nothere from email address if mailing direct)

"Toman" <Toman.24fyxo_1141973706.2579@excelforum-nospam.com> wrote in
message news:Toman.24fyxo_1141973706.2579@excelforum-nospam.com...
>
> Hello guys,
>
> I need your help ... with my code.
>
> I have a small table (1 column, 7 rows ) in my sheet.
> After click on command button I need to create(copy) the same one right
> next to the original... Thats no problem for me. It is simple copying.
>
> The problem I can not cope with is adding the table (right next to
> previous)after each click.
>
> I hope I explain myself clearly.
>
> Thanks for your kind contributions.
>
>
> --
> Toman
> ------------------------------------------------------------------------
> Toman's Profile:
http://www.excelforum.com/member.php...o&userid=31397
> View this thread: http://www.excelforum.com/showthread...hreadid=520942
>

[Toman]

Thank you boys.

I didnīt know how to incorporate "offset".
The first contribution solves exactly what I meant.
It appears very easy NOW