Opa, bem dependendo do pq espera o elemento, por ex: quando é pra da um click, eu faço um loop com o on error goto, ou ate msm pra pegar o conteudo da teg como texto ou outherHTML.

Ex:

Sub Pegar_Link_FlashScore()

Dim driver As New ChromeDriver

Dim Contador_de_erros As Integer

'_________________________________________________________________Abrir O 

Chromedriver

Contador_de_erros = 0

R_tratar_1:

'-------------------------------------------------------------------------------------

On Error GoTo tratar_1

    Contador_de_erros = Contador_de_erros + 1

        If Contador_de_erros > 10 Then

            Application.Speech.Speak ("Erro na parte de Ligar o driver, talvez você tenha que atualizar o crome driver")

                Exit Sub

                    End If


'<><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><>

    driver.Start

'<><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><>

'-------------------------------------------------------------------------------------

GoTo pular_1

tratar_1:: Resume R_tratar_1

pular_1:: On Error GoTo 0

'_____________________________________________________________________________________



'__________________________________________________________________________Digitar Url

Contador_de_erros = 0

R_tratar_2:

'-------------------------------------------------------------------------------------

On Error GoTo tratar_2

    Contador_de_erros = Contador_de_erros + 1

        If Contador_de_erros > 10 Then

            Application.Speech.Speak ("Erro na parte de digitar o url da paginá")

                Exit Sub

                    End If

'<><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><>

    driver.Get "https://www.flashscore.com.br/"

'<><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><>

'-------------------------------------------------------------------------------------

GoTo pular_2

tratar_2:: Resume R_tratar_2

pular_2:: On Error GoTo 0

'_____________________________________________________________________________________



'__________________________________________________________________________Aceita Cooks

Contador_de_erros = 0

R_tratar_3:

'-------------------------------------------------------------------------------------

On Error GoTo tratar_3

    Contador_de_erros = Contador_de_erros + 1

        If Contador_de_erros > 10 Then

            Application.Speech.Speak ("Erro na parte de aceitar e fechar os Cooks")

                Exit Sub

                    End If

'<><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><>

    driver.FindElementById("onetrust-accept-btn-handler").Click

'<><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><>

'-------------------------------------------------------------------------------------

GoTo pular_3

tratar_3:: Resume R_tratar_3

pular_3:: On Error GoTo 0

'_____________________________________________________________________________________


end sub

sub AEstruturaéSimples
' vc cria uma variavel e acumula os erros gerados toda vez que vc clicka no elemento e der error 


dim tratamentoDeErro as double ' por ex


tratamentoDeErro =0

' ai vc entra no loop com os erros, ao clicar e o elemento nao existir, 


Contador_de_erros = 0

R_tratar_3:

On Error GoTo tratar_3

    Contador_de_erros = Contador_de_erros + 1


        If Contador_de_erros > 10 Then ' aqui vc pode bota ´pra espera quantos erros vc quiser

            Application.Speech.Speak ("Erro na parte de aceitar e fechar os Cooks")

                Exit Sub

                    End If

' ex; de um id de botão pra click

    driver.FindElementById("onetrust-accept-btn-handler").Click

' se a estrutura der certo vc passa direto "pula"

GoTo pular_3

' se der error vc vem pro tratamento do erro, e aqui vc pode fazer oque quiser tbm, 
'desde volta e tentar clickar d novo ou oque tiver em mente

tratar_3:

'porem dando error depois que vc fizer oque quiser vc deve resumir o tratamento pra poder finalizar a respota

 Resume R_tratar_3


pular_3:

'e depois de tudo vc deve zerar o o tratamento de error, lembrado se vc não de o Resume , vc não conseguirar usar outra vez o tratamento de erro dentro da msm sub!

 On Error GoTo 0

' ue uso essa estrutura com muita eficiencia, ela me faz ir mais rapido sem p´recisar usar application.wait

end sub