Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Как обработать событие Worksheet_TableUpdate - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_  
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Как обработать событие Worksheet_TableUpdate (Макросы/Sub)
Как обработать событие Worksheet_TableUpdate
Stormy Дата: Среда, 25.08.2021, 10:34 | Сообщение № 1
Группа: Проверенные
Ранг: Обитатель
Сообщений: 357
Репутация: 12 ±
Замечаний: 0% ±

Excel 2010
Добрый день, уважаемые.
Помогите с примером как обработать событие
[vba]
Код
Private Sub Worksheet_TableUpdate(ByVal Target As TableObject)
'Что и как тут нужно указать, чтобы дальше сработали макросы ниже?
        Call UserAd
        Call Emsal
    End If
End Sub
[/vba]


Место для рекламы.
 
Ответить
СообщениеДобрый день, уважаемые.
Помогите с примером как обработать событие
[vba]
Код
Private Sub Worksheet_TableUpdate(ByVal Target As TableObject)
'Что и как тут нужно указать, чтобы дальше сработали макросы ниже?
        Call UserAd
        Call Emsal
    End If
End Sub
[/vba]

Автор - Stormy
Дата добавления - 25.08.2021 в 10:34
bmv98rus Дата: Среда, 25.08.2021, 11:20 | Сообщение № 2
Группа: Друзья
Ранг: Участник клуба
Сообщений: 4098
Репутация: 766 ±
Замечаний: 0% ±

Excel 2013/2016


Замечательный Временно просто медведь , процентов на 20.
 
Ответить
Сообщениеhttps://social.technet.microsoft.com/Forums....xceldev

Автор - bmv98rus
Дата добавления - 25.08.2021 в 11:20
Stormy Дата: Среда, 25.08.2021, 11:26 | Сообщение № 3
Группа: Проверенные
Ранг: Обитатель
Сообщений: 357
Репутация: 12 ±
Замечаний: 0% ±

Excel 2010
Видел эту статью, но все равно ничего не понял.
Событие нужно вызывать с листа на котором размещена обновляемая таблица, разместил, но эффекта 0.
Обошел этот момент открытием Активацией книги, пока вроде все работает и устраивает.
Но хотелось бы еще понимать как работает именно описываемое выше событие так как его могу использовать в разных случаях


Место для рекламы.
 
Ответить
СообщениеВидел эту статью, но все равно ничего не понял.
Событие нужно вызывать с листа на котором размещена обновляемая таблица, разместил, но эффекта 0.
Обошел этот момент открытием Активацией книги, пока вроде все работает и устраивает.
Но хотелось бы еще понимать как работает именно описываемое выше событие так как его могу использовать в разных случаях

Автор - Stormy
Дата добавления - 25.08.2021 в 11:26
bmv98rus Дата: Среда, 25.08.2021, 11:38 | Сообщение № 4
Группа: Друзья
Ранг: Участник клуба
Сообщений: 4098
Репутация: 766 ±
Замечаний: 0% ±

Excel 2013/2016
обновляется то у Вас что?


Замечательный Временно просто медведь , процентов на 20.
 
Ответить
Сообщениеобновляется то у Вас что?

Автор - bmv98rus
Дата добавления - 25.08.2021 в 11:38
Stormy Дата: Среда, 25.08.2021, 12:37 | Сообщение № 5
Группа: Проверенные
Ранг: Обитатель
Сообщений: 357
Репутация: 12 ±
Замечаний: 0% ±

Excel 2010
обновляется то у Вас что?

Таблица на листе, которая через Query берет данные с другого файла Excel


Место для рекламы.

Сообщение отредактировал Stormy - Среда, 25.08.2021, 12:38
 
Ответить
Сообщение
обновляется то у Вас что?

Таблица на листе, которая через Query берет данные с другого файла Excel

Автор - Stormy
Дата добавления - 25.08.2021 в 12:37
bmv98rus Дата: Среда, 25.08.2021, 14:29 | Сообщение № 6
Группа: Друзья
Ранг: Участник клуба
Сообщений: 4098
Репутация: 766 ±
Замечаний: 0% ±

Excel 2013/2016
Это не то событие
Примерно так

[vba]
Код

' by ZVI  https://www.planetaexcel.ru/forum/index.php?PAGE_NAME=profile_view&UID=127
Dim WithEvents q As QueryTable

Private Sub q_AfterRefresh(ByVal Success As Boolean)
Debug.Print "AfterRefresh", Now
End Sub

Private Sub q_BeforeRefresh(Cancel As Boolean)
Debug.Print "BeforeRefresh", Now
End Sub

Private Sub Workbook_Open()
Application.OnTime Now, Me.Name & ".Start"
End Sub

Sub Start()
Set q = Sheet2.QueryTables(1)
End Sub
[/vba]


Замечательный Временно просто медведь , процентов на 20.

Сообщение отредактировал bmv98rus - Среда, 25.08.2021, 14:30
 
Ответить
СообщениеЭто не то событие
Примерно так

[vba]
Код

' by ZVI  https://www.planetaexcel.ru/forum/index.php?PAGE_NAME=profile_view&UID=127
Dim WithEvents q As QueryTable

Private Sub q_AfterRefresh(ByVal Success As Boolean)
Debug.Print "AfterRefresh", Now
End Sub

Private Sub q_BeforeRefresh(Cancel As Boolean)
Debug.Print "BeforeRefresh", Now
End Sub

Private Sub Workbook_Open()
Application.OnTime Now, Me.Name & ".Start"
End Sub

Sub Start()
Set q = Sheet2.QueryTables(1)
End Sub
[/vba]

Автор - bmv98rus
Дата добавления - 25.08.2021 в 14:29
boa Дата: Среда, 25.08.2021, 15:16 | Сообщение № 7
Группа: Друзья
Ранг: Ветеран
Сообщений: 549
Репутация: 167 ±
Замечаний: 0% ±

365
Здравствуйте,
Когда создаете таблицу на основе подключения, поставьте галочку добавить данные в модель данных
К сообщению приложен файл: 5077891.xlsb (147.4 Kb)


 
Ответить
СообщениеЗдравствуйте,
Когда создаете таблицу на основе подключения, поставьте галочку добавить данные в модель данных

Автор - boa
Дата добавления - 25.08.2021 в 15:16
Stormy Дата: Четверг, 26.08.2021, 12:33 | Сообщение № 8
Группа: Проверенные
Ранг: Обитатель
Сообщений: 357
Репутация: 12 ±
Замечаний: 0% ±

Excel 2010
boa,
Буду пробовать таким образом в след. редакциях


Место для рекламы.
 
Ответить
Сообщениеboa,
Буду пробовать таким образом в след. редакциях

Автор - Stormy
Дата добавления - 26.08.2021 в 12:33
Stormy Дата: Четверг, 26.08.2021, 12:35 | Сообщение № 9
Группа: Проверенные
Ранг: Обитатель
Сообщений: 357
Репутация: 12 ±
Замечаний: 0% ±

Excel 2010
Примерно так

Мне нужно было повесить выполнение макроса на какое-то событие.
Первое, что пришло на ум это использовать обновление таблицы, она обновляется при открытии файла.
После того как столкнулся с проблемой решил использовать событие книги Activation
Вроде все работает как хотелось бы.
Спасибо за потраченное время ))


Место для рекламы.
 
Ответить
Сообщение
Примерно так

Мне нужно было повесить выполнение макроса на какое-то событие.
Первое, что пришло на ум это использовать обновление таблицы, она обновляется при открытии файла.
После того как столкнулся с проблемой решил использовать событие книги Activation
Вроде все работает как хотелось бы.
Спасибо за потраченное время ))

Автор - Stormy
Дата добавления - 26.08.2021 в 12:35
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Как обработать событие Worksheet_TableUpdate (Макросы/Sub)
  • Страница 1 из 1
  • 1
Поиск:

Яндекс.Метрика Яндекс цитирования
© 2010-2024 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!