Ваше "не работает" не работает.Вы должны будете точно описать, что вы ожидаете и что происходит вместо этого.В противном случае -
Dim a(11,6)
For i = 0 To 6
a(6,i) = i
a(7,i) = "test"
Next
WScript.Echo a(6,0),a(7,0)
WScript.Echo a(6,6),a(7,6)
0 test
6 test
Есть ли злой "При ошибке возобновить следующее" активным?
ЗАПРОСИТЬ ИДЕНТИФИКАТОР:
Вы можете немедленно вставить "При ошибке Перейти 0"перед критическим / новым кодом и продолжайте движение, закрыв глаза, сразу после него с сообщением «On Error Resume Next».
Или: скопируйте новый код в чистые / пустые .vbs для использования cscript.exe
Или: полностью опубликовать соответствующую часть кода.