Сделать фото с веб-камеры и сохранить на диск

@Derjzemit · Регистрация: 26.02.2014

Студворк — интернет-сервис помощи студентам

Добрый день уважаемые форумчане. Пища для размышления: кто-нибудь видел или знает как можно реализовать на VBA, что бы при определенных действиях веб-камера захватывала изображение и сохраняла на компьютер? По идее драйвер стандартный для всех вебок и в теории (как я думаю) можно как то его вызвать с VBA. В инэте инфа вроде бы есть, буду тоже копаться, но может кто-нибудь знает.

@Максим Колесник · 31.05.2026, 13:10

Адаптировал под
Вин 10 x64
Оффис 2019 x64

@Uniqsander · 07.06.2026, 11:26

ругается на эту строку, в чем может быть проблема? файл с картинкой создает но черный

Image1.Picture = LoadPicture(ThisWorkbook.Path & "\VIDEO.BMP")

@Максим Колесник · 19.06.2026, 22:58

У меня так было когда камера задействована другим приложением. Отключите /закройте программы которые могут использовать камеру.

I can · 19.06.2026, 23:19

Сообщение от Uniqsander

ругается на эту строку

Вы за 10 лет не решили вопрос?

@Максим Колесник · 20.06.2026, 08:03

У меня работает. Это было 3 недели назад. Позже как доберусь до компьютера протестирую. Эта строка загружает картинку в userform из файла созданного камерой. Попробуйте на другом рабочем месте . У меня ноут бук с встроенной камерой черным было когда камера занята в ЯндексТелемост.

Добавлено через 3 минуты
Попробуйте этой строкой загрузить другой созданный файл bmp. Если проблема сохранится то дело в строке. Если нет то надо смотреть что создаёт файл VideoBMP

Новые блоги и статьи Все статьи Все блоги /
Где деньги лежат kumehtar 02.07.2026 Это - японская подводная лодка I-52 (тип C2, кодовое имя Momi) вышла из Японии в марте 1944 года с миссией в оккупированную немцами Францию (Лорьян). Это была одна из «Янаги»-миссий по обмену. . .	Krabik для WoW 3.3.5a, многоязычный AmbA 02.07.2026 Допилил бота, думаю что окончательно. Изменения: - добавлена многоязычность - добавлено снятие скриншотов - добавлено поддержание бафов хождения по воде (для жреца, дк и шамана) - и так, по. . .	Алиса нашла кучу ошибок компиляции и запуска в проекте, который без проблем компилировался и запускался))) anaschu 30.06.2026 Я пока посмеюся, но завтра проверю. А вообще интерсно. Дал алисе файл, в котором точно нет ошибок компиляции и запуска, и попросил их найти. Нашла кучу))) Критические ошибки, мешающие компиляции и. . .	сукцессия 16. Общий обзор, в основном что бы другие ии поняли anaschu 29.06.2026 # Передаточный документ: модель микоризной сукцессии (для нового чата) Этот документ предназначен для того, чтобы новый чат Claude мог продолжить работу без необходимости заново разбираться в. . .
сукцессия 15 неявная схема anaschu 29.06.2026 Алиса Калибровка параметров симбиотической модели: технический обзор Содержание: Введение Постановка проблемы Технические аспекты реализации Процесс внедрения изменений	сукцессия 14. Обновленная схема модели anaschu 28.06.2026 ГЛОБАЛЬНАЯ ОПИСАТЕЛЬНАЯ СПЕЦИФИКАЦИЯ ЭКОСИСТЕМНОЙ МОДЕЛИ «SOIL CHEMISTRY & MYCORRHIZA 2. 0» https:/ / ibb. co/ NnkGpfMd Представленная интегрированная схема описывает непрерывную нелинейную. . .	сукцессия 13. Питон модель трехзонного мицелия, пока что в основном арбускулярного anaschu 28.06.2026 ## Разработка агентной модели микоризной сукцессии: от выявления артефактов к созданию комплексной системы ### Аннотация Представлено исследование по разработке агентной модели микоризной. . .	сукцессия 12. краткий список проверок модели перед запуском. anaschu 27.06.2026 Скрытые отказы в моделях систем динамики (SD-models) экологических систем: два случая из практики Контекст Разбирался прототип модели систем динамики (SD-модели) микоризной сукцессии: пять. . .

@Derjzemit 269 / 14 / 0 Регистрация: 26.02.2014 Сообщений: 142

	Сделать фото с веб-камеры и сохранить на диск 02.04.2014, 11:29. Показов 15576. Ответов 44 Метки нет (Все метки) Добрый день уважаемые форумчане. Пища для размышления: кто-нибудь видел или знает как можно реализовать на VBA, что бы при определенных действиях веб-камера захватывала изображение и сохраняла на компьютер? По идее драйвер стандартный для всех вебок и в теории (как я думаю) можно как то его вызвать с VBA. В инэте инфа вроде бы есть, буду тоже копаться, но может кто-нибудь знает. 0

@Uniqsander 0 / 0 / 0 Регистрация: 30.03.2016 Сообщений: 6
	07.06.2026, 11:26
	ругается на эту строку, в чем может быть проблема? файл с картинкой создает но черный Image1.Picture = LoadPicture(ThisWorkbook.Path & "\VIDEO.BMP") 0

@Максим Колесник 1 / 1 / 0 Регистрация: 31.05.2026 Сообщений: 3
	19.06.2026, 22:58
	У меня так было когда камера задействована другим приложением. Отключите /закройте программы которые могут использовать камеру. 0

@Максим Колесник 1 / 1 / 0 Регистрация: 31.05.2026 Сообщений: 3
	20.06.2026, 08:03
	У меня работает. Это было 3 недели назад. Позже как доберусь до компьютера протестирую. Эта строка загружает картинку в userform из файла созданного камерой. Попробуйте на другом рабочем месте . У меня ноут бук с встроенной камерой черным было когда камера занята в ЯндексТелемост. Добавлено через 3 минуты Попробуйте этой строкой загрузить другой созданный файл bmp. Если проблема сохранится то дело в строке. Если нет то надо смотреть что создаёт файл VideoBMP 0