Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Курилка
Страницы: 1
RSS
Сохранение файла из почты по условию
 
#1
06.12.2023 13:50:17
Коллеги, добрый день!
У меня есть макрос, который сохраняет присланные файлы в Outlook. Может ли макрос заходит в файл и удалять конкретный лист, если он там есть?

Всем заранее большое спасибо!
 
 
 
#2
06.12.2023 14:35:57
Код
    Application.DisplayAlerts = False
    On Error Resume Next
    With Workbooks.Open("С:\Лист Microsoft Excel.xlsx")
        .Sheets("фу-фу плохой лист").Delete
        .Close True
    End With
    On Error GoTo 0
    Application.DisplayAlerts = True
 
 
 
#3
06.12.2023 16:31:12
Сейчас попробую, большое спасибо!
 
 
 
#4
07.12.2023 11:24:29
Цитата
написал:
 Application.DisplayAlerts = False
На эту строчку ругается
Run-time error "438":
  Object doesn't support the property or method
Изменено: Максим Майер - 07.12.2023 11:25:33
 
 
 
#5
08.12.2023 12:29:10
Код
    Dim app As Object
    Set app = CreateObject("Excel.Application")
    app.Visible = True
    
    app.DisplayAlerts = False
    On Error Resume Next
    With app.Workbooks.Open("C:\Лист Microsoft Excel.xlsx")
        .Sheets("фу-фу плохой лист").Delete
        .Close True
    End With
    On Error GoTo 0
    app.DisplayAlerts = True
    app.Quit
    Set app = Nothing
 
 
 
#6
14.12.2023 17:46:02
Большое спасибо!
 
 
 
Страницы: 1
Наверх