VBA code for autosorting ranked row

[smartcookie3]

Good morning! I am working on a project for the president of our company and am not familiar with VBA code, as I have not had cause to use it until now.

I have an excel spreadsheet with 8 participant names, participating in 7 events. Each participant's total of the 7 events is calculated and than ranked. However, he would like the spreadsheet to autosort the rank as scores from each round are entered. I have tried various VBA code lines, but have not had any success. Your input is greatly appreciated!

My data appears as follows:

Rank		Player	Round 1	Round 2	Round 3	Round 4	Round 5	Round 6	Round 7	Total
1		John Doe	1	6	12	9	5	9	12	54
6		Bob Smith	2	8	3	6	4	6	3	32
3		Tom Jones	8	2	5	4	7	5	16	47
4		Gary Webster	1	1	8	7	8	1	8	34
2		Bill Brown	10	6	9	8	1	8	7	49
7		James White	5	5	5	3	3	7	2	30
5		Mark Black	2	4	6	5	8	5	3	33
8		Scott Green	3	8	4	1	1	1	8	26

<colgroup><col width="89" style="width: 67pt; mso-width-source: userset; mso-width-alt: 3254;"> <col width="26" style="width: 20pt; mso-width-source: userset; mso-width-alt: 950;"> <col width="103" style="width: 77pt; mso-width-source: userset; mso-width-alt: 3766;"> <col width="89" style="width: 67pt; mso-width-source: userset; mso-width-alt: 3254;" span="8"> <tbody> </tbody>