REALLY NEED HELP

[DiskDoctor]

Hi guys, i'm hoping someone could lend me a hand. I'm setting up an excel
file to input our fees received from our customers sent to collections. I
have a main page with all the customers names, and each name is a hyper link
to that customers separate worksheet - where a running tab is kept. I have
a button called "update" and i've assigned the following macro (also called
UPDATE) move the info over to the respective customers worksheet. I'm
trying to get a loop going. A# is the customers name (first name will be
starting at A4. B# to F# (first transaction/gst/dr/cr is on B4 to F4) is
the transaction, gst amt, dr amt, and cr amt. I want to push the update
button and get them all updated after putting in all the entries. can
someone please make this a loop for me. i've put comments to explain what is
going on.... please help!


Sub UPDATE()
'
' UPDATE Macro
' Macro recorded 5/18/2005 by user
'

'On the sheet called "COLLECTIONS INDEX" B# TO F# is
date/transaction/gst/dr/cr
Range("B4:F4").Select
Selection.Cut

'On the sheet called "COLLECTIONS INDEX" A# is the customer's
name/hyperlink to his page
Range("A4").Select
Selection.Hyperlinks(1).Follow NewWindow:=False, AddHistory:=True

'Need to goto the next empty row in the B column and paste (B# to F#)
Range("B9").Select
Selection.End(xlDown).Select
Selection.Offset(1, 0).Select
ActiveSheet.Paste



'A1 is a hyperlink to the main COLLECTIONS INDEX page
Range("A1").Select
Selection.Hyperlinks(1).Follow NewWindow:=False, AddHistory:=True

End Sub

 

[Bart Snel]

Maybe I'm missing something but wouldn't it be easier to create a
database-query in the individual customers sheets that get the data from the
main sheet? Your macro will only have to update the sheets...

Bart Snel