Форум программистов
 
О проблемах, например, с регистрацией пишите сюда - alarforum@yandex.ru, проверяйте папку спам! Обязательно пройдите активизацию e-mail, а тут можно восстановить пароль.

Вернуться   Форум программистов > Microsoft Office и VBA > Microsoft Office Excel
Регистрация

Восстановить пароль
Повторная активизация e-mail

Здесь нужно купить рекламу за 20 тыс руб в месяц! ) пишите сюда - alarforum@yandex.ru
Без учёта ботов - 20000 человек в день, 350000 в месяц.

Закрытая тема
Ваша тема закрыта, почему это могло произойти? Возможно,
Нет наработок или кода, если нужно готовое решение - создайте тему в разделе Фриланс и оплатите работу.
Название темы включает слова - "Помогите", "Нужна помощь", "Срочно", "Пожалуйста".
Название темы слишком короткое или не отражает сути вашего вопроса.
Тема исчерпала себя, помните, один вопрос - одна тема
Прочитайте правила и заново правильно создайте тему.
 
Опции темы
Старый 31.10.2008, 13:05   #1
Ranel
 
Регистрация: 31.10.2008
Сообщений: 5
По умолчанию Копирование из Excel в Access

Постоянно в работе приходится из экселевских файлов копировать данные и вставлять в существующие таблицы Access. Помогите написать такой макрос, чтобы при нажатии кнопки данные быстро копировались в БД. Основная проблема, что не могу написать макрос для открытия БД. Здесь были уже описаны подобные проблемы, например, с копированием из Excel в Word. В идеале достаточно будет кода, который открывает БД.
Ranel вне форума
Старый 31.10.2008, 17:13   #2
b00s
Форумчанин
 
Регистрация: 19.01.2008
Сообщений: 120
По умолчанию

Используйте Recordset
с начало откройте рекордсет подключившись к базе
Код:
    Dim rst As New ADODB.Recordset
    Dim cnn As New ADODB.Connection
    cnn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="Путь к базе";Mode=Share Deny Write;Persist Security Info=False"
    cnn.Open
    rst.Open "Имя таблицы", cnn, adOpenDynamic, adLockOptimistic
Ну а далее можете делать с этой таблицей что угодно(Добавлять, удалять, редактировать данные)
b00s вне форума
Старый 01.11.2008, 10:38   #3
Ranel
 
Регистрация: 31.10.2008
Сообщений: 5
По умолчанию

Спасибо огромное! попробую...
Ranel вне форума
Закрытая тема

Здесь нужно купить рекламу за 20 тыс руб в месяц! ) пишите сюда - alarforum@yandex.ru
Без учёта ботов - 20000 человек в день, 350000 в месяц.

Опции темы


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Импорт из Excel в Access AD_min БД в Delphi 0 28.10.2008 10:29
Delphi 7 + access + excel = out of memory Тимониссимо БД в Delphi 5 06.07.2008 07:16
Экспорт из Access в Excel, Экспорт из отчётов в таблицу Excel Kissedbythegod Microsoft Office Access 1 31.05.2008 22:15
Копирование баз Access Washington Общие вопросы Delphi 6 27.06.2007 08:39


Проекты отопления, пеллетные котлы, бойлеры, радиаторы
интернет магазин respective.ru
Пеллетный котёл Emtas
котлы EMTAS