Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Как получить значение ключа реестра из Excell? / 4 сообщений из 4, страница 1 из 1
27.03.2007, 11:04:10
    #34417619
p2x4
p2x4
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как получить значение ключа реестра из Excell?
Здравствуйте,

прошу ответить на ряд вопросов, котроые у меня сопряжены с длительным копанием в книгах, а программисты наверняка знают по памяти.

Макрос под Excell ХР
1. Как получить значение ключа реестра
2. Проверить наличие файла на диске
3. Запуск ехе с параметрами из макроса
4. Закрытие Excell по завершении

Спасибо

П.С. подскажите хотя бы какие функции и обьекты использовать, где можно примерчики посмотреть.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
27.03.2007, 12:52:51
    #34418026
vbapro
vbapro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как получить значение ключа реестра из Excell?
1
2
3: Shell(strEXEFileLocation & " " & strCommandLine)
4: Application.Quit
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
27.03.2007, 13:26:36
    #34418175
vkodor
vkodor
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как получить значение ключа реестра из Excell?
1.
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
Private Declare Function RegOpenKeyA Lib "ADVAPI32.DLL" _
    (ByVal hKey As Long, ByVal sSubKey As String, _
    ByRef hkeyResult As Long) As Long

Private Declare Function RegCloseKey Lib "ADVAPI32.DLL" _
    (ByVal hKey As Long) As Long

Private Declare Function RegSetValueExA Lib "ADVAPI32.DLL" _
    (ByVal hKey As Long, ByVal sValueName As String, _
    ByVal dwReserved As Long, ByVal dwType As Long, _
    ByVal sValue As String, ByVal dwSize As Long) As Long

Private Declare Function RegCreateKeyA Lib "ADVAPI32.DLL" _
    (ByVal hKey As Long, ByVal sSubKey As String, _
    ByRef hkeyResult As Long) As Long

Private Declare Function RegQueryValueExA Lib "ADVAPI32.DLL" _
    (ByVal hKey As Long, ByVal sValueName As String, _
    ByVal dwReserved As Long, ByRef lValueType As Long, _
    ByVal sValue As String, ByRef lResultLen As Long) As Long
2. if Dir("...") <> 0
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
27.03.2007, 17:06:27
    #34419142
p2x4
p2x4
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как получить значение ключа реестра из Excell?
Спасибо за исчерпывающие ответы
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Как получить значение ключа реестра из Excell? / 4 сообщений из 4, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 295ms
Закрыть
start [/forum/topic.php?fid=61&mobile=1&tid=2183236]:
 0ms
get settings:
 8ms
get forum list:
 16ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 23ms
get topic data:
 8ms
get forum data:
 2ms
get page messages:
 34ms
get tp. blocked users:
 1ms
others: 197ms
total:  295ms
x
x
Закрыть


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