powered by simpleCommunicator - 2.0.58     © 2025 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Нужна помощь в VB
6 сообщений из 6, страница 1 из 1
Нужна помощь в VB
    #38201946
Kyle21
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Подключение к БД Access из макроса Excel
' FullPathMDB - полный путь к БД с именем файла ("C:\Temp\mydb.mdb")
Set DatConct = CreateObject("ADODB.Connection")
DatConct.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + FullPathMDB

' RptSheet - название листа Excel

Как в переменную FullPathMDB подставить значение ячейки "B1" из листа RptSheet?
...
Рейтинг: 0 / 0
Нужна помощь в VB
    #38201959
Фотография lbppb
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Kyle21,

Код: vbnet
1.
ThisWorkbook.Sheets("RptSheet").Range("B1").Value
...
Рейтинг: 0 / 0
Нужна помощь в VB
    #38201963
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Код: vbnet
1.
FullPathMDB=WorkSheets("RptSheet").Range("B1").Value



ЗЫ:
Kyle21' RptSheet - название листа Excel
это название листа или переменная, в которой хранится название листа? во втором случае так:
Код: vbnet
1.
FullPathMDB=WorkSheets(RptSheet).Range("B1").Value
...
Рейтинг: 0 / 0
Нужна помощь в VB
    #38202004
Kyle21
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
RptSheet название
...
Рейтинг: 0 / 0
Нужна помощь в VB
    #38202012
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Kyle21RptSheet названиесравни:Kyle21FullPathMDB - полный путь к БД
RptSheet - название листа Excelвишь как, фразы одинаковые, а суть вкладываешь разную ))
...
Рейтинг: 0 / 0
Нужна помощь в VB
    #38202031
Kyle21
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
понял, спасибо!
...
Рейтинг: 0 / 0
6 сообщений из 6, страница 1 из 1
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Нужна помощь в VB
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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