Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Вопросы по Microsoft Excel
Страницы: 1
RSS
Удаление запросов Power Query
 
#1
09.06.2024 09:42:36
Всем привет! Подскажите, пожалуйста, как и можно ли вообще в макросе VBA прописать удаление запросов Power Query?
 
 
 
#2
09.06.2024 12:04:59
Макрос от New
Код
Код
Sub DeletePowerQueryCustomXml()
    Dim parts As CustomXMLParts
    Dim part As CustomXMLPart
    Set parts = ActiveWorkbook.CustomXMLParts.SelectByNamespace("http://schemas.microsoft.com/DataMashup")
    For Each part In parts
        part.Delete
    Next part
End Sub
НА МЯСО В ПРОФИЛЕ
 
 
 
#3
09.06.2024 12:24:31
Спасибо за ответ. Попробовал использовать данный макрос, но запрос не удалился. Может мне надо было что-то еще дописать в коде конкретно для той книги, в которой пытаюсь удалить запрос (она у меня активна, так что вроде бы должно и так работать)?
 
 
 
#4
09.06.2024 12:40:47
vdi, не знаю почему не сработало
НА МЯСО В ПРОФИЛЕ
 
 
 
#5
09.06.2024 12:49:56
Если у Вас достаточно новая версия Excel, то вполне хватит и такого подхода:
Код
ThisWorkbook.Queries("Запрос1").Delete

Если надо удалить все запросы:
Код
Dim xq
For Each xq In ThisWorkbook.Queries
    xq.Delete
Next
Даже самый простой вопрос можно превратить в огромную проблему. Достаточно не уметь формулировать вопросы...
 
 
 
#6
09.06.2024 12:58:16
Спасибо большое!

Dim xq
For Each xq In ThisWorkbook.Queries
       xq.Delete
Next xq

Этот код сработал.
 
 
 
Страницы: 1
Наверх