Автоматический запуск макроса при открытии любой книги, которая соответствует конкретным условиям - VBA

Узнай цену своей работы

Формулировка задачи:

Добрый день! Нужна ваша помощь Ситуация следующая. Мне на почту каждый день приходит екселевский файл, который необходимо обработать. Название файла имеет формат "treasury outstandings" + дата (например "treasury outstandings 23 Nov" или "treasury outstandings 24 Nov" Возможно ли сделать так, чтобы макрос автоматически запускался при открытии любой книги, название которой содержит "treasury outstandings"?

Решение задачи: «Автоматический запуск макроса при открытии любой книги, которая соответствует конкретным условиям»

textual
Листинг программы
Option Explicit
 
Dim WithEvents xlApp As Excel.Application
 
Private Sub xlApp_WorkbookOpen(ByVal Wb As Workbook)
    If Wb.Name Like "treasury outstandings*.xls*" Then
        Call MyMacro(Wb)
    End If
End Sub
 
Private Sub MyMacro(wbk As Workbook)
    MsgBox wbk.Name
End Sub

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

9   голосов , оценка 3.889 из 5
Похожие ответы