Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Скопировать таблицу из одного mdb в другой mdb в Excel VBA / 4 сообщений из 4, страница 1 из 1
26.10.2009, 21:08
    #36273492
Nevsky2006
Nevsky2006
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Скопировать таблицу из одного mdb в другой mdb в Excel VBA
Здравствуйте всем.
Подскажите как можно находясь в Excel скопировать таблицу из одного файла mdb в другой.
Сдесь, возможно, изначально для себя задачу неправильно поставил, но: есть файл Эксель который берет данные из Аксеса по сети, причем не за одни коннект (десятки). Это долго получается. Даже очень.
Что думаю сделать.
1. Создаю временный mdb.
2. Процедура переноса необходимой информации из одного mdb во временный mdb файл (что-то типа select into).
3. Меняю в настройке путь базы и все, дальше работает существующий код.
Ожидаемый результат- минимум вмешательства в существующий код, увеличение скорости выполнения ~2.4 раза.

И еще попутно вопрос: одно и то же количество информации сколько занимает места в MSAccess и MSSQLServer (если таблицу из Access перенести в MSSQLServer)

Спасибо заранее.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
26.10.2009, 22:40
    #36273598
White Owl
White Owl
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Скопировать таблицу из одного mdb в другой mdb в Excel VBA
Nevsky2006Подскажите как можно находясь в Excel скопировать таблицу из одного файла mdb в другой. Бешеной собаке семь верст не крюк?

Если хочешь сделать выгрузку данных из одного mdb в другой, читай тут:
http://office.microsoft.com/en-us/access/CH062526851033.aspx

Nevsky2006И еще попутно вопрос: одно и то же количество информации сколько занимает места в MSAccess и MSSQLServer (если таблицу из Access перенести в MSSQLServer)Данные? Данные занимают почти одинаковое количество места, разница всего в процент-два.
Зато дополнительной всякой всячины у MS SQL побольше получится. Но ты разве на дискетках живешь? Сейчас харддрайвы террабайтами уже измеряются, пару гиг под сервер отдать никого не напрягает.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
27.10.2009, 09:37
    #36274011
MaximuS_G
MaximuS_G
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Скопировать таблицу из одного mdb в другой mdb в Excel VBA
Nevsky2006
Я бы задал Ваш вопрос на форуме по Акцесс
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
29.10.2009, 12:56
    #36279329
Nevsky2006
Nevsky2006
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Скопировать таблицу из одного mdb в другой mdb в Excel VBA
Правильная постановка задачи - 90% гарантии успешного ее выполнения.

Может кому поможет: сделал так
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
Function CreateAccessDatabaseADO()
    
    Dim cat As ADOX.Catalog
    Dim cnn As ADODB.Connection

    Set cat = New ADOX.Catalog
    Set cnn = New ADODB.Connection
    
    strPuth = ThisWorkbook.Path & "\Test.mdb"
    
    If Dir(strPuth) <> "" Then Kill strPuth
    
    cat.Create "Provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source=" & strPuth

    cnn.Open "Provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source=C:\БазаСДаными.mdb"

    cnn.Execute "SELECT  Table.* INTO Table IN '" & strPuth & "' FROM  Table WHERE Условие;"
 
    cnn.Close
    
    Set cat = Nothing
    Set cnn = Nothing
   
End Function

Использовал библиотеку Microsoft ADO Ext.2.8 for DLL and Security
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Скопировать таблицу из одного mdb в другой mdb в Excel VBA / 4 сообщений из 4, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 514ms
Закрыть
start [/forum/topic.php?fid=61&mobile=1&tid=2178910]:
 0ms
get settings:
 9ms
get forum list:
 15ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 187ms
get topic data:
 12ms
get forum data:
 2ms
get page messages:
 48ms
get tp. blocked users:
 1ms
others: 234ms
total:  514ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]