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
