2016-12-03 13 views
0

У меня есть этот простой бит кода, который я не могу решить, почему он терпит неудачу.Устанавливает книгу в VBA

Рабочая тетрадь TestData.xlsm открыта.

Код не работает на линии Set WBook. Это меня заводит. Мне нужно перейти к тому, почему я пишу код. Я пробовал другой код из Интернета, и все не удается.

Ошибка: требуется

Runtime Ошибка 424 объекта.

Public Sub specialLookUp() 
    Dim WBook As Workbook 
    Set WBook = Workbooks(“TestData.xlsm”) 
End Sub 
+2

Я удалил свой ответ, потому что это было неправильно :(Может быть, ваша единственная проблема является использование ' «' Вместо '' '? –

+0

По крайней мере, у меня есть другая ошибка, но попытка« не исправить ». Для записи @Robin Mackenzie изначально была права, я сбросил .xlsm и теперь получаю индекс из ошибка, считая, что рабочая книга открыта. –

+0

@EmptyWaterHoles вы уверены, что расширение файла '.xlsm' ?, а не' .xlsx'? возможно, у вас есть место в tween "Test Data" или "Test_Data"? –

ответ

1

Кавычки немного странно - вы можете просто попробовать это:

Public Sub specialLookUp() 
    Dim WBook As Workbook 
    Set WBook = Workbooks("TestData.xlsm") 
End Sub 
+0

Да, это работает. благодаря –

-1

Это неправильный путь. Вам не хватает Open. использования, как это -

Set WBook = Workbooks.Open("TestData.xlsm") 
+2

OP заявил, что 'Книга TestData.xlsm открыта .' –

+0

Тогда' Workbooks' должен работать –

+0

Это не и я не знаю почему. –

Смежные вопросы