Сообщение при сохранение файла

Страница 1 из 1 1
Модератор форума: китин, _Boroda_, DrMini

Сообщение при сохранение файла (Макросы/Sub)

Stormy

Дата: Пятница, 16.06.2017, 10:19 | Сообщение № 1

Группа: Проверенные

Ранг: Обитатель

Сообщений: 366

Репутация: 12 ±

Замечаний: 0% ±

Excel 2010

Добрый день, коллеги.
Всем прекрасного настроения и поменьше мозготрепства =))

Столкнулся с такой фишкой.
Есть 2 книги назовем их Книга1 и Книга2
В Книге2 стоят ссылки на Книгу1. (в ячейке В14 примитив ='[Лист в Shablon ProXam.dwg]Лист1'!$B$14
Для пробы пера состряпал такой макрос
Макрос запускается из Книги1
[vba]

Код

Sub xam_orta_acmaq()
Workbooks.Open Filename:="C:\Users\Xanlar\Desktop\ProXam\Test ProXam\Книга2.xlsx"
ActiveWorkbook.Save
ActiveWindow.Close
End Sub

[/vba]
При попытке сохранить Книгу2 и закрыть вылезает окошко

Покопался в гугле и настройках, но ничего путного не нашел.
Как убедить VBA сохранять документ с ссылками?

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

Сообщение отредактировал Stormy - Пятница, 16.06.2017, 10:20

Ответить

Roman777

Дата: Пятница, 16.06.2017, 10:41 | Сообщение № 2

Группа: Проверенные

Ранг: Ветеран

Сообщений: 980

Репутация: 127 ±

Замечаний: 0% ±

Excel 2007, Excel 2013

Stormy,
Попробуйте так:

[vba]

Код

Sub xam_orta_acmaq()
Application.DisplayAlerts = false
Workbooks.Open Filename:="C:\Users\Xanlar\Desktop\ProXam\Test ProXam\Книга2.xlsx"
ActiveWorkbook.Save
ActiveWindow.Close
Application.DisplayAlerts = true
End Sub

[/vba]

Много чего не знаю!!!!

Сообщение отредактировал Roman777 - Пятница, 16.06.2017, 10:45

Ответить

_Boroda_

Дата: Пятница, 16.06.2017, 10:43 | Сообщение № 3

Группа: Админы

Ранг: Местный житель

Сообщений: 17006

Репутация: 6667 ±

Замечаний: ±

2003; 2007; 2010; 2013 RUS

А если сначала макроса написать
[vba]

Код

Application.DisplayAlerts = False

[/vba]?
Только потом не забудьте взад вернуть
[vba]

Код

Application.DisplayAlerts = True

[/vba]
Или сначала сохраните Книгу1, а потом сохраняйте Книгу2

Скажи мне, кудесник, любимец ба’гов...
Платная помощь:
Boroda_Excel@mail.ru
Яндекс-деньги: 41001632713405 | Webmoney: R289877159277; Z102172301748; E177867141995