Как сканировать документы непосредственно из Word 2016
Записки IT-шника
Здесь я хочу публиковать разные полезные вещи. Надеюсь, вам пригодится.
Шапка
Девиз
четверг, 16 января 2014 г.
Делаем кнопку сканера в Word 2010, 2013, 2016.
У многих есть сканер под рукой, есть Word 2010 , 2013, 2016, но нет способа отсканировать изображение и сразу получить его на странице. Почему же так получилось? Ведь раньше работа со сканером была в Word.. Майкрософт рекомендует нам использовать отдельную программульку из средств Office “Организатор клипов”.
- Итак, открываем Word, заходим в ” Файл- > Параметры -> Настройки ленты”
- Включаем вкладку “Разработчик” в окне справа, поставив галку
- Закрываем настройки ленты. В появившейся вкладке “Разработчик” жмем кнопку “Макросы” (слева вторая), откроется мастер добавления нового макроса
- Внизу в окне ” Макросы из: ” выбираем макросы из Normal.dot (общего шаблона) для того чтобы и в других документах он был
- Жмем “Создать” , откроется редактор VisualBasic
- Заменяем этим кодом все строчки
Sub InsertFromScanner()
On Error Resume Next
WordBasic.InsertImagerScan
End Sub
‘ Scan for Word 2013
‘ Author: Gu “nter Born www.borncity.de blog.borncity.com”
‘ Implements a Scan function in Word 2013
‘ ———————-
‘ For 64-bit app need declare with PtrSafe key:
‘ Private Declare PtrSafe Function GetTempPath Lib “kernel32”.
Private Declare Function GetTempPath Lib “kernel32” Alias “GetTempPathA” (ByVal nBufferLength As Long, ByVal lpBuffer As String) As Long
Private Function TempPath() As String
Const MaxPathLen = 256 ‘ Max path length
Dim FolderName As String ‘ Folder name
Dim ReturnVar As Long ‘ Return Value
FolderName = String(MaxPathLen, 0)
ReturnVar = GetTempPath(MaxPathLen, FolderName)
If ReturnVar <> 0 Then
TempPath = Left(FolderName, InStr(FolderName, Chr(0)) – 1)
Else
TempPath = vbNullString
End If
End Function
Sub Scan()
‘
‘ Scan Macro, to be invoked in Word
‘
On Error Resume Next
Dim objCommonDialog As WIA.CommonDialog
Dim objImage As WIA.ImageFile
Dim strDateiname
‘ instantiate Scan WIA objects
Set objCommonDialog = New WIA.CommonDialog
Set objImage = objCommonDialog.ShowAcquireImage
strDateiname = TempPath & “Scan.jpg” ‘ set temporary file
If Not objImage Is Nothing Then
Kill strDateiname
objImage.SaveFile strDateiname ‘ save into temp file
Selection.InlineShapes.AddPicture strDateiname ‘ insert in doc
Set objImage = Nothing
End If
Set objCommonDialog = Nothing
‘ MsgBox strDateiname ‘ test output
End Sub
- Заходим снова в настройки ленты, жмем кнопку “Создать вкладку” , и жмем кнопку “Создать группу”. Можете переименовать их по своему выбору, у меня – “Разное”.
- В левой панели “Выбрать команды:” ищем “макросы” и добавляем наш созданный макрос в новую пользовательскую группу.
Теперь кнопка может работать. Но может и ругнуться, если у вас отключены макрос ы в политике безопасности. Откройте “Разработчик->Безопасность макрос ов” и можете включить макрос ы как на рис. (стрелка 3.)
Все, “Кнопка” работает!
Но так оставлять не рекомендуется!
А для тех кому немного важна безопасность, следующий пункт.
3. Сертифицируем для локального пользователя.
Но пойдем дальше и отключим “все макросы, кроме макросов с цифровой подписью”!
Приступим:
Опять открываем “Разработчик->Visual Basic” , в меню ищем “Tools->Digital signature..” , откроется окошко “Цифровая подпись” , как видите там пусто.
Это потому, что на компьютере нет пользовательских сертификатов для VBA проектов MS Office.
Надо бы сделать…
Запускаем “Средство создания цифровых сертификатов для проектов VBA” из пакета программ MS Office. Запускаем и создаем сертификат, я его назвал “Local VBA cert” .
(Примечание: если данное средство недоступно, воспользуйтесь программой
“C:Program FilesMicrosoft OfficeOffice15SELFCERT.EXE ” или
“C:Program FilesMicrosoft OfficerootOffice16SELFCERT.EXE”)
В меню “Tools->Digital signature..”, в окошке “Цифровая подпись” жмем кнопку “Выбрать”.
Вуаля, найдется наш сертификат:
Казалось бы все, но нет! Жмем “подробности” в окне “Цифровая подпись” и убеждаемся, что доверия к сертификату пока нет:
Будем делать так, как подсказывает наша совесть – доверять. Жмем Win+R и запускаем оснастку управления сертификатами “certmgr.msc” .
Открываем “Личное->Сертификаты” , находим наш “Local VBA cert” и копируем его в два места:
“Доверенные корневые центры сертификации” и в “Доверенные издатели” .
Можете “отключить все макросы, кроме макросов с цифровой подписью” как на рис. в пункте 2 ., если конечно уже это не сделали. 🙂
Перезапускаем Word.
PS: если меняете что-то в коде макроса, не забывайте обновить созданную кнопку.
Как сканировать документы непосредственно из Word 2016
В Microsoft Office 2010 по какой-то причине разработчики решили убрать функцию прямого сканирования из Word, чем существенно усложнили задачу по вставке отсканированных изображений в тело документа. Чтобы вставить изображение со сканера, пользователю приходится передавать преобразованную в совместимый графический файл картинку на жесткий диск и только потом вставлять ее в Word-документ.
Отсутствие функции прямого сканирования может доставить массу неудобств, особенно если операцию приходится выполнять по нескольку раз в день.
В последующих версиях Microsoft Office 2013 и 2016 в отношении сканирования ничего не изменилось, сканы по-прежнему приходится вставлять опосредовано, но есть один способ, который может облегчить эту задачу.
Воспользовавшись небольшим макросом на языке VBA , вы можете создать собственную кнопку отправки изображений со сканера непосредственно в текстовый редактор. Способ этот работает в Word 2010, 2013 и 2016.
Первым делом скачайте файл с кодом скрипта по ссылке yadi.sk/i/N7uhShY6ZSVkUQ. Откройте Word, переключитесь на вкладку «Вид» и нажмите на панели инструментов Макросы -> Макросы.
В открывшемся окошке выберите в выпадающем меню «Макросы из» опцию «Normal.dotm (общего шаблона)», дайте макросу название WIA_Scan (если хотите дать другое имя, нужно будет изменить его в коде) и нажмите кнопку «Создать».
Откроется окно VB -редактора. Выберите в меню Tools -> References и отметьте птичкой в списке подключаемых компонентов библиотеку «Microsoft Windows Image Acquisition Library v2.0», именно она позволит Word получать доступ к внешним сканерам.
Сохраните настройку нажатием «OK», затем вставьте в поле редактора скопированный из скачанного ранее текстового файла код скрипта.
Закройте окно редактора.
Осталось только добавить кнопку на панель инструментов.
Откройте настройки ленты.
В выпадающем списке «Выбрать команды» укажите «Макросы», создайте новую группу с подходящим названием и поместите в нее созданный макрос.
Нажав «OK».
Вы увидите, что на ленте инструментов в выбранной вами категории появилась новая кнопка.
Если ее нажать, должно появиться стандартное окно Windows Image Acquisition, где вы сможете задать необходимые настройки и запустить процедуру сканирования, по завершении которой изображения автоматически будет вставлено в Word-документ.
Сканирование и изменение документа
После сканирования документа вы можете открыть документ в Word, чтобы изменить его. Способ зависит от того, какая версия Office установлена на вашем компьютере.
Сканирование документа в виде PDF-файла и его редактирование в Word
Совет: Преобразование лучше всего подходит для документов, которые в основном являются текстом.
Отсканируйте документ в соответствии с инструкциями для сканера и сохраните его на компьютере в виде PDF-файла.
В Word откройте меню файл > Открыть.
Перейдите к папке PDF-файла на компьютере и нажмите кнопку Открыть.
Появится сообщение о том, что Word преобразует PDF-файл в редактируемый документ Word. Нажмите кнопку ОК.
Полного постраничного совпадения преобразованного документа с исходным может и не быть. Например, разрывы строк и страниц могут находиться в других местах. Дополнительные сведения можно найти в разделе Открытие PDF-файлов в Word.
Дополнительные сведения
Параметр “от сканера или камеры” для сканирования документов и изображений недоступен в Word 2010. Вместо этого вы можете отсканировать документ с помощью сканера и сохранить файл на своем компьютере.
Шаг 1: Установка Microsoft Office Document Imaging
Программа Microsoft Office Document Imaging была удалена из Office 2010, однако вы можете установить ее на своем компьютере, используя один из вариантов, описанных в статье Установка приложения MODI для использования совместно с Microsoft Office 2010.
Шаг 2: создание документа, который можно изменить.
Отсканируйте документ, следуя инструкциям для сканера.
Прежде чем продолжить Преобразуйте файл, созданный сканером, в формат TIFF. Вы можете преобразовать файл с помощью Paint или другой программы.
Откройте Microsoft Office Document Imaging, выполнив поиск по Microsoft Office Document Imaging в меню “Пуск” Windows.
В меню Файл выберите команду Открыть.
Найдите отсканированный документ и нажмите кнопку Открыть.
После запуска Microsoft Office Document Imaging нажмите клавиши CTRL+A, чтобы выделить весь документ, а затем нажмите клавиши CTRL+C.
Запустите Microsoft Word.
На вкладке Файл нажмите кнопку Создать.
Дважды щелкните элемент Новый документ.
Нажмите клавиши CTRL+V, чтобы вставить содержимое отсканированного документа в новый файл.
Теперь у вас есть документ, который можно редактировать. Не забудьте сохранить новый файл, чтобы не потерять изменения.
Параметр “от сканера или камеры” для сканирования документов и изображений недоступен в Microsoft Office Word 2007. Вместо этого вы можете отсканировать документ с помощью сканера и сохранить файл на своем компьютере.
Шаг 1: Установка Microsoft Office Document Imaging
Завершите работу всех программ.
Совет: Перед завершением работы всех программ советуем распечатать этот раздел.
Откройте панель управления: щелкните правой кнопкой мыши кнопку Пуск в Windows и выберите пункт Панель управленияили введите в поле поиска Windows элемент Панель управления .
На панели управления щелкните Программы, а затем — Программы и компоненты.
Щелкните правой кнопкой мыши имя установленной версии Microsoft Office или щелкните правой кнопкой мыши Microsoft Office Word 2007 (в зависимости от того, установлено ли приложение Word как часть Office или как отдельная программа), а затем нажмите кнопку изменить.
Выберите Добавить или удалить компоненты, а затем нажмите кнопку Продолжить.
В разделе Параметры установки щелкните знак “плюс” (+) рядом с компонентом Средства Office.
Щелкните стрелку рядом с компонентом Microsoft Office Document Imaging, выберите параметр Запускать все с моего компьютера, а затем нажмите кнопку Продолжить.
Шаг 2: создание документа, который можно изменить.
Отсканируйте документ, следуя инструкциям для сканера.
Прежде чем продолжить Преобразуйте файл, созданный сканером, в формат TIFF. Вы можете преобразовать файл с помощью Paint или другой программы.
Откройте Microsoft Office Document Imaging, выполнив поиск по Microsoft Office Document Imaging в меню “Пуск” Windows.
В меню Файл выберите команду Открыть.
Найдите отсканированный документ и нажмите кнопку Открыть.
После запуска Microsoft Office Document Imaging нажмите клавиши CTRL+A, чтобы выделить весь документ, а затем нажмите клавиши CTRL+C.
Запустите Microsoft Office Word.
Нажмите кнопку Microsoft Office и выберите команду Создать.
Выберите пункт Новый документ, а затем — Создать.
Нажмите клавиши CTRL+V, чтобы вставить содержимое отсканированного документа в новый файл.
Теперь у вас есть документ, который можно редактировать. Не забудьте сохранить новый файл, чтобы не потерять изменения.
Как сканировать документы напрямую из Word 2016, 2013, 2010
Microsoft по какой-то причине убрала возможность сканировать напрямую из Word еще в версии Office 2010 (убрали вместе с полезной утилитой MODI — Microsoft Office Document). В более новых версиях Word 2013 и Word 2016 также нет кнопки сканирования напрямую из документа Word. Чтобы вставить изображение со сканера в Word приходится отсканированное изображение в графический файл на диск с помощью диалога утилиты сканирования от производителя сканера, а потом вставлять в документ Word сохраненный файл рисунка. Все это очень неудобно, особенно, когда приходится сканировать и вставлять в документы Word десятки изображений в день.
В этой статье мы рассмотрим способ добавления собственной кнопки запуска мастера сканирования в Word и код небольшого VBA макроса, позволяющий автоматически сканировать и вставлять изображения со сканера напрямую в Word. Данная инструкция применима к Word 2016, 2013 и 2010 (учитывайте различия в интерфейсе).
Итак, добавим новый макрос сканирования в наш Word 2016.
- Перейдите на вкладку Вид и выберите Макросы ->Макросы.
- В выпадающем списке Макросы из выберите Normal.dotm (общего шаблона). Укажите имя макроса WIA_Scan и нажмите кнопку Создать.
- В появившемся окне редактора Visual Basic выберите меню Tools ->References.
- В списке подключается библиотек выберите Microsoft Windows Image Acquisition Library v2.0. Данная библиотека Windows полволяет получать доступ к сканерам из кода VBA. Поддерживаются только драйвера сканеров с поддержкой WIA (Windows Imaging Architecture). Тем самым мы сможем использовать классы библиотеки сканирования WIA (wiaaut.dll) в VBA коде.
- Вставьте в редактор Visual Basic следующий VBA код: Sub WIA_Scan()
‘ WIA_Scan макрос для MS Office 2016/2013
On Error Resume Next
Dim objWIADialog As WIA.CommonDialog
Dim objScanImage As WIA.ImageFile
‘ инициализация объектов WIA
Set objWIADialog = New WIA.CommonDialog
Set objScanImage = objWIADialog.ShowAcquireImage
‘ путь к временному файлу
strDate = Environ(“temp”) & “Scan.jpg”
If Not objScanImage Is Nothing Then
‘удаляем старый файл
‘ сохраняем скан во временный файл
‘ вставляем файл Scan.jpg в документ Word
Set objScanImage = Nothing
Set objWIADialog = Nothing
Совет. В Word 2010 достаточно указать следующий код (однако в Word 2016 и 2013 он не работает, т.к. функция WordBasic.InsertImagerScan в Office 2010 была удалена).
On Error Resume Next
6. Теперь осталось добавить в ленту Word новый раздел и добавить в него наш макрос (я добавил кнопку сканирования на вкладку Вставка). Перейдите в настройки ленты, добавьте новую группу, в которую поместите макрос (вы можете изменить иконку кнопки).
Попробуйте теперь нажать на новую кнопку сканирования.
VBA макрос позволяет вызвать стандартное диалоговое окно интерфейса WIA. Если в системе имеется несколько источников WIA, вам будет предложено выбрать устройство, с которого нужно получить изображение.
После того, как вы выбрали устройство WIA, появится стандартное диалоговое окно сканера с настройками сканирования и окном предпросмотра.
После того, как вы выбрали настройки сканирования, нажмите кнопку Scan и дождитесь окончания сканирования.
Макрос автоматически сохранит отсканированное изображение во временный jpg файл и вставит его в открытый документ Word. В документе Word вы можете изменить размер и положение вставленной сканированной картинки.
Как вы видите, теперь вставлять изображение со сканера в документ Word стало гораздо удобнее.
Как сканировать документы напрямую из Word 2016, 2013, 2010
Microsoft по какой-то причине убрала возможность сканировать напрямую из Word еще в версии Office 2010 (убрали вместе с полезной утилитой MODI — Microsoft Office Document). В более новых версиях Word 2013 и Word 2016 также нет кнопки сканирования напрямую из документа Word. Чтобы вставить изображение со сканера в Word приходится отсканированное изображение в графический файл на диск с помощью диалога утилиты сканирования от производителя сканера, а потом вставлять в документ Word сохраненный файл рисунка. Все это очень неудобно, особенно, когда приходится сканировать и вставлять в документы Word десятки изображений в день.
В этой статье мы рассмотрим способ добавления собственной кнопки запуска мастера сканирования в Word и код небольшого VBA макроса, позволяющий автоматически сканировать и вставлять изображения со сканера напрямую в Word. Данная инструкция применима к Word 2016, 2013 и 2010 (учитывайте различия в интерфейсе).
Итак, добавим новый макрос сканирования в наш Word 2016.
- Перейдите на вкладку Вид и выберите Макросы ->Макросы.
- В выпадающем списке Макросы из выберите Normal.dotm (общего шаблона). Укажите имя макроса WIA_Scan и нажмите кнопку Создать.
- В появившемся окне редактора Visual Basic выберите меню Tools ->References.
References” srcset=”https://winitpro.ru/wp-content/uploads/2018/09/proekt-vba-tools-greater-references.png 523w, https://winitpro.ru/wp-content/uploads/2018/09/proekt-vba-tools-greater-references-300×122.png 300w” sizes=”(max-width: 523px) 100vw, 523px” />
- В списке подключается библиотек выберите Microsoft Windows Image Acquisition Library v2.0. Данная библиотека Windows полволяет получать доступ к сканерам из кода VBA. Поддерживаются только драйвера сканеров с поддержкой WIA (Windows Imaging Architecture). Тем самым мы сможем использовать классы библиотеки сканирования WIA (wiaaut.dll) в VBA коде.
- Вставьте в редактор Visual Basic следующий VBA код: Sub WIA_Scan()
‘
‘ WIA_Scan макрос для MS Office 2016/2013
‘
‘
On Error Resume Next
Dim objWIADialog As WIA.CommonDialog
Dim objScanImage As WIA.ImageFile
Dim strDate
‘ инициализация объектов WIA
Set objWIADialog = New WIA.CommonDialog
Set objScanImage = objWIADialog.ShowAcquireImage
‘ путь к временному файлу
strDate = Environ(“temp”) & “Scan.jpg”
If Not objScanImage Is Nothing Then
‘удаляем старый файл
Kill strDate
‘ сохраняем скан во временный файл
objScanImage.SaveFile strDate
‘ вставляем файл Scan.jpg в документ Word
Selection.InlineShapes.AddPicture strDate
Set objScanImage = Nothing
End If
Set objWIADialog = Nothing
End Sub
Попробуйте теперь нажать на новую кнопку сканирования.
VBA макрос позволяет вызвать стандартное диалоговое окно интерфейса WIA. Если в системе имеется несколько источников WIA, вам будет предложено выбрать устройство, с которого нужно получить изображение.
После того, как вы выбрали устройство WIA, появится стандартное диалоговое окно сканера с настройками сканирования и окном предпросмотра.
После того, как вы выбрали настройки сканирования, нажмите кнопку Scan и дождитесь окончания сканирования.
Макрос автоматически сохранит отсканированное изображение во временный jpg файл и вставит его в открытый документ Word. В документе Word вы можете изменить размер и положение вставленной сканированной картинки.
Как вы видите, теперь вставлять изображение со сканера в документ Word стало гораздо удобнее.
Как отсканировать документ в Word?
Отсканировать текстовые документы или изображения можно на сканере или многофункциональном устройстве. Если таковых нет, тогда подойдут мобильные гаджеты iPhone или iPad. В этой статье мы подробно рассмотрим, как отсканировать документ в Ворде с возможностью последующего распознавания.
Два этапа сканирования
- Сканирование. Устройство делает фотографию документа и сохраняет изображение в нужном формате – .jpg, .gif и т.д. Скан-копию можно сохранить на компьютере или съемном носителе.
- Распознавание. Преобразование сфотографированного текста в обычный для сохранения и редактирования в Ворде. Сам процесс распознания проходит без участия мфу, с помощью специального программного обеспечения. Самой удобной считается Adobe FineReader.
Процесс сканирования
- Открываем настройки сканера – Пуск – «Устройства и принтеры» – иконка с подключенным оборудованием.
- Кладем документ текстом вниз, чтобы края не выходили за границы рабочей зоны сканера.
- Крышку сканера закрываем и плотно прижимаем к документу, чтобы исключить попадание света.
- Устанавливаем разрешение – чем оно выше, тем лучше качество изображения. Для текстовых документов вполне хватит 400-500. Цвет – черно-белый. Размер изображения – А4. Жмем «Сканировать» и указываем место, куда сохранить готовый файл.
Распознавание текста в Word
Запустите программу FineReader на своем ПК. Она имеет такой вид:
Установите язык, на котором напечатан текст. Если в нем встречаются 2 и больше языков, тогда отметьте это в настройках.
Перейдите в опцию «Распознать» – «Открыть изображение». Выберите нужный файл.
На экране появятся изображения скан-копий. Справа будет результат распознавания.
Чтобы развернуть скан-копию нужно воспользоваться соответствующими кнопками. Затем указать программе, какую часть необходимо распознать и какой формат данных получится на выходе – табличка, картинка, текст. Для каждого типа есть свои иконки. Например, в документе текстовые части будут выделены зеленым, диаграммы – красным, таблицы – синим.
После подготовки всех страниц их нужно выделить с помощью сочетания клавиш Ctrl+A и нажать на опцию «Распознать». Сохраняем полученный документ Word нажатием кнопки «Сохранить» в верхнем меню.
После сохранения полученный документ Word можно сразу же редактировать, вносить любые дополнения в текст.