Ограничение String (скрапинг c VBA + Selenium ChromeDriver)

Старая форма входа

Страница 1 из 1 1
Модератор форума: китин, _Boroda_

Ограничение String (скрапинг c VBA + Selenium ChromeDriver) (Макросы/Sub)

industriya4rus

Дата: Суббота, 09.10.2021, 00:21 | Сообщение № 1

Группа: Пользователи

Ранг: Прохожий

Сообщений: 2

Репутация: 0 ±

Замечаний: 0% ±

Приветствую! Делаю код для скрапинга информации с сайта СБИС о контрагентах по ИНН

Сам код выглядит так и в принципе работает:

[vba]

Код

Public Sub ScrapeSBIS_2()
Dim SBIS As New WebDriver, Link As String, xrow As Integer, Text0, Text1, Text2 As String * 2048

SBIS.Start "chrome"

Sheets("ИНН_").Select
xrow = 2
Do While Cells(xrow, 1).Value <> ""

Link = "https://sbis.ru/contragents/" & Cells(xrow, 1).Text
SBIS.Get Link

Cells(xrow, 2).Value = SBIS.FindElementByClass("cCard__MainReq-Name").Text
Cells(xrow, 3).Value = SBIS.FindElementByClass("cCard__Contacts-Address").Text

SBIS.FindElementByName("TabContent0").Click
Text0 = SBIS.FindElementByClass("cCard__EconomyResult-Mobile-Chart").Text
Cells(xrow, 4).Value = Text0
SBIS.FindElementByName("tab1").Click
Text1 = SBIS.FindElementByClass("cCard__EconomyResult-Mobile-Chart").Text
Cells(xrow, 5).Value = Text1
SBIS.FindElementByName("tab2").Click
Text2 = SBIS.FindElementByClass("cCard__EconomyResult-Mobile-Chart").Text
Cells(xrow, 6).Value = Text2

xrow = xrow + 1

Loop

SBIS.Quit

End Sub

[/vba]

Не понятно по какой причине VBA берет только часть данных от драйвера Selenium ChromeDriver. С чем это может быть связано?
Ограничение размера String или его содержимого? Попробовал явно указать размер String ничего не меняется.