Я хочу создать макрос, который будет обращаться к сайту и копировать таблицу. Уловка в том, что я хочу, чтобы пользователь мог выбрать, какой из них через окно приглашения.
Код извлечения информации идет:
Source = Web.Page(Web.Contents(""xxx.xxx.xxx.xxx/aaaaa/bbbb/user_list.php?
month=202001&user_id=999&group_id=1""))
, который отлично работает.
Часть, которую я хочу, чтобы пользователь обновил, это часть месяца.
Dim Response As String
Response = InputBox("input date*YYYYMM*")
И попытался добавить ответ после месяца =
Source = Web.Page(Web.Contents(""xxx.xxx.xxx.xxx/aaaaa/bbbb/user.php?
month=""Response""&user_id=999&group_id=1""))
Ошибка времени выполнения '6 ': Переполнение
Я понимаю, что макрос не понимает мой запрос, но надеялся, что кто-нибудь сможет сказать мне, что я пропустил.