LEADERSOFT.ru Разработка на заказ программ и сайтов
Форумы по информационным технологиям
 
Регистрация  |  Вход
left
 Forums Обновлено :: 07 февраля 2005
Форумы Минимизировать
ПоискСписок форумов
  Программирование  Microsoft Access. Файлы mdb и accdb  Тема: Архивация...
 Тема: Архивация табл Excel
 
 15.06.2007 21:08:32
All
4316 сообщения
1-ый


Тема: Архивация табл Excel
Здравствуйте, милейшие...
Помогите мне пожалуйста в разрешении следующей задачи:
Есть таблица Excel в которой занесено множество различных данных...
Управление таблицой ведётся из СУБД Access.
Так вот, по прошествии одного месяца необходимо сделать так, что бы все старые табличные данные заархивировались в определённую папку... Причём, перед глазами пользователя должен появиться чистый лист Excel, с заголовками полей...
Пожалуйста, помогите...
Заранее благодарен!!!


P.S. Связанные таблицы Excel
Автор: ОченьЗапутанный от 0:00:00 Источник ...
 15.06.2007 21:08:32
All
4316 сообщения
1-ый


RE: Архивация табл Excel
1. Экселевский файл лучше скопировать в архив и данные его не редактировать.
2. Далее из Excel (Access) создаете новую книгу с нужными полями. Например, так
Sub funCreateNewBook()
Workbooks.Add
ActiveCell.FormulaR1C1 = "Поле1"
Range("B1").Select
ActiveCell.FormulaR1C1 = "Поле2"
Range("C1").Select
ActiveCell.FormulaR1C1 = "Поле3"
Range("D1").Select
ActiveWorkbook.SaveAs Filename:= _
"D:\Книга_01_07_2004.xls", _
FileFormat:=xlNormal, Password:="", WriteResPassword:="", _
ReadOnlyRecommended:=False, CreateBackup:=False
End Sub



P.S. Связанные таблицы Excel
Автор: Алекс от 0:00:00 Источник ...
 Страница 1 из 1
СледующийПредыдущийНет оценки
  Программирование  Microsoft Access. Файлы mdb и accdb  Тема: Архивация...
ПоискПоиск  Список форумовСписок форумов  
right
Начало | Forums
Copyright 2002-2016 Leadersoft.ru   ::  Leadersoft  ::  Соглашение о безопасности  ::  Условия использования
Не забудьте сохранить ссылку на страницу с кодом для дальнейшего анализа
Сайт разработан на базе технологий ASP.NET, DotNetnuke