results on sheet 2

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

I have golf program I am working on. Here is the setup

column a b c d e
f g h
player 1 score score total player 1 score
score total
player 2 " " " player 2
" " "
Player 3
Player 4
Player 5 " " " player 5
" " "

That is an example of the first page, it hase 3 other teams under the ones
above.
I want to enter a score and without using a macro if possible the score and
total automatically go to sheet 2 in order from lowest score to highest. i
want this to happen everytime I enter a score. Is this possible.

thank you
 
Hi,

Provided you have the same column headings in sheet1 and sheet2,
following should do the job...adjust to your needs : is Range("C1") the
total score and the sorting key ?

Private Sub Worksheet_Change(ByVal Target As Range)
Range("A2").Select
Range(Selection, Selection.End(xlToRight)).Select
Range(Selection, Selection.End(xlDown)).Select
Selection.Copy
Sheets("Sheet2").Select
Application.Goto Range("A2")
ActiveSheet.Paste
Selection.Sort Key1:=Range("C1"), Order1:=xlAscending,
Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom
End Sub

HTH
Cheers
Carim
 
Carim

I just sent you an email with the program attached, my first post didn't
showup correct. If you could help, thank you
Tommy
 
Hi Tommy,

Up until have not received your email ...
let me give you my email (e-mail address removed)
(remove nospam)

Carim
 
Hi Tommy,

Just mailed you back your worksheet...
Congratulations on all you had already done ...

Cheers
Cari
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Back
Top