Jump to content
pneu21

excel Fórmula excel

Recommended Posts

pneu21

Boa tarde,

procuro ajuda na construção de uma tabela para um campeonato de golfe, mais especificamente na contrição de um critério de desempate.

a minha tabela terá o seguinte formato:

Nome|Turma|Prova1|Prova2|Prova3|Total

Ana | A | 12 | 6 | 5 | 23

João | A | 12 | 5 | 6 | 23

Tiago | A | 10 | 6 | 4 | 20

depois a classificação seria:

1-João-23

2-Ana-23

3-Tiago-20

e o meu critério de desempate será que no caso de totais iguais fica melhor classificado o que fizer mais pontos na ultima prova, e não sei como construir essa formula, pois vou ter mais de 40 jogadores por turma e com uma formula seria tudo mais fácil... para transportar para o ranking vou utilizar a =procv.

Será que me poderiam ajudar?

Com os melhores cumprimentos,

Luís Rodrigo

Share this post


Link to post
Share on other sites
Stradivarius

NOME TURMA PV1 PV2 PV3 TOTAL

Ana A 12 6 7 25

João A 10 5 8 23

Tiago A 11 4 7 22

Pedro A 12 5 8 25

Miguel A 10 6 7 23

Range("A1:F6").Select
ActiveWorkbook.Worksheets("Folha1").Sort.SortFields.Clear
ActiveWorkbook.Worksheets("Folha1").Sort.SortFields.Add Key:=Range("F2:F6"), _
 SortOn:=xlSortOnValues, Order:=xlDescending, DataOption:=xlSortNormal
ActiveWorkbook.Worksheets("Folha1").Sort.SortFields.Add Key:=Range("E2:E6"), _
 SortOn:=xlSortOnValues, Order:=xlDescending, DataOption:=xlSortNormal
With ActiveWorkbook.Worksheets("Folha1").Sort
 .SetRange Range("A1:F6")
 .Header = xlYes
 .MatchCase = False
 .Orientation = xlTopToBottom
 .SortMethod = xlPinYin
 .Apply
End With

NOME TURMA PV1 PV2 PV3 TOTAL

Pedro A 12 5 8 25

Ana A 12 6 7 25

João A 10 5 8 23

Miguel A 10 6 7 23

Tiago A 11 4 7 22

Edited by Stradivarius

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now

×
×
  • Create New...

Important Information

By using this site you accept our Terms of Use and Privacy Policy. We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.