PC Review


Reply
Thread Tools Rate Thread

Adding to data to a list

 
 
mushy_peas
Guest
Posts: n/a
 
      23rd Nov 2003

I want to make log, ie add blocks of data to main block. So far i have
very crude method of moving the main block down a few spaces, the
copying the new data to the top. then again when theres more. this i
no way perect.

I would like the be able to copy the new data to the bottom of the lis
via some incremental method, but i cant find one.

Any suggestions welcomed
Cheers

-----------------------------------------------
~~ Message posted from http://www.ExcelTip.com
~~View and post usenet messages directly from http://www.ExcelForum.com

 
Reply With Quote
 
 
 
 
Don Guillett
Guest
Posts: n/a
 
      23rd Nov 2003
untested but try assigning to a button or worksheet change event.
To copy instead of move just change the word move to copy.

sub movetobottom()
x=cells(65536,activecell.column).end(xlup).row
activecell.entirerow.move cells(x,activecell.column)
end sub
--
Don Guillett
SalesAid Software
(E-Mail Removed)
"mushy_peas" <(E-Mail Removed)> wrote in message
news:(E-Mail Removed)...
>
> I want to make log, ie add blocks of data to main block. So far i have a
> very crude method of moving the main block down a few spaces, then
> copying the new data to the top. then again when theres more. this is
> no way perect.
>
> I would like the be able to copy the new data to the bottom of the list
> via some incremental method, but i cant find one.
>
> Any suggestions welcomed
> Cheers!
>
>
> ------------------------------------------------
> ~~ Message posted from http://www.ExcelTip.com/
> ~~View and post usenet messages directly from http://www.ExcelForum.com/
>



 
Reply With Quote
 
Gord Dibben
Guest
Posts: n/a
 
      23rd Nov 2003
mushy

Not sure what you need here.

CRTL + downarrow will take you to the bottom of any contiguous block of data
in a column.

Copy your new block and select a cell in the column you want to paste into
then hit CRTL + downarrow then downarrow by itself and Paste.

After that you can Sort if you wished.

More details would be in order if this is not what you mean.

Gord Dibben XL2002

On Sun, 23 Nov 2003 15:18:07 -0600, mushy_peas
<(E-Mail Removed)> wrote:

>
>I want to make log, ie add blocks of data to main block. So far i have a
>very crude method of moving the main block down a few spaces, then
>copying the new data to the top. then again when theres more. this is
>no way perect.
>
>I would like the be able to copy the new data to the bottom of the list
>via some incremental method, but i cant find one.
>
>Any suggestions welcomed
>Cheers!
>
>
>------------------------------------------------
>~~ Message posted from http://www.ExcelTip.com/
>~~View and post usenet messages directly from http://www.ExcelForum.com/


 
Reply With Quote
 
mushy_peas
Guest
Posts: n/a
 
      23rd Nov 2003

Thanks for the quick replies. much appreciated.

I done a simple EPOS, fancy till if u like. I want to store th
transactions. I have made a macro that finishes the transactiion an
prints the reciept. What i want also is to automatically store th
details, ie the time, items and the quantity.

What i have done so far is got it copy the data onto another shee
called "log". Then after the next transaction the data in the log shee
is moved down by X rows and the new data copied into the vacant space
This all happens again after the next transaction.

This is prob OK for small number of transaction. Also i see othe
probs. its prob better to add the data to the end of the log, so there
no guessing
:

-----------------------------------------------
~~ Message posted from http://www.ExcelTip.com
~~View and post usenet messages directly from http://www.ExcelForum.com

 
Reply With Quote
 
Don Guillett
Guest
Posts: n/a
 
      23rd Nov 2003
OOPs
Change row to row+1 and MOVE to CUT

sub movetobottom()
> x=cells(65536,activecell.column).end(xlup).row+1
> activecell.entirerow.CUT cells(x,activecell.column)
> end sub
> --



--
Don Guillett
SalesAid Software
(E-Mail Removed)
"Don Guillett" <(E-Mail Removed)> wrote in message
news:uweD$(E-Mail Removed)...
> untested but try assigning to a button or worksheet change event.
> To copy instead of move just change the word move to copy.
>
> sub movetobottom()
> x=cells(65536,activecell.column).end(xlup).row
> activecell.entirerow.move cells(x,activecell.column)
> end sub
> --
> Don Guillett
> SalesAid Software
> (E-Mail Removed)
> "mushy_peas" <(E-Mail Removed)> wrote in message
> news:(E-Mail Removed)...
> >
> > I want to make log, ie add blocks of data to main block. So far i have a
> > very crude method of moving the main block down a few spaces, then
> > copying the new data to the top. then again when theres more. this is
> > no way perect.
> >
> > I would like the be able to copy the new data to the bottom of the list
> > via some incremental method, but i cant find one.
> >
> > Any suggestions welcomed
> > Cheers!
> >
> >
> > ------------------------------------------------
> > ~~ Message posted from http://www.ExcelTip.com/
> > ~~View and post usenet messages directly from http://www.ExcelForum.com/
> >

>
>



 
Reply With Quote
 
mushy_peas
Guest
Posts: n/a
 
      23rd Nov 2003

Don

that worked. not exactly what i was after, but effective none the less
Is it possible to move more than i row?

-----------------------------------------------
~~ Message posted from http://www.ExcelTip.com
~~View and post usenet messages directly from http://www.ExcelForum.com

 
Reply With Quote
 
Don Guillett
Guest
Posts: n/a
 
      23rd Nov 2003
yes

--
Don Guillett
SalesAid Software
(E-Mail Removed)
"mushy_peas" <(E-Mail Removed)> wrote in message
news:(E-Mail Removed)...
>
> Don
>
> that worked. not exactly what i was after, but effective none the less.
> Is it possible to move more than i row??
>
>
> ------------------------------------------------
> ~~ Message posted from http://www.ExcelTip.com/
> ~~View and post usenet messages directly from http://www.ExcelForum.com/
>



 
Reply With Quote
 
mushy_peas
Guest
Posts: n/a
 
      23rd Nov 2003

how exactly???:

-----------------------------------------------
~~ Message posted from http://www.ExcelTip.com
~~View and post usenet messages directly from http://www.ExcelForum.com

 
Reply With Quote
 
Dave Peterson
Guest
Posts: n/a
 
      24th Nov 2003
Modifying Don's code:
Option Explicit
Sub movetobottom()
Dim x As Long
x = Cells(65536, ActiveCell.Column).End(xlUp).Row
ActiveCell.Resize(13).EntireRow.Cut Cells(x + 1, 1)
End Sub

The Resize(##) gives the number of rows to cut.

And I changed the destination column to 1 (from activecell.column).


mushy_peas wrote:
>
> how exactly???
>
> ------------------------------------------------
> ~~ Message posted from http://www.ExcelTip.com/
> ~~View and post usenet messages directly from http://www.ExcelForum.com/


--

Dave Peterson
(E-Mail Removed)
 
Reply With Quote
 
mushy_peas
Guest
Posts: n/a
 
      25th Nov 2003

so no one know how to put the new data at the end??

-----------------------------------------------
~~ Message posted from http://www.ExcelTip.com
~~View and post usenet messages directly from http://www.ExcelForum.com

 
Reply With Quote
 
 
 
Reply

Thread Tools
Rate This Thread
Rate This Thread:

Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

BB code is On
Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are Off


Similar Threads
Thread Thread Starter Forum Replies Last Post
Automatically extend a list when adding a new data to another list JB Microsoft Excel Misc 0 25th Mar 2010 02:50 PM
adding data to a list Sandy Microsoft Excel Programming 2 6th Aug 2007 06:43 PM
Adding data to a dro-down list Martin Racette Microsoft Access Form Coding 3 14th May 2004 03:49 AM
Adding data to a dro-down list Martin Racette Microsoft Access Forms 3 14th May 2004 03:49 AM
Adding data to a list Mike Microsoft Excel New Users 2 22nd Jan 2004 03:31 PM


Features
 

Advertising
 

Newsgroups
 


All times are GMT +1. The time now is 01:50 AM.