Win Api & VBA

23.04.12

Интеграция - Внешние источники данных

Как уменьшить количество строк кода при вызове функций Windows Api  в модуле VBA? Помочь решить этот вопрос может библиотека типов Win32.tlb от Брюса Мак-Кинни (Bruce McKinney).

Скачать файл

ВНИМАНИЕ: Файлы из Базы знаний - это исходный код разработки. Это примеры решения задач, шаблоны, заготовки, "строительные материалы" для учетной системы. Файлы ориентированы на специалистов 1С, которые могут разобраться в коде и оптимизировать программу для запуска в базе данных. Гарантии работоспособности нет. Возврата нет. Технической поддержки нет.

Наименование По подписке [?] Купить один файл
Библиотека типов
.rar 97,34Kb
17
17 Скачать (1 SM) Купить за 1 850 руб.

Данная библиотека была собрана для упрощения вызова функций API  в VB4  в далеком 1995 году. Но, несмотря на такой солидный возраст ей можно с успехом пользоваться и сейчас в модулях VBA при обращении к функциям API. 

Рассмотрим пример использования библиотеки в Excel. Регистрация  библиотеки в системе не требуется, поэтому копируем библиотеку в любую папку, например,  в папку,  где расположена книга Excel или в папку Windows. Открываем книгу, переходим в редактор кода (Alt+F11), далее меню Tools->References, и в диалоговом окне нажав кнопку Browse выбираем файл Win32.tlb в искомой папке.Связь с библиотекой установлена, теперь можно посмотреть объекты данной библиотеки – меню View -> Object Browser (F2), в  списке библиотек выбираем Win.

Теперь, собственно пример использования библиотеки – вызов функции FindWindow (поиск окна верхнего уровня).

Private Sub StartCalculator()
'Запуск калькулятора
Dim hProg As Long, ret As Long, hwnd As Long
On Error Resume Next
  hwnd = FindWindow("SciCalc", sNullStr)
  If hwnd > 0 Then
    Call SetForegroundWindow(hwnd)
  Else
    hProg = Shell("calc.exe ", vbNormalFocus)
  End If
End Sub 

Здесь использованы две функции из библиотеки типов:  FindWindow – происк окна верхнего уровня по имени класса (можно искать и по заголовку окна, используется второй параметр функции), и SetForegroundWindow – перевод найденного окна на передний план. Как видно из примера, использование библиотеки типов позволяет вызывать функции Win Api, как встроенные функции VBA.

Приложение содержит библиотеку Win32.tlb и книгу Excel c тремя примерами: чтение, запись ini- файлов и чтение ключей реестра. 

 

См. также

Зарплата Внешние источники данных Бюджетный учет Перенос данных 1C Системный администратор Программист Платформа 1С v8.3 Сложные периодические расчеты 1С:Зарплата и кадры государственного учреждения 3 Государственные, бюджетные структуры Россия Бухгалтерский учет Бюджетный учет Платные (руб)

Обработка позволяет перенести кадровую информацию и данные по заработной плате, фактическим удержаниям, НДФЛ, вычетам, страховым взносам из базы Парус 8 учреждений (далее Парус) в конфигурацию 1С:Зарплата и кадры государственного учреждения ред. 3 (далее 1С) и начать с ней работать с любого месяца года.

120000 руб.

19.08.2020    26437    26    1    

28

Внешние источники данных Программист Бизнес-аналитик Пользователь Платформа 1С v8.3 Управляемые формы Анализ и прогнозирование 1C:Бухгалтерия Узбекистан Беларусь Кыргызстан Молдова Россия Казахстан Платные (руб)

Готовое решение для автоматической выгрузки данных из 1С 8.3 в базу данных ClickHouse, PostgreSQL или Microsoft SQL для работы с данными 1С в BI-системах. «Экстрактор данных 1С в BI» работает со всеми типовыми и нестандартными конфигурациями 1С 8.3 и упрощает работу бизнес-аналитиков. Благодаря этому решению, специалистам не требуется быть программистами, чтобы легко получать данные из 1С в вашей BI-системе.

28500 руб.

15.11.2022    22922    24    49    

39

Внешние источники данных Платформа 1С v8.3 1C:Бухгалтерия Платные (руб)

Готовая интеграция для управляемых форм. Встраивается в вашу 1С как расширение. Реализует автоматический обмен данными между 1С (1С:Фитнес клуб и аналогов) и СКУД RusGuard, автоматизирует бизнес-процессы по созданию и учету сотрудников в СКУД. Значительно упрощает работу специалистов отдела кадров и отдела безопасности: избавляет от двойного ввода информации в 1С и СКУД.

94999 руб.

11.07.2024    1300    1    0    

3

Розничная торговля Внешние источники данных Файловый обмен (TXT, XML, DBF), FTP Системный администратор Программист Бухгалтерский учет 1С:Бухгалтерия 3.0 Фармацевтика, аптеки Россия Бухгалтерский учет Платные (руб)

Внешняя обработка загрузки данных из файла-выгрузки, сформированного в программе F3 TAIL версии 3.4 (и выше) или еФарма версии 2.1, в базу конфигурации 1С: Бухгалтерия предприятия 8, ред. 3.0 (базовая, ПРОФ, КОРП, ФРЕШ).

13200 руб.

19.12.2016    48652    98    106    

70

Зарплата Внешние источники данных Программист Платформа 1С v8.3 Сложные периодические расчеты 1С:Зарплата и Управление Персоналом 3.x Россия Бухгалтерский учет Платные (руб)

Обработка позволяет перенести кадровую информацию и данные по заработной плате, фактическим удержаниям, НДФЛ, вычетам, страховым взносам из базы Парус 8 организаций (далее Парус) в конфигурацию 1С:Зарплата и управление персоналом, ред. 3 (далее 1С) и начать с ней работать с любого месяца года.

120000 руб.

07.06.2021    13738    2    3    

3

Внешние источники данных Зарплата Бюджетный учет Программист Бухгалтер Платформа 1С v8.3 Сложные периодические расчеты 1С:Зарплата и кадры государственного учреждения 3 Государственные, бюджетные структуры Россия Бухгалтерский учет Бюджетный учет Платные (руб)

Обработка позволяет перенести кадровую информацию и данные по заработной плате, фактическим удержаниям, НДФЛ, вычетам, страховым взносам из базы Парус 7.хх учреждений (далее Парус) в конфигурацию 1С:Зарплата и кадры государственного учреждения ред. 3 (далее 1С) и начать с ней работать с любого месяца года.

84000 руб.

24.04.2017    52670    104    165    

91
Оставьте свое сообщение