Tomás Vásquez Fórum

Estou com uma duvida. Preciso extrair informações de um site, porem preciso usar um IF e Else. Onde esta dando meu erro:

Private selenium As New SeleniumWrapper.WebDriver

Public Sub Inicio()
Dim DocTit As String 'documento
Dim Happy As String 'nascimento
Dim uC As String
Dim x As Integer

x = 5
While Sheets(1).Cells(x, "c") <> ""
x = x + 1
Wend

While Sheets(1).Cells(x, "B") <> ""

DocTit = Trim(Sheets(1).Cells(x, "a")) 'cpf
Happy = Trim(Sheets(1).Cells(x, "B")) 'data de nascimento

selenium.Start "chrome", "https://agenciaweb.celesc.com.br" 'abre site
selenium.setImplicitWait 5000


'selenium.setImplicitWait 5000
selenium.Open "/AgenciaWeb/autenticar/loginUC.do" 'acessa segunda via
selenium.setImplicitWait 1000
selenium.Type "id=numDoc", DocTit
selenium.setImplicitWait 2500
selenium.Type "id=dtaNascimentoDoc", Happy
selenium.Click "class=botao"

If .css = .textoErroMensagemNegrito Then (o erro esta aqui e não consigo descobrir como fazer)
Stop
End If