ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Помогите, пожалуйста, запустить Акцесс из Экселя! подскажите команду на VBA!
18 сообщений из 18, страница 1 из 1
Помогите, пожалуйста, запустить Акцесс из Экселя! подскажите команду на VBA!
    #33368989
Michael5
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Michael5
Гость
...
Рейтинг: 0 / 0
09.11.2005, 14:21:48
| Ответить | Цитировать | Написать  
Помогите, пожалуйста, запустить Акцесс из Экселя! подскажите команду на VBA!
    #33369089
Андрей Il
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Андрей Il
Участник
Shell Path , где Path - пусть к Access.
...
Рейтинг: 0 / 0
09.11.2005, 14:50:08
| Ответить | Цитировать | Написать  
Помогите, пожалуйста, запустить Акцесс из Экселя! подскажите команду на VBA!
    #33369361
Michael5
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Michael5
Гость
...
Рейтинг: 0 / 0
09.11.2005, 16:05:15
| Ответить | Цитировать | Написать  
Помогите, пожалуйста, запустить Акцесс из Экселя! подскажите команду на VBA!
    #33369477
Андрей Il
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Андрей Il
Участник
Shell "C:\Program Files\Microsoft Office\Office\MSACCESS.EXE W:\My.mdb"
...
Рейтинг: 0 / 0
09.11.2005, 16:33:05
| Ответить | Цитировать | Написать  
Помогите, пожалуйста, запустить Акцесс из Экселя! подскажите команду на VBA!
    #33369519
Michael5
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Michael5
Гость
В том-то и дело, что не получается:
Invalid procedure call or argument...
...
Рейтинг: 0 / 0
09.11.2005, 16:47:13
| Ответить | Цитировать | Написать  
Помогите, пожалуйста, запустить Акцесс из Экселя! подскажите команду на VBA!
    #33369551
Андрей Il
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Андрей Il
Участник
У меня все работает. Значит, ты не так ввел путь. Можешь добавить параметр запуска (Shell).
...
Рейтинг: 0 / 0
09.11.2005, 16:56:57
| Ответить | Цитировать | Написать  
Помогите, пожалуйста, запустить Акцесс из Экселя! подскажите команду на VBA!
    #33369608
Michael5
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Michael5
Гость
Копирую путь в строку проводника, и файл запускается... :(
...
Рейтинг: 0 / 0
09.11.2005, 17:15:57
| Ответить | Цитировать | Написать  
Помогите, пожалуйста, запустить Акцесс из Экселя! подскажите команду на VBA!
    #33369657
Андрей Il
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Андрей Il
Участник
Invalid procedure call or argument - ошибка вызова процедуры (Shell). Посмотри внимательнее параметры запуска.
...
Рейтинг: 0 / 0
09.11.2005, 17:27:45
| Ответить | Цитировать | Написать  
Помогите, пожалуйста, запустить Акцесс из Экселя! подскажите команду на VBA!
    #33369688
Michael5
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Michael5
Гость
Sub Макрос1()
Dim A
A = Shell("c:\db1.mdb", 1)
End Sub


Пробовал все варианты: со скобками, без скобок, с параметром, без, с присвоением переменной и просто ШЕЛЛ -
никак!...
...
Рейтинг: 0 / 0
09.11.2005, 17:40:34
| Ответить | Цитировать | Написать  
Помогите, пожалуйста, запустить Акцесс из Экселя! подскажите команду на VBA!
    #33369703
Nikz
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Nikz
Участник
Dim Acc As Object
Set Acc = CreateObject("Access.Application")
Acc.OpenCurrentDatabase "C:\base.mdb"
Acc.Visible = True
...
Рейтинг: 0 / 0
09.11.2005, 17:46:43
| Ответить | Цитировать | Написать  
Помогите, пожалуйста, запустить Акцесс из Экселя! подскажите команду на VBA!
    #33369704
Андрей Il
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Андрей Il
Участник
Sub Макрос1()
Shell "C:\Program Files\Microsoft Office\Office\MSACCESS.EXE W:\My.mdb", 1
End Sub

вместо Shell "c:\db1.mdb", 1 .

Только путь к запускному файлу Access посмотри в зависимости от версии Office.
...
Рейтинг: 0 / 0
09.11.2005, 17:47:43
| Ответить | Цитировать | Написать  
Помогите, пожалуйста, запустить Акцесс из Экселя! подскажите команду на VBA!
    #33369729
Michael5
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Michael5
Гость
Андрей, спасибо! Заработало!
Nikz, так тоже работает, но по завершении процедуры, видимо, объект уничтожается, поэтому она открывается и схлопывается
...
Рейтинг: 0 / 0
09.11.2005, 17:56:30
| Ответить | Цитировать | Написать  
Помогите, пожалуйста, запустить Акцесс из Экселя! подскажите команду на VBA!
    #33369750
Michael5
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Michael5
Гость
И все-таки еще есть вопрос, помогите, пожалуйста!

Путь к файлу состоит из русских букв и знаков препинания, в частности, запятых.
И видимо, это вызывает ошибку (говорит, что файл с такими параметрами не найден, и показывает путь: последний символ в пути - запятая, после нее точка и расширение mdb. То есть на запятой оборвана строка)

Как бы тут быть?
...
Рейтинг: 0 / 0
09.11.2005, 18:06:43
| Ответить | Цитировать | Написать  
Помогите, пожалуйста, запустить Акцесс из Экселя! подскажите команду на VBA!
    #33369751
Michael5
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Michael5
Гость
Ну вот, проверил: даже не запятая, а просто название папки по-русски вызывает ошибку!
...
Рейтинг: 0 / 0
09.11.2005, 18:08:24
| Ответить | Цитировать | Написать  
Помогите, пожалуйста, запустить Акцесс из Экселя! подскажите команду на VBA!
    #33369775
Nikz
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Nikz
Участник
как вариант

'в Declarations:
Public Acc As Object

'в макрос:
Set Acc = CreateObject("Access.Application")
Acc.OpenCurrentDatabase "C:\Моя папка\base.mdb"
Acc.Visible = True

При использовании этого способа, нормально открывается база с русскими буквами в адресе.
База будет открыта, пока открыта эта книга в Excel (т.е. не закроется сразу после выполнения макроса)
...
Рейтинг: 0 / 0
09.11.2005, 18:21:17
| Ответить | Цитировать | Написать  
Помогите, пожалуйста, запустить Акцесс из Экселя! подскажите команду на VBA!
    #33369780
Michael5
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Michael5
Гость
Да, точно!
Огромное спасибо!
...
Рейтинг: 0 / 0
09.11.2005, 18:23:53
| Ответить | Цитировать | Написать  
Помогите, пожалуйста, запустить Акцесс из Экселя! подскажите команду на VBA!
    #33369783
Michael5
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Michael5
Гость
А как теперь запустить выборку (один из запросов) в этом файле?

Извиняюсь за сумбурные вопросы :)
...
Рейтинг: 0 / 0
09.11.2005, 18:26:21
| Ответить | Цитировать | Написать  
Помогите, пожалуйста, запустить Акцесс из Экселя! подскажите команду на VBA!
    #33369811
Nikz
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Nikz
Участник
Acc - это экземпляр приложения Access
например:
Dim r As Object
Set r = Acc.CurrentDB.OpenRecordset("TBL")
MsgBox r.RecordCount

то есть все как в Access, только нужно указывать приложение с которым нужно произвести действия
...
Рейтинг: 0 / 0
09.11.2005, 18:39:12
| Ответить | Цитировать | Написать  
18 сообщений из 18, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Помогите, пожалуйста, запустить Акцесс из Экселя! подскажите команду на VBA!
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=60&msg=33369361&tid=2166895]:
 0ms
get settings:
 8ms
get forum list:
 15ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 214ms
get topic data:
 7ms
get forum data:
 2ms
get page messages:
 45ms
get tp. blocked users:
 1ms
others: 199ms
total:  497ms
созд. / загр.: 497ms
x
x
Закрыть


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