VBA в Excel 2007/2010 GUI Скрытое обновление запросов листа - PullRequest
0 голосов
/ 24 ноября 2010

Привет Первый пост и надеюсь, что кто-то может помочь, поскольку это вызывает выпадение волос.

Я проектирую GUI с использованием Excel и доступа.2003 У меня никогда не было проблем, но после обновления до 2007/2010 у меня возникла проблема с очень простой вещью.

В 2003 году я мог обновить запрос на очень скрытом листе, используя

Sheet2.Range("a1").QueryTable.Refresh BackgroundQuery:=False

, в 2007/2010 году я не мог этого сделать.Это работает, если я вырезал и вставил запрос из листов 2003 в 2007/2010 гг. Отлично, но не если это запрос, который я построил в 2007/2010 гг.

Регистратор выплевывает

Range("Table_Query_from_MS_Access_Database_1[[#Headers],[Trans_ID]]").Select
Selection.ListObject.QueryTable.Refresh BackgroundQuery:=False

Какую страницу нужно выбрать в первую очередь для запуска

, так что логически я попытался

Sheet2.Range("a1").Select
Selection.ListObject.QueryTable.Refresh BackgroundQuery:=False

, который сначала выбирает позицию запроса, не будет работать, если он не работает в Sheet2.Range ("a1"). Выберите часть

Затем я логически попробовал

Sheet2.Range("a1").Selection.ListObject.QueryTable.Refresh BackgroundQuery:=False

, снова это не работает

Sheet2.Range("Table_Query_from_MS_Access_Database_1[[#Headers],Trans_ID]]") _
      .Selection.ListObject.QueryTable.Refresh BackgroundQuery:=False

Это также не работает

Всея хочу сделать это обновить запрос на очень скрытом листе

Используя screen.update = false, а затем показать макрос скрыть обновление экрана = true не очень идеально, так как я хочу, чтобы конечный пользователь не получил этот запрос какэто часть системы входа в систему в Excel, я просто не могу найти способ обновить запрос на скрытом листе, что было простой задачей в 2003 году.

Пожалуйста, помогите мне выпадение волос

Спасибо

Ричард

1 Ответ

2 голосов
/ 24 ноября 2010

Выбор не работает на очень скрытом листе.Попробуйте это без выбора -Sheet2.Range ("a1"). ListObject.QueryTable.Refresh BackgroundQuery: = False

Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...