Sua equação não funciona na coluna D pq o valor procurado no procv "A6" nao faz parte da tabela onde deve procurar logo nao encontra correspondencia.

Uma pergunta pq o valor final é menor que o incial?

Como isso é calculado?

Olá MPrudencio,

Coluna D e coluna F seriam para eliminar as formulas e assumir o automatismo da macro quando acionado o botão "CLASSIFICAÇÃO".

O botão "START" será seguramente para ser aplicado noutro ficheiro excel e as células da coluna F vão buscar informação a esse ficheiro ( ex: =[PARTIDA.xlsm]Folha1!F6 )

Vão ser precisos 2 ficheiros ( ambos em uma nuvem para irem sincronizando dados ), 1 vai ficar na partida e o outro ( ficheiro que anexei "cronometragem" ) fica na chegada ( +/- 6 km de distância ) e só absorve os tempos iniciais do ficheiro "partida". todos os restantes cálculos são processados nesta folha "cronometragem".

o tempo final será sempre maior que o inicial, somente não sei programar a macro para o "split" que somente assume valor na coluna G se a F estiver preenchida. Mas esse é um mal menor que nem precisarei de mexer, porque no fim vai funcionar bem.

Meu maior problema: cálcular o tempo de prova ( tempo final - tempo inicial ), talvez por causa do valor que cada célula asume, apesar de no formato hora aparecerem os valores que se pretende.

Eu ainda nao entendi bem o que vc quer, mas de qualquer maneira esse codigo registar a hora

Sub Tempo()

Dim TempoInicial As Variant
Dim TempoFinal As Variant

TempoInicial = VBA.Time

Range("A1").Value2 = TempoInicial

'Seu Codigo

TempoFinal = VBA.Time


Range("B1").Value2 = TempoFinal

Range("C1").Value2 = TempoFinal - TempoInicial

End Sub

MPrudencio,

Agradeço a sua ajuda. Apesar de não ter conseguido aplicar o seu código para fazer funcionar a função pretendida, já resulta no geral.

Como estou em luta contra o tempo, vou deixar assim e após este evento, irei aperfeiçoar o funcionamento das macros.

MUITO OBRIGADO.

Boa tarde,

Deixo ficar o resultado neste anexo, que muito tem ainda para aperfeiçoar e melhorar, mas de momento não possuo tempo para mais.

Funcionamento:

Botão START - para dar a partida dos vários atletas da manga
Botão SPLIT - para determinar os tempos na chegada à passagem de cada atleta
Inserir os números do atleta por ordem de passagem na meta
Botão CLASSIFICAÇÃO - ordena toda a tabela e a classificação do 1º ao último lugar
No fim da folha, botão PRINT - Imprime somente aquela página ( no total vai ter 7 folhas )

( aceitam-se sugestões para melhorias )

Obrigado pelo apoio e irei voltar com outras questões.