Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

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

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

Купить рекламу на форуме - 42 тыс руб за месяц

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

Постоянно в работе приходится из экселевских файлов копировать данные и вставлять в существующие таблицы Access. Помогите написать такой макрос, чтобы при нажатии кнопки данные быстро копировались в БД. Основная проблема, что не могу написать макрос для открытия БД. Здесь были уже описаны подобные проблемы, например, с копированием из Excel в Word. В идеале достаточно будет кода, который открывает БД.
Ranel вне форума
Старый 31.10.2008, 16: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, 09:38   #3
Ranel
 
Регистрация: 31.10.2008
Сообщений: 5
По умолчанию

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


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Импорт из Excel в Access AD_min БД в Delphi 0 28.10.2008 09: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