Метод Workbook.Save (Excel)
Выражение Переменная, представляющая объект Workbook .
Замечания
Чтобы открыть файл книги, используйте метод Open .
Чтобы пометить книгу как сохраненную, не записывая ее на диск, задайте для свойства Сохранено значение True.
При первом сохранении книги используйте метод SaveAs , чтобы указать имя файла.
Пример
В этом примере сохраняется активная книга.
ActiveWorkbook.Save В этом примере сохраняются все открытые книги, а затем закрывается Microsoft Excel.
For Each w In Application.Workbooks w.Save Next w Application.Quit В этом примере событие BeforeSave используется для проверки того, что определенные ячейки содержат данные перед сохранением книги. Книгу нельзя сохранить, пока в каждой из следующих ячеек не будут содержаться данные: D5, D7, D9, D11, D13 и D15.
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean) 'If the six specified cells don't contain data, then display a message box with an error 'and cancel the attempt to save. If WorksheetFunction.CountA(Worksheets("Sheet1").Range("D5,D7,D9,D11,D13,D15")) < 6 Then MsgBox "Workbook will not be saved unless" & vbCrLf & _ "All required fields have been filled in!" Cancel = True End If End Sub Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.
Обратная связь
Были ли сведения на этой странице полезными?
Сохранение макроса
Создать макрос в Excel можно, запустив средство записи макросов или с помощью редактора Visual Basic для приложений (VBA). После создания макроса следует сохранить его для возможности повторного использования в текущей или в других книгах.
Сохранение макроса в текущей книге
Если понадобится использовать макрос только в той книге, где он был создан, нажмите кнопку Сохранить или Сохранить как так же, как при обычном сохранении. Но сохранение книги с макросами происходит несколько иначе, поскольку необходимо использовать специальный формат файла «с поддержкой макросов». Поэтому при попытке сохранить макрос Excel предложит два варианта:
- Сохранить в виде книги с поддержкой макросов (XLSM-файл), выбрав Нет.
- Сохранить в виде книги без поддержки макросов, выбрав Да.
Чтобы сохранить макрос как книгу с поддержкой макросов,
- щелкните Нет.
- В окне Сохранить как в раскрывающемся списке Тип файла выберите Книга Excel с поддержкой макросов.
Создание и сохранение макросов в личной книге
Чтобы макросы были доступны при каждом запуске Excel, создайте их в книге «Personal.xlsb». Это скрытая книга на вашем компьютере, которая открывается при каждом запуске Excel. Для получения сведений о выполнении этих действий см. статью Создание и сохранение всех макросов в одной книге.
Vba сохранить файл как
Argument 'Topic id' is null or empty
Сейчас на форуме
© Николай Павлов, Planetaexcel, 2006-2023
info@planetaexcel.ru
Использование любых материалов сайта допускается строго с указанием прямой ссылки на источник, упоминанием названия сайта, имени автора и неизменности исходного текста и иллюстраций.
| ООО "Планета Эксел" ИНН 7735603520 ОГРН 1147746834949 |
ИП Павлов Николай Владимирович ИНН 633015842586 ОГРНИП 310633031600071 |
Программное сохранение файла на сетевой диск в Excel
В Microsoft Excel вы можете сохранить файл на любом диске, для которого у вас есть права на запись и удаление. Кроме того, можно использовать макрос Microsoft Visual Basic для приложений для сохранения текущей рабочей книги и использовать переменную для имени файла. Можно использовать переменные из свойства ActiveWorkbook.Name, из данных поля ввода или из ссылки на ячейку.
Если вы используете полный путь для имени файла, Microsoft Excel будет точно знать, где сохранить файл. Если путь не указан, Microsoft Excel сохранит файл в текущий активный каталог или папку.
Дополнительная информация
Корпорация Майкрософт предоставляет примеры программирования только в целях демонстрации без явной или подразумеваемой гарантии. Это относится, в частности, к подразумеваемым гарантиям товарного состояния или пригодности для конкретной цели. Эта статья предполагает, что пользователь знаком с представленным языком программирования и средствами, используемыми для создания и отладки процедур. Специалисты технической поддержки Майкрософт могут пояснить работу той или иной процедуры, но модификация примеров и их адаптация к задачам разработчика не предусмотрена.
Пример макроса 1
Для сохранения активной рабочей книги с переменной по указанному пути используйте следующий макрос:
Sub SaveWithVariable() Dim MyFile As String MyFile = ActiveWorkbook.Name ' Do not display the message about overwriting the existing file. Application.DisplayAlerts = False ' Save the active workbook with the name of the ' active workbook. Save it on the E drive to a folder called ' "User" with a subfolder called "JoeDoe." ActiveWorkbook.SaveAs Filename:="E:\User\JoeDoe\" & MyFile ' Close the workbook by using the following. ActiveWorkbook.Close End Sub
Пример макроса 2
Используйте имя файла, сохраненное в ячейке, и сохраните файл на сетевом сервере. Для этого используйте следующий макрос:
Sub SaveWithVariableFromCell() Dim SaveName As String SaveName = ActiveSheet.Range("A1").Text ActiveWorkbook.SaveAs Filename:="E:\User\JoeDoe\" & _ SaveName & ".xls" End Sub
Обратная связь
Были ли сведения на этой странице полезными?