У меня есть веб-форма, которую я хочу автоматизировать для ввода данных

Question

Я пишу несколько кодов для автоматизации заполнения веб-форм из Excel. Они работают нормально, но когда я применяю логику, они останавливаются.

Option Explicit

Public Sub sel_udise()
    Dim bot As New WebDriver
    bot.Start "chrome", ""
    bot.Get "https://student.udise.in/"
    bot.Wait (500)
    bot.FindElementById("txtUserName").SendKeys "XXXXXXXX"
    bot.FindElementById("txtPassword").SendKeys "XXXXXXXX"
    bot.FindElementById("btnSubmit").Click
    bot.Get "https://student.udise.in/Userscreens/Profilenew4.aspx"
    Dim y As Integer
    Dim a, b, c, d, cSCRIPT
     For y = 8 To 10
    ' For Nyaya panchayat
     a = ThisWorkbook.Sheets("sheet3").Range("Av" & y).Text
     b = ThisWorkbook.Sheets("sheet3").Range("Av" & y - 1).Text
     'If a <> b Then
    bot.FindElementById("ctl00_ContentPlaceHolder1_ddlCluster").SendKeys [a]
    'End If
    bot.Wait (3000)
    ' For school
    c = ThisWorkbook.Sheets("sheet3").Range("AU" & y).Value
    d = ThisWorkbook.Sheets("sheet3").Range("AU" & y - 1).Value
    'If c <> d Then
    bot.FindElementById("ctl00_ContentPlaceHolder1_ddlschool").SendKeys [c]
    'End If
    bot.Wait (3000)
    next y
end sub