Перейти до основного матеріалу

Як вставити зображення або зображення зі сканера або камери в Word?

Автор: Силувій Остання зміна: 2020-05-29

Ви можете зіткнутися з проблемою із вставкою зображень зі сканера чи камери у програмі Word 2007 та пізнішої версії, оскільки Microsoft видалила можливість вставляти зображення зі сканера чи камери, яка була тільки що доступна у програмі Word 2003. Цей посібник покаже вам кілька способів вставлення зображень зі сканера чи камери у програмі Word 2007 та пізнішої версії.

Вставте зображення зі сканера або камери в Word за допомогою ярликів

Вставте зображення зі сканера або камери в Word, створивши макрос

Вставте зображення зі сканера чи камери в Word за допомогою Kutools for Word


Вставте зображення зі сканера або камери в Word за допомогою ярликів

Якщо ви використовуєте Word 2007 або Word 2010, ви можете швидко отримати доступ до Вставте зображення зі сканера або камери утиліта наступним чином:

1. Будь ласка, спочатку натисніть інший введіть Word 2007 або Word 2010, а потім продовжуйте вводити послідовність клавіш меню ips
на клавіатурі, і на ньому відображатиметься Вставте зображення зі сканера або камери діалог

Після набору тексту інший перший і i клавіша, ви побачите a Супер порада наступним чином:

Після набору тексту p та s клавіша, вона з'явиться Вставте зображення зі сканера або камери діалог

Потім ви можете вибрати зображення з пристрою через Вставте зображення зі сканера або камери діалог


Вставте зображення зі сканера або камери в Word, створивши макрос

1. По-перше, вам слід створити файл Macro для вашого документа Word. Клацніть вид > Макрос > Переглянути макроси. Дивіться знімок екрана:

doc вставити зображення зі сканера 1

2. Після клацання Переглянути макроси, там буде а Макрос спливаюче діалогове вікно. Під Назва макросу, введіть "сканування”; виберіть Звичайний. dotm (глобальний шаблон) від Макроси в випадаючий список. Потім клацніть Створювати. Дивіться знімок екрана:

doc вставити зображення зі сканера 2

3. А тепер, a Вікно Microsoft Visual Basic для програм з'явиться, скопіюйте та вставте наступний код у діалогове вікно між Підсканування та Кінець суб лінії

Код у 2013 році та пізнішої версії:

On Error Resume Next
     Dim objCommonDialog As WIA.CommonDialog
     Dim objImage As WIA.ImageFile
     Dim strDateiname
     Set objCommonDialog = New WIA.CommonDialog
     Set objImage = objCommonDialog.ShowAcquireImage
     strDateiname = Environ("temp") & "\Scan.jpg"
     If Not objImage Is Nothing Then
       Kill strDateiname
       objImage.SaveFile strDateiname
       Selection.InlineShapes.AddPicture strDateiname
       Set objImage = Nothing
     End If
     Set objCommonDialog = Nothing

doc вставити зображення зі сканера 3

Кодекс у 2007 та 2010 роках:

On Error Resume Next
WordBasic.InsertImagerScan

doc вставити зображення зі сканера 4

4. Тепер слід натиснути Tools > посилання йти до Список літератури - Звичайний діалоговому вікні, а потім виберіть і поставте галочку Бібліотека збору зображень Microsoft Windows варіант, див. скріншот:

doc вставити зображення зі сканера 5

5. Потім натисніть OK щоб закрити діалогове вікно, і тепер натисніть, будь ласка F5 ключ для запуску цього коду.

примітки: Переконайтесь, що сканер увімкнено та підключено до комп’ютера


Вставте зображення зі сканера чи камери в Word за допомогою Kutools for Word

з Kutools для WordАвтора З сканера або камери утиліта, ви можете позбутися цих надокучливих операцій і легко вставити зображення зі сканера або камери в word.

Kutools для Word : з більш ніж 100 зручними надбудовами Word, які можна спробувати без обмежень протягом 60 днів. 

1. Наведіть курсор на те місце, куди потрібно вставити малюнок.

2. Тоді, будь ласка, застосуйте цю утиліту, натиснувши Кутулс > більше > З сканера або камери. Дивіться знімок екрана:

3. Після клацання З сканера або камери, він відображатиме Вставте зображення зі сканера або камери діалог

В: Під Пристрій, виберіть відповідний пристрій, з якого потрібно імпортувати зображення.

B: Виберіть будь-який дозвіл Ви хочете.

C: Клацніть Insert щоб почати вставляти.

примітки: Ця утиліта не може бути застосована для Word 2013 та пізніших версій.

Натисніть, щоб завантажити Kutools для Word і безкоштовну пробну версію зараз!

Для отримання більш детальної інформації про Kutools для WordАвтора З сканера або камери утиліта, відвідайте: З сканера або камери.


Найкращі інструменти продуктивності офісу

Kutools для Word - Підніміть свій досвід Word із Over 100 Чудові особливості!

🤖 Kutools AI Assistant: змініть свій текст за допомогою ШІ - Створення вмісту  /  Переписати текст  /  Узагальнити документи  /  Звертайтеся за інформацією на основі Документа, все в Word

📘 Майстерність документів: Розділити сторінки  /  Об’єднати документи  /  Експортувати вибране в різні формати (PDF/TXT/DOC/HTML...)  /  Пакетне перетворення в PDF  /  Експортувати сторінки як зображення  /  Друк кількох файлів одночасно...

Редагування змісту: Пакетний пошук та заміна між кількома файлами  /  Змінити розмір усіх зображень  /  Транспонування рядків і стовпців таблиці  /  Перетворити таблицю в текст...

🧹 Очищення без зусиль: Змітати Зайві простори  /  Розбиття розділів  /  Усі заголовки  /  Текстові поля  /  Гіперпосилання  / Щоб отримати більше інструментів для видалення, відвідайте наш сайт Вилучити групу...

Творчі вставки: Вставити Роздільники тисяч  /  Прапорці  /  радіо кнопки  /  QR-код  /  Штрих-код  /  Таблиця діагональних ліній  /  Заголовок рівняння  /  Підпис зображення  /  Заголовок таблиці  /  Кілька зображень  / Дізнайтеся більше в Вставити групу...

???? Точність вибору: Точне визначення конкретні сторінки  /  Таблиці  /  форми  /  заголовок абзаців  / Покращте навігацію за допомогою більше Виберіть функції...

Покращення зірок: Швидка навігація до будь-якого місця  /  автоматичне вставлення повторюваного тексту  /  плавно перемикатися між вікнами документів  /  11 Інструменти перетворення...

👉 Хочете спробувати ці функції? Kutools для Word пропонує a 60-денна безкоштовна пробна версія, без обмежень! ????
 
Comments (6)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
This should work in most versions 64 or 32 bit Add reference to Microsoft Windows Image Acquisition x2.0 Sub Scan() Dim objCommonDialog As WIA.CommonDialog Dim objImage As WIA.ImageFile Dim strScanName As String ' instantiate Scan WIA objects Set objCommonDialog = New WIA.CommonDialog Set objImage = objCommonDialog.ShowAcquireImage strScanName = Environ$("TEMP") & "\Scan.jpg" ' set temporary file If Not objImage Is Nothing Then If Dir(strScanName) "" Then Kill strScanName objImage.SaveFile strScanName 'save into temp file DoEvents 'Word Selection.InlineShapes.AddPicture strScanName ' insert in doc End If End Sub
This comment was minimized by the moderator on the site
I have followed ALL the instructions for loading a picture from my scanner and all that happens is a empty box outline appears on my Word 10 page?? Your help is sort. David 76 yrs young
This comment was minimized by the moderator on the site
Wow! supereasy. Thank you!
This comment was minimized by the moderator on the site
Thanks a lot for this very helpful article! The keyboard shortcut and the macro both work like a charm!
This comment was minimized by the moderator on the site
such an amazing and helpful.
This comment was minimized by the moderator on the site
So I created a Macro using the code you supplied, thank you, i was wondering if there was a way to go further and include code for the selection that you make once that Insert Image window pops up. Thanks
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations