{"id":713,"date":"2016-03-04T22:34:24","date_gmt":"2016-03-04T22:34:24","guid":{"rendered":"http:\/\/borncity.com\/win\/?p=713"},"modified":"2020-12-13T00:09:03","modified_gmt":"2020-12-12T23:09:03","slug":"scanning-in-word-20132016-part-ii","status":"publish","type":"post","link":"https:\/\/borncity.com\/win\/2016\/03\/04\/scanning-in-word-20132016-part-ii\/","title":{"rendered":"Scanning in Word 2013\/2016 &ndash; Part II"},"content":{"rendered":"<p><img loading=\"lazy\" decoding=\"async\" style=\"float: left; margin: 0px 10px 0px 0px; display: inline\" src=\"http:\/\/www.borncity.com\/blog\/wp-content\/uploads\/2012\/07\/Office1.jpg\" width=\"55\" align=\"left\" height=\"60\">[<a href=\"http:\/\/www.borncity.com\/blog\/2016\/03\/03\/scanfunktion-in-word-20132016-nachrsten-teil-1\/\">German<\/a>]I've discussed in Part I how to add a macro with some VBA code to add a scan function to Microsoft Word 2016 (and Word 2013). Now we have to test this new feature \u2013 and also add a scan button to a menu bar tab.<\/p>\n<p><!--more--><\/p>\n<h3>How to test the macro code?<\/h3>\n<p><img loading=\"lazy\" decoding=\"async\" alt=\"\" src=\"https:\/\/ssl-vg03.met.vgwort.de\/na\/218125231eeb4394b8d66eac18f6b672\" width=\"1\" height=\"1\">To test the new macro code, we can use the steps given below.&nbsp; <\/p>\n<p>1. Take care, that your WIA source (scanner) is on and connected to the computer.  <\/p>\n<p>2. Go to your Word document and click at the required insert position.  <\/p>\n<p><img decoding=\"async\" src=\"https:\/\/web.archive.org\/web\/20190423105724\/https:\/\/b58.imgup.net\/VBA047fee.jpg\">  <\/p>\n<p>3. Open the VBA development environment (as shown in <a href=\"https:\/\/borncity.com\/win\/2016\/03\/03\/sscanning-in-word-20132016-part-i\/\">Part I<\/a>) and click <em>Run Sub\/User Form <\/em>or press F5.&nbsp; <\/p>\n<p>Or goto <em>View <\/em>tab, and select <em>Macros \u2013 View Macros <\/em>as shown below.  <\/p>\n<p><p><img decoding=\"async\" src=\"https:\/\/web.archive.org\/web\/20181226050511\/http:\/\/p40.imgup.net\/VBA01c7b8.jpg\"><\/p>\n<p>Then select the <em>Scan <\/em>macro entry within the dialog box shown below and click <em>run<\/em>. <\/p>\n<p><img decoding=\"async\" src=\"https:\/\/web.archive.org\/web\/20190423120427\/https:\/\/a15.imgup.net\/VBA0567f5.jpg\">  <\/p>\n<p>The the scan dialog boxes (discussed in <a href=\"https:\/\/borncity.com\/win\/2016\/03\/03\/sscanning-in-word-20132016-part-i\/\">Part I<\/a>) to select the WIA source and invoke a scan should be shown.  <\/p>\n<p><img decoding=\"async\" alt=\"\" src=\"https:\/\/web.archive.org\/web\/20190423072522\/https:\/\/i24.imgup.net\/WIA018d18.jpg\">  <\/p>\n<p>1. If the dialog box shown above occurs, select the required WIA source (here Brother DCP-115C) and click the <em>OK <\/em>button.  <\/p>\n<p><img decoding=\"async\" alt=\"\" src=\"https:\/\/web.archive.org\/web\/20190423103814\/https:\/\/c64.imgup.net\/WIA02c578.jpg\">  <\/p>\n<p>2. Then select the can option within the WIA box and click <em>Scan (or Scannen).<\/em>  <\/p>\n<p>If it went well, a scan should starts and you will see a progress bar as show below.&nbsp; <\/p>\n<p><img decoding=\"async\" alt=\"\" src=\"https:\/\/web.archive.org\/web\/20190423110419\/https:\/\/b22.imgup.net\/WIA03a80f.jpg\">  <\/p>\n<p>After scanning, the macro stores the scan into a JPEG file and inserts the result into the word document.&nbsp; <\/p>\n<p><img decoding=\"async\" src=\"https:\/\/web.archive.org\/web\/20190423130728\/https:\/\/m32.imgup.net\/VBA06ee93.jpg\">  <\/p>\n<p>You can change the size of the inserted image or move and delete the object. If every thing went well, your Word 2013\/2016 scan function is ready. If the macro drows a run time error, something within your VBA code is wrong or the library reference is missing. In this case, check the code or re-import the VBA code.&nbsp; <\/p>\n<h5>Add a Scan group with a scan button to the ribbon<\/h5>\n<p>Now it's time to make scanning more comfortable and add a scan button to the <em>Insert <\/em>tab of Word's ribbon. Here we go.  <\/p>\n<p><img decoding=\"async\" src=\"https:\/\/web.archive.org\/web\/20190423082050\/https:\/\/v26.imgup.net\/VBA07c635.jpg\">  <\/p>\n<p>1. Go to tab <em>Insert, <\/em>right click the ribbon and select context menu entry <em>Customize the Ribbon<\/em><em>.<\/em>  <\/p>\n<p><img decoding=\"async\" src=\"https:\/\/web.archive.org\/web\/20190423122720\/https:\/\/o57.imgup.net\/VBA08f567.jpg\"> <\/p>\n<p>2. Right click the entry <em>Illustration<\/em> (1) in dialog box <em>Word Options <\/em>and select context menu entry <em>Add New Group <\/em>(2). <\/p>\n<p><img decoding=\"async\" src=\"https:\/\/web.archive.org\/web\/20190423102817\/https:\/\/v35.imgup.net\/VBA0928b7.jpg\"> <\/p>\n<p>3. Select the new entry, right click and choose <em>Rename <\/em>(3)<em>; <\/em>rename the entry to <em>Scan<\/em> and click the <em>OK<\/em> button. <\/p>\n<p>4. Open list box <em>Choose command from <\/em>(4) and select \"Macros\" .  <\/p>\n<p><img decoding=\"async\" title=\"Makro zuweisen\" alt=\"Makro zuweisen\" src=\"https:\/\/web.archive.org\/web\/20160619164941\/http:\/\/u52.imgup.net\/WordMenu06ca59.jpg\">  <\/p>\n<p>5.&nbsp; Select entry \"Normal.NewMacros.Scan\", select entry \"Scan\" in right pane and click the Add button (5). <\/p>\n<p>6. Right click the new entry \"Normal.NewMacros.Scan\" in the right pane and select context menu command <em>Rename <\/em>(3).  <\/p>\n<p><img decoding=\"async\" src=\"https:\/\/web.archive.org\/web\/20190423102817\/https:\/\/v35.imgup.net\/VBA0928b7.jpg\">  <\/p>\n<p>7. Rename the macro to <em>Scan,<\/em> select an icon and click the <em>OK button<\/em>.  <\/p>\n<p><img decoding=\"async\" src=\"https:\/\/web.archive.org\/web\/20190423131012\/https:\/\/e60.imgup.net\/VBA10ac5a.jpg\">  <\/p>\n<p>Now the dialog box Word Options should have a new group entry <em>Scan <\/em>with a button <em>Scan. <\/em>Close the <em>Word Options <\/em>box, and you should see the new <em>Scan <\/em>entry on ribbon's <em>Insert <\/em>tab.  <\/p>\n<p><img decoding=\"async\" src=\"https:\/\/web.archive.org\/web\/20190423090345\/https:\/\/d08.imgup.net\/VBA11c05a.jpg\">  <\/p>\n<p>If a scanner is available an switches on, pushing the button should invoke a WIA scan (as sown above). If the scanner isn't connected or switched off, nothing happens.&nbsp; <\/p>\n<blockquote>\n<p>If you need a Scan button within your Quick Access bar, just right click the Scan button within the ribbon and select context menu command Add to Quick Access Toolbar. That's all.  <\/p>\n<p>Also some words about Macro security. The VBA script has been inserted to Normal.dotx \u2013 so it will be accessible within all Word documents. Because Macros from foreign sources may contain malware, Word may block Macro code execution. Select the File tab and then Options. Click Trust Center in the left pane and Trust Center Settings. Then you will find several Macro Settings shown below and you can select the appropriate option.<\/p>\n<\/blockquote>\n<p><img decoding=\"async\" src=\"https:\/\/web.archive.org\/web\/20190423132724\/https:\/\/y42.imgup.net\/VBA123239.jpg\">&nbsp; <\/p>\n<p><strong>Articles:<br \/><\/strong><a href=\"https:\/\/borncity.com\/win\/2016\/03\/03\/sscanning-in-word-20132016-part-i\/\">Scanning in Word 2013\/2016<\/a> \u2013 Part I<br \/><a title=\"https:\/\/borncity.com\/win\/2016\/03\/04\/scanning-in-word-20132016-part-ii\/\" href=\"https:\/\/borncity.com\/win\/2016\/03\/04\/scanning-in-word-20132016-part-ii\/\">Scanning in Word 2013\/2016 <\/a> \u2013 Part II<\/p>\n","protected":false},"excerpt":{"rendered":"<p>[German]I've discussed in Part I how to add a macro with some VBA code to add a scan function to Microsoft Word 2016 (and Word 2013). Now we have to test this new feature \u2013 and also add a scan &hellip; <a href=\"https:\/\/borncity.com\/win\/2016\/03\/04\/scanning-in-word-20132016-part-ii\/\">Continue reading <span class=\"meta-nav\">&rarr;<\/span><\/a><\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[11],"tags":[207,37,30],"class_list":["post-713","post","type-post","status-publish","format-standard","hentry","category-office","tag-iiword-20132016","tag-scan-feature","tag-tip"],"_links":{"self":[{"href":"https:\/\/borncity.com\/win\/wp-json\/wp\/v2\/posts\/713","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/borncity.com\/win\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/borncity.com\/win\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/borncity.com\/win\/wp-json\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/borncity.com\/win\/wp-json\/wp\/v2\/comments?post=713"}],"version-history":[{"count":0,"href":"https:\/\/borncity.com\/win\/wp-json\/wp\/v2\/posts\/713\/revisions"}],"wp:attachment":[{"href":"https:\/\/borncity.com\/win\/wp-json\/wp\/v2\/media?parent=713"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/borncity.com\/win\/wp-json\/wp\/v2\/categories?post=713"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/borncity.com\/win\/wp-json\/wp\/v2\/tags?post=713"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}