Прескочи на основното съдържание

Как да вмъкна картина или изображение от скенер или камера в Word?

Автор: Силувия Последна промяна: 2020-05-29

Може да имате проблеми с вмъкването на картини от скенер или камера в Word 2007 и по-нова версия, тъй като Microsoft премахна опцията за вмъкване на картина от скенер или камера, която току-що беше налична в Word 2003. Този урок ще ви покаже няколко метода за вмъкване на картини от скенер или камера в Word 2007 и по-нова версия.

Вмъкнете картина от скенер или камера в Word с помощта на преки пътища

Вмъкнете картина от скенер или камера в Word, като създадете макрос

Вмъкнете картина от скенер или камера в Word с Kutools за Word


Вмъкнете картина от скенер или камера в Word с помощта на преки пътища

Ако използвате Word 2007 или Word 2010, можете бързо да получите достъп до Вмъкване на снимка от скенер или камера полезност, както следва:

1. Моля, първо натиснете Друг клавиш в Word 2007 или Word 2010 и след това продължете да въвеждате последователност от клавиши за меню ips
на вашата клавиатура и ще покаже Вмъкване на снимка от скенер или камера диалогов прозорец.

След написването Друг първо и i ключ, ще видите a Супер съвет , както следва:

След написването p намлява s ключ, той ще изскочи Вмъкване на снимка от скенер или камера диалогов прозорец.

След това можете да изберете картина от устройството чрез Вмъкване на снимка от скенер или камера диалогов прозорец.


Вмъкнете картина от скенер или камера в Word, като създадете макрос

1. Първо, трябва да създадете a Макро за вашия Word документ. Моля щракнете Гледка > Макроси > Преглед на макроси. Вижте екранна снимка:

doc вмъкване на изображение от скенер 1

2. След щракване Преглед на макроси, ще има Макроси появява се диалогов прозорец. Под Име на макрос, напишете в "Сканиране”; изберете нормално. dotm (глобален шаблон) от Макроси в падащ списък. След това щракнете Създаване на. Вижте екранна снимка:

doc вмъкване на изображение от скенер 2

3. И сега, а Прозорец на 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. Сега трябва да щракнете Инструменти > Препратки за да отидете на Референции-Нормално диалогов прозорец, след това изберете и проверете Библиотека за получаване на изображения на Microsoft Windows опция, вижте екранна снимка:

doc вмъкване на изображение от скенер 5

5, След това кликнете OK за да затворите диалоговия прозорец, а сега, моля, натиснете F5 ключ за изпълнение на този код.

Забележка: Уверете се, че скенерът е включен и свързан към компютъра


Вмъкнете картина от скенер или камера в Word с Kutools за Word

с Kutools за WordЕ От скенер или камера помощна програма, можете да се отървете от тези досадни операции и лесно да вмъкнете картина от скенер или камера в word.

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

1. Поставете курсора там, където искате да вмъкнете картина.

2. След това, моля, приложете тази помощна програма, като щракнете Kutools > Повече > От скенер или камера. Вижте екранна снимка:

3. След щракване От скенер или камера, той ще покаже Вмъкване на снимка от скенер или камера диалогов прозорец.

О: Под Приспособление, изберете свързаното устройство, от което искате да импортирате картина.

Б: Изберете който и да е Резолюция искаш.

C: Щракнете Поставете за да започнете да вмъквате.

Забележка: Тази помощна програма не може да се прилага за Word 2013 и по-нова версия.

Щракнете, за да изтеглите Kutools за Word и безплатна пробна версия сега!

За по-подробна информация за Kutools за WordЕ От скенер или камера помощна програма, моля посетете: От скенер или камера.


Най-добрите инструменти за продуктивност в офиса

Kutools за Word - Подобрете своя Word опит с Over 100 Забележителни функции!

🤖 Kutools AI Assistant: Преобразувайте писането си с AI - Генериране на съдържание  /  Пренаписване на текст  /  Обобщаване на документи  /  Запитване за информация въз основа на Документ, всичко това в Word

📘 Владеене на документи: Разделяне на страници  /  Обединяване на документи  /  Експортиране на селекция в различни формати (PDF/TXT/DOC/HTML...)  /  Пакетно конвертиране в PDF  /  Експортиране на страници като изображения  /  Отпечатайте няколко файла наведнъж...

Редактиране на съдържанието: Пакетно намиране и замяна в множество файлове  /  Преоразмеряване на всички снимки  /  Транспониране на редовете и колоните на таблицата  /  Преобразуване на таблица в текст...

🧹 Почистване без усилие: Изметете Допълнителни пространства  /  Прекъсвания на раздели  /  Всички заглавки  /  Текстови полета  /  Хипервръзки  / За повече инструменти за премахване се насочете към нашия Премахване на група...

Творчески вложки: Вмъкване Хилядни разделители  /  Квадратчета  /  Радио бутони  /  QR Code  /  Баркод  /  Таблица с диагонални линии  /  Надпис на уравнение  /  Надпис на изображението  /  Надпис на таблица  /  Множество снимки  / Открийте повече в Вмъкване на група...

🔍 Прецизни селекции: Точна точка конкретни страници  /  таблици  /  форми  /  заглавни параграфи  / Подобрете навигацията с още Изберете функции...

Звездни подобрения: Навигирайте бързо до всяко място  /  автоматично вмъкване на повтарящ се текст  /  безпроблемно превключване между прозорците на документи  /  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