Как сохранить данные в Excel при выходе

02.12.2010, 14:09. **Показов** 3842. **Ответов** 5

Author24 — интернет-сервис помощи студентам

Доброго времени суток на циферблате!

Как сохраниться при выходе: Вот так закрываю все (нафиг)

Visual Basic

1 2	Application.DisplayAlerts = False Application.Quit

Что посоветуете!

@palva · 02.12.2010, 14:47

Visual Basic

1 2	Application.DisplayAlerts = False ' чтобы не было вопросов Application.ActiveWorkbook.SaveAs 'filename'

Возможно надо будет сохранить и другие книги, если имеются.

@pashulka · 03.12.2010, 17:54

Visual Basic

Sub SaveOpenFile()
 
'***********************************************
'  author [email]pashulka@newgen.ru[/email]
'***********************************************
 
If Application.Workbooks.Count = 1 Then
   ActiveWorkbook.Save
   Application.Quit
Else
   For Each iBook In Application.Workbooks
       iBook.Save
   Next
   Application.Quit
End If
 
'  выберите второй вариант, если :
'  нужно закрыть и сохранить только активную книгу
'  без закрытия приложения MS Excel
'  DisplayAlert - нафиг не нужен
 
ActiveWorkbook.Close saveChanges:=True
 
End Sub

Вопрос для palva !
Зачем было сохранять файл под другим именем, разве подобная просьба
было в вопросе ?

@palva · 03.12.2010, 21:58

> Зачем было сохранять файл под другим именем,

Ну я посчитал, что в случае, если файл создавался с нуля, то при сохранении он всё равно спросит про имя и тормознет программу.

Может быть, был неправ.

@palva · 03.12.2010, 22:02

Имя можно взять из ActiveWorkBook.Name а DisplayAlert = False требуется, чтобы Excel не спрашивал разрешения при перезаписи файла.

@pashulka · 04.12.2010, 01:48

Хорошая программа должна предусматривать все варианты, так что следите за ходом моих мыслей :
Инструкция ActiveWorkbook.Save не требует определения имени, но при отсутствии Application.DisplayAlerts = False и наличии в папке автосохранения файла с именем Книга1 и т.д. (в русской версии новые файлы носят именно такие имена) возникнет вопрос о замене файла.
С другой стороны при отключении запросов 'старый' файл будет автоматически заменен на 'новый', а если это принципиально разные файлы, да ещё с очень важной информацией !!!
При таком раскладе лучше мы очень рискуем и лучше получить запрос на замещение файла(ов), чем потерять данные !!!

Так что моя программка почти полностью отвечает запросам пользователя , но если Вас раздражают стандартные диалоговые окна, то
можно использовать перехват ошибки и вывести в Msgbox всю информацию о 'старом' файле и возможность пользователю выбрать вариант замены.
Если подобный код интересен, то пишите сразу на e-mail : urllink_doggie_yandex.ru

Блоги программистов
Обновление сайта www.historian.by Reglage 05.01.2025 Обещал подвести итоги 2024 года для сайта. Однако начну с того, что изменилось за неделю. Добавил краткий урок по последовательности действий при анализе вредоносных файлов и значительно улучшил урок. . .	Как использовать GraphQL в C# с HotChocolate Programming 05.01.2025 GraphQL — это современный подход к разработке API, который позволяет клиентам запрашивать только те данные, которые им необходимы. Это делает взаимодействие с API более гибким и эффективным по. . .	Модель полного двоичного суматора с помощью логических операций (python) AlexSky-coder 04.01.2025 def binSum(x:list, y:list): s=^y] p=x and y for i in range(1,len(x)): s. append((x^y)^p) p=(x and y)or(p and (x or y)) return s x=list() y=list()	Это мы не проходили, это нам не задавали...(асихронный счётчик с управляющим сигналом задержки). Hrethgir 04.01.2025 Асинхронный счётчик на сумматорах (шестиразрядный по числу диодов на плате, но наверное разрядов будет больше - восемь или шестнадцать, а диоды на старшие), так как триггеры прошли тестирование и. . .	Руководство по созданию бота для Телеграм на Python IT_Exp 04.01.2025 Боты для Телеграм представляют собой автоматизированные программы, которые выполняют различные задачи, взаимодействуя с пользователями через интерфейс мессенджера. В данной статье мы рассмотрим,. . .	Применение компонентов PrimeVue в Vue.js 3 на TypeScript BasicMan 04.01.2025 Введение в PrimeVue и настройка окружения PrimeVue представляет собой мощную библиотеку компонентов пользовательского интерфейса для Vue. js 3, которая предоставляет разработчикам богатый набор. . .
Как стать Senior developer cpp_developer 04.01.2025 В современной индустрии разработки программного обеспечения позиция Senior Developer представляет собой не просто следующую ступень карьерной лестницы, а качественно новый уровень профессионального. . .	Что известно о дате выхода Windows 12 и чего от нее ждать IT_Exp 04.01.2025 В мире технологий постоянно происходят изменения, и операционные системы не являются исключением. Windows 11, выпущенная в октябре 2021 года, принесла множество инноваций и улучшений, но. . .	Что новенького в .NET Core 9 Programming 04.01.2025 Обзор ключевых изменений в . NET Core 9 Платформа . NET Core продолжает активно развиваться, и версия 9 представляет собой значительный шаг вперед в эволюции этой технологии. Новый релиз. . .	Инструкция по установке python3.13.1 в Debian 12 AlexSky-coder 03.01.2025 sudo apt update sudo apt install build-essential zlib1g-dev libncurses5-dev libgdbm-dev libnss3-dev libssl-dev libreadline-dev libffi-dev wget. . .	Затестил триггеры. архив проекта прилагаю с GOA файлами в настройках архиватора проектов. Hrethgir 03.01.2025 В этот раз нет закольцованности, потому что от неё только глюки, как я понял, логика не вырезанная. Триггеры очень быстрые если верить измерениям с помощью анализатора от Gowin. Есть ещё регистры,. . .	Python в помощь DevOps IT_Exp 03.01.2025 Причины использования Python в работе DevOps Python стал неотъемлемой частью мира DevOps, и это не случайно. Этот язык программирования обладает множеством преимуществ, которые делают его. . .

@palva 4256 / 2952 / 688 Регистрация: 08.06.2007 Сообщений: 9,859 Записей в блоге: 4
	03.12.2010, 21:58	4
	> Зачем было сохранять файл под другим именем, Ну я посчитал, что в случае, если файл создавался с нуля, то при сохранении он всё равно спросит про имя и тормознет программу. Может быть, был неправ. 0

@palva 4256 / 2952 / 688 Регистрация: 08.06.2007 Сообщений: 9,859 Записей в блоге: 4
	03.12.2010, 22:02	5
	Имя можно взять из ActiveWorkBook.Name а DisplayAlert = False требуется, чтобы Excel не спрашивал разрешения при перезаписи файла. 0

@pashulka 4135 / 2239 / 940 Регистрация: 01.12.2010 Сообщений: 4,624
	04.12.2010, 01:48	6
	Хорошая программа должна предусматривать все варианты, так что следите за ходом моих мыслей : Инструкция ActiveWorkbook.Save не требует определения имени, но при отсутствии Application.DisplayAlerts = False и наличии в папке автосохранения файла с именем Книга1 и т.д. (в русской версии новые файлы носят именно такие имена) возникнет вопрос о замене файла. С другой стороны при отключении запросов 'старый' файл будет автоматически заменен на 'новый', а если это принципиально разные файлы, да ещё с очень важной информацией !!! При таком раскладе лучше мы очень рискуем и лучше получить запрос на замещение файла(ов), чем потерять данные !!! Так что моя программка почти полностью отвечает запросам пользователя , но если Вас раздражают стандартные диалоговые окна, то можно использовать перехват ошибки и вывести в Msgbox всю информацию о 'старом' файле и возможность пользователю выбрать вариант замены. Если подобный код интересен, то пишите сразу на e-mail : urllink_doggie_yandex.ru 0

Как сохранить данные в Excel при выходе

Решение