Reply
 
LinkBack Thread Tools Search this Thread Display Modes
  #1   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 1
Default EXCEL: Need help

I'm trying to creat a daily sales tracking sheet. Users will be able to
track their sales and then excel would register it on a different sheet. Can
anyone help?
  #2   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 23
Default EXCEL: Need help

Could you please give more information?

For example,
1) How's the layout of data like on the sheet which you "track the sales"?
2) What information do you want to "register on another sheet"?



On 1/15/05 11:27 PM, in article
, "VZWJRM"
wrote:

I'm trying to creat a daily sales tracking sheet. Users will be able to
track their sales and then excel would register it on a different sheet. Can
anyone help?


  #3   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 252
Default EXCEL: Need help

You might start out with Sheets named Salesperson1, Salesperson2.... one
for each Salesperson. You will likely want to create the first one and save
it as a Template (in the Save AS dialog, below the file name, there is a box
for file TYPE. Select "template")
Then when you open a new one it will all be laid out for you identical to
the first one.
In your Template use a layout similar to this:
Col A = Date
Col B = Salesperson's Name
Col C = Sales Amt
optional columns

Then create a Master or Summary worksheet that will gather the data for all
salespeople:
Same columns

Then Right-click on the Excel Icon which is at the far left on the top Menu
Bar (to the left of "File". Click on View Code and insert:

Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)

Dim Mast As Worksheet
Dim Dest As Range


If Not Sh.Name = "Master" Then 'adj Name as needed
If Target.Count 1 Then Exit Sub
If Not Intersect(Target, Range("C2:C65536")) Is Nothing Then 'adj
to your Sales Amt range
Set Mast = Sheets("Master")
With Mast
Set Dest = .Cells(.Rows.Count, 1).End(xlUp).Offset(1,
0)
Target.EntireRow.Copy Dest
End With
End If
End If
Set Mast = Nothing
Set Dest = Nothing
End Sub


"VZWJRM" wrote:

I'm trying to creat a daily sales tracking sheet. Users will be able to
track their sales and then excel would register it on a different sheet. Can
anyone help?

Reply
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

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



All times are GMT +1. The time now is 12:28 PM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
Copyright ©2004-2025 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"