ReSQL.ru
     
powered by simpleCommunicator - 2.0.51     © 2025 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / VBA Excel в Access
25 сообщений из 33, страница 1 из 2
  1  все
VBA Excel в Access
    #39815695
greker
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
greker
Гость
Добрый день.
Установлен Office 2016. Есть база access, которая открывает ссылку ie, логинится на ресурсе, запускает макрос в excel, который выгружает с ресурса некоторые данные. Возможен ли перенос макроса excel в access, чтобы всё сразу писалось в таблицу в базе, не используя excel?
Как в vba access прописать закрытие окон ie после отработки?
Сюда могу выложить только фото кода, так как база на работе, политика безопасности, интернета нема.
...
Рейтинг: 0 / 0
21.05.2019, 11:27
| Ответить | Цитировать | Написать  
VBA Excel в Access
    #39815701
MrShin
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
MrShin
Участник
Ну вообще VBA код будет работать на Акцессе, нужно будет только поменять части, которые непосредственно работают с Экелем. Часть, которая работает с интернетом должна работать без изменений.
...
Рейтинг: 0 / 0
21.05.2019, 11:34
| Ответить | Цитировать | Написать  
VBA Excel в Access
    #39815709
Фотография Панург
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Панург
Участник
grekerСюда могу выложить только фото кода, так как база на работе, политика безопасности, интернета нема.скопируй в Блокнот текст.
...
Рейтинг: 0 / 0
21.05.2019, 11:48
| Ответить | Цитировать | Написать  
VBA Excel в Access
    #39815712
Фотография Панург
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Панург
Участник
или экспорт из IDE в текстовые файлы *.cls или *.bas

Или USB тоже блокированы?
...
Рейтинг: 0 / 0
21.05.2019, 11:51
| Ответить | Цитировать | Написать  
VBA Excel в Access
    #39815725
Кривцов Анатолий
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Кривцов Анатолий
Гость
MrShinНу вообще VBA код будет работать на Акцессе, нужно будет только поменять части, которые непосредственно работают с Экелем. Часть, которая работает с интернетом должна работать без изменений. Добавлю, что в макросе excel вы, видимо, вносите значения в ячейки одной строки, потом следующей и т.д.
В Аксе вместо этого хозяйства нужно открыть Recordset на таблице-получателе и добавлять записи туда.
...
Рейтинг: 0 / 0
21.05.2019, 12:05
| Ответить | Цитировать | Написать  
VBA Excel в Access
    #39815781
greker
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
greker
Гость
USB тоже заблокированы, пишу с мобильного))
К сожалению, я не очень силён, мягко говоря, в vba, просто досталось в "наследство" и накинули задачу в нагрузку)
...
Рейтинг: 0 / 0
21.05.2019, 13:31
| Ответить | Цитировать | Написать  
VBA Excel в Access
    #39815783
greker
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
greker
Гость
Просто копирование уже пробовал на дурака, не работает))
...
Рейтинг: 0 / 0
21.05.2019, 13:32
| Ответить | Цитировать | Написать  
VBA Excel в Access
    #39815786
greker
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
greker
Гость
В excel есть таблица с кодами на отдельном листе, оттуда берётся значение, вставляется в окно ie, нажимается кнопка, появляющиеся данные выгружаются в excel на другой лист. И так по всем кодам
...
Рейтинг: 0 / 0
21.05.2019, 13:36
| Ответить | Цитировать | Написать  
VBA Excel в Access
    #39815828
Фотография Akina
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Akina
Участник
grekerВозможен ли перенос макроса excel в access, чтобы всё сразу писалось в таблицу в базе, не используя excel?После подключения референсной библиотеки экселёвый макрос переносится в Access практически без изменений, если он написан правильно. Нужно только добавить код открытия книги и получить на неё референс.
...
Рейтинг: 0 / 0
21.05.2019, 14:25
| Ответить | Цитировать | Написать  
VBA Excel в Access
    #39815841
bubucha
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
bubucha
Участник
AkinaПосле подключения референсной библиотеки
Ему надо без экселя сразу в акс писать из ie, но исходники он не кажет, а пытается про них рассказать в повествовательной форме...
...
Рейтинг: 0 / 0
21.05.2019, 14:41
| Ответить | Цитировать | Написать  
VBA Excel в Access
    #39815855
Фотография Akina
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Akina
Участник
bubuchaЕму надо без экселя сразу в акс писать из ie
А вот тут уже действительно без кода никуда.
Хотя как по мне - посмотреть, что там в экселе наворочано, да написать с нуля. Всяко быстрее, чем чужую лапшу отлаживать. Хотя если алгоритм прозрачен. то забрать как есть. VBA - он везде VBA.
...
Рейтинг: 0 / 0
21.05.2019, 15:12
| Ответить | Цитировать | Написать  
VBA Excel в Access
    #39815904
greker
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
greker
Гость
Вложил архив с кодами, получилось примерно как левой пяткой нос почесать
...
Рейтинг: 0 / 0
21.05.2019, 16:23
| Ответить | Цитировать | Написать  
VBA Excel в Access
    #39815909
Фотография Панург
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Панург
Участник
grekerUSB тоже заблокированы, пишу с мобильного))навеяло...
Пишу на броне горящего танка... ©
...
Рейтинг: 0 / 0
21.05.2019, 16:27
| Ответить | Цитировать | Написать  
VBA Excel в Access
    #39815912
greker
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
greker
Гость
Панург,

Практически)))
...
Рейтинг: 0 / 0
21.05.2019, 16:35
| Ответить | Цитировать | Написать  
VBA Excel в Access
    #39815925
Фотография Akina
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Akina
Участник
Да всего-то там и делов, что всякие ThisWorkbook.Worksheets(X).Cells(Y, Z) поменять на переменные, да нарисовать код вставки в таблицы по мере формирования данных для новой записи.
...
Рейтинг: 0 / 0
21.05.2019, 16:50
| Ответить | Цитировать | Написать  
VBA Excel в Access
    #39815982
greker
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
greker
Гость
Akina,

Это на каком языке сейчас ругательство прозвучало?)))
...
Рейтинг: 0 / 0
21.05.2019, 18:20
| Ответить | Цитировать | Написать  
VBA Excel в Access
    #39815997
greker
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
greker
Гость
Akina,

Я просто к тому, что в vba я, мягко говоря, не силён)) по образу и подобию пытался что-то состряпать, но не получается ((
...
Рейтинг: 0 / 0
21.05.2019, 18:48
| Ответить | Цитировать | Написать  
VBA Excel в Access
    #39816146
greker
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
greker
Гость
Сможет кто помочь с этой задачкой?))
...
Рейтинг: 0 / 0
22.05.2019, 08:09
| Ответить | Цитировать | Написать  
VBA Excel в Access
    #39816157
Serg197311
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Serg197311
Участник
А что значит помочь? Взять и переписать код так чтобы он работал так как вам надо? Здесь точно много кто это сможет.... Но захочет ли.... делать это просто так....> а просто помочь - это вам самому надо начать разбираться в том что этот код делает по шагам....
Вот например этот кусок кода что-то берет из excell и вставляет в explorer.
Код: vbnet
1.
2.
oWin1.Document.getElementsByTagName("input").Item(3).innertext = ThisWorkbook.Worksheets(1).Cells(i, 1)
oWin1.Document.getElementsByTagName("input").Item(6).Click


Что он именно берет, для чего вставляет ? Наверное я мог бы сам разобраться в этом вопросе - но вот если честно, мне лень.
Итак отвечаете на этот вопрос- определяем нужно ли это в Аксе и если нужно, подсказываем как сделать.
Потом идем дальше по коду.
...
Рейтинг: 0 / 0
22.05.2019, 08:30
| Ответить | Цитировать | Написать  
VBA Excel в Access
    #39816206
alecko
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
alecko
Участник
greker, а вы примечания то читали? раскомментируйте этот блок - будут закрываться все окна
Код: vbnet
1.
2.
3.
4.
5.
6.
'Этот блок кода должен закрыть браузер с неактивной ссылкой link - закрывает активные окна подряд
For Each oWin In oShApp.Windows
    If InStr(oWin.LocationURL, link) = 0 Then
       oWin.Quit
   End If
Next


или вот это: причина создания файлов именно в эксель
Код: vbnet
1.
' этот код сохраняет созданный файл в архиве, т.е. их создается очень много, ну и


вот здесь они создаются в другой директории
Код: vbnet
1.
2.
3.
4.
5.
ActiveWorkbook.Save
    ChDir "папка, куда сохраняется файл с данными"
    ActiveWorkbook.SaveAs Filename:= _
        "путь для сохранения" & Date & "_МБ.xlsm", _
        FileFormat:=xlOpenXMLWorkbookMacroEnabled, CreateBackup:=False


спорное название папки... и пути - это точно рабочий код?
...
Рейтинг: 0 / 0
22.05.2019, 09:55
| Ответить | Цитировать | Написать  
VBA Excel в Access
    #39816238
greker
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
greker
Гость
Serg197311,

Этот блок берёт значение из excel, вставляет его в поле в ie, нажимает кнопку в ie для выгрузки данных, которые копируются в таблицу в excel
...
Рейтинг: 0 / 0
22.05.2019, 10:36
| Ответить | Цитировать | Написать  
VBA Excel в Access
    #39816239
greker
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
greker
Гость
alecko,

Блок закрывает активное окно ie.
Пути папок в самом коде верные, рабочие, просто путь в сетевой перс очень длинный, я его заменил немного.

Сам код рабочий, вопрос в адаптации его под vba access вместо excel
...
Рейтинг: 0 / 0
22.05.2019, 10:39
| Ответить | Цитировать | Написать  
VBA Excel в Access
    #39816254
greker
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
greker
Гость
Serg197311,

Насчёт просто так тоже обсуждаемо)
...
Рейтинг: 0 / 0
22.05.2019, 10:51
| Ответить | Цитировать | Написать  
VBA Excel в Access
    #39816263
Serg197311
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Serg197311
Участник
grekerSerg197311,

Этот блок берёт значение из excel,
Ну да, ну да....КАКОЕ ЗНАЧЕНИЕ???
и откуда его взять, если не использовать excell?
...
Рейтинг: 0 / 0
22.05.2019, 11:04
| Ответить | Цитировать | Написать  
VBA Excel в Access
    #39816266
Serg197311
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Serg197311
Участник
grekerSerg197311,

Насчёт просто так тоже обсуждаемо)
Не, это не ко мне....
...
Рейтинг: 0 / 0
22.05.2019, 11:04
| Ответить | Цитировать | Написать  
25 сообщений из 33, страница 1 из 2
  1  все
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / VBA Excel в Access
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
NoSQL.ru       Новости, Чат       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=45&tid=1610697]:
 0ms
get settings:
 8ms
get forum list:
 13ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 32ms
get topic data:
 10ms
get forum data:
 3ms
get page messages:
 58ms
get tp. blocked users:
 1ms
others: 302ms
total:  435ms
созд. / загр.: 435ms
x
x
Закрыть


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