Ga naar hoofdinhoud

Hoe een afbeelding of afbeelding van een scanner of camera in Word invoegen?

U kunt problemen krijgen bij het invoegen van afbeeldingen van een scanner of camera in Word 2007 en latere versie, omdat Microsoft de optie heeft verwijderd om een ​​afbeelding van een scanner of camera in te voegen die net beschikbaar was in Word 2003. Deze zelfstudie laat u verschillende methoden zien voor het invoegen van afbeeldingen van scanner of camera in Word 2007 en latere versie.

Voeg een afbeelding van de scanner of camera in Word in met behulp van snelkoppelingen

Voeg een afbeelding van de scanner of camera in Word in door Macro te maken

Voeg een afbeelding van de scanner of camera in Word in met Kutools voor Word


Voeg een afbeelding van de scanner of camera in Word in met behulp van snelkoppelingen

Als u Word 2007 of Word 2010 gebruikt, hebt u snel toegang tot het Afbeelding van scanner of camera invoegen hulpprogramma als volgt:

1. Druk eerst op anders toets in Word 2007 of Word 2010 en ga door met het typen van de menutoetsreeks ips
op uw toetsenbord, en het zal de Afbeelding van scanner of camera invoegen dialoogvenster.

Na het typen anders eerst en i key, je ziet een Super tip als volgt:

Na het typen p en s toets, het zal de Afbeelding van scanner of camera invoegen dialoogvenster.

Vervolgens kunt u een afbeelding van het apparaat kiezen via de Afbeelding van scanner of camera invoegen dialoogvenster.


Voeg een afbeelding van de scanner of camera in Word in door Macro te maken

1. Ten eerste moet u een Macro voor uw Word-document. Klik alstublieft Bekijk > Macro's > Bekijk macro's. Zie screenshot:

doc afbeelding invoegen vanaf scanner 1

2. Na het klikken Bekijk macro's, er zal een Macro's dialoogvenster verschijnt. Onder Macronaam, typ in "aftasten”; selecteer Normaal. dotm (globaal sjabloon) van het Macro's in keuzelijst. Dan klikken creëren. Zie screenshot:

doc afbeelding invoegen vanaf scanner 2

3. En nu, een Microsoft Visual Basic for Applications-venster verschijnt, kopieer en plak de volgende code in het dialoogvenster tussen Subscan en Einde sub lijnen.

Code in 2013 en latere versie:

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 afbeelding invoegen vanaf scanner 3

Code in 2007 en 2010:

On Error Resume Next
WordBasic.InsertImagerScan

doc afbeelding invoegen vanaf scanner 4

4. Nu zou je moeten klikken Tools > Referenties naar de Referenties-Normaal dialoogvenster, kies en vink aan Microsoft Windows Image Acquisition-bibliotheek optie, zie screenshot:

doc afbeelding invoegen vanaf scanner 5

5. Dan klikken OK om het dialoogvenster te sluiten, en druk nu op F5 sleutel om deze code uit te voeren.

Note: Zorg ervoor dat de scanner is ingeschakeld en is aangesloten op de computer


Voeg een afbeelding van de scanner of camera in Word in met Kutools voor Word

met Kutools for Word's Van scanner of camera hulpprogramma, kunt u die vervelende bewerkingen verwijderen en eenvoudig een afbeelding van de scanner of camera in woord invoegen.

Kutools for Word : met meer dan 100 handige Word-invoegtoepassingen, gratis te proberen zonder beperking in 60 dagen. 

1. Plaats de cursor op de plek waar u een afbeelding wilt invoegen.

2. Pas dit hulpprogramma dan toe door op te klikken Kutools > Meer > Van scanner of camera. Zie screenshot:

3. Na het klikken Van scanner of camera, zal het de Afbeelding van scanner of camera invoegen dialoogvenster.

A: onder Apparaat, selecteer het gerelateerde apparaat waarvan u een afbeelding wilt importeren.

B: Selecteer een Resolutie jij wil.

C: Klik Invoegen om te beginnen met invoegen.

Note: Dit hulpprogramma kan niet worden toegepast voor Word 2013 en latere versies.

Klik om Kutools voor Word en nu gratis uit te proberen!

Voor meer gedetailleerde informatie over Kutools for Word's Van scanner of camera hulpprogramma gaat u naar: Van scanner of camera.


Beste Office-productiviteitstools

Kutools for Word - Verbeter uw woordervaring met Over 100 Opmerkelijke kenmerken!

🤖 Kutools AI-assistent: Transformeer uw schrijven met AI - Inhoud genereren  /  Herschrijf tekst  /  Documenten samenvatten  /  Informeer voor informatie gebaseerd op document, allemaal binnen Word

📘 Documentbeheersing: Pagina's splitsen  /  Voeg documenten samen  /  Selectie exporteren in verschillende formaten (PDF/TXT/DOC/HTML...)  /  Batchconversie naar PDF  /  Pagina's exporteren als afbeeldingen  /  Meerdere bestanden tegelijk afdrukken...

Inhoud bewerken: Batch zoeken en vervangen over meerdere bestanden  /  Formaat van alle afbeeldingen wijzigen  /  Tabelrijen en -kolommen transponeren  /  Converteer tabel naar tekst...

🧹 Moeiteloos schoon: Veeg weg Extra ruimtes  /  Sectie-onderbrekingen  /  Alle koppen  /  Tekstvakken  /  hyperlinks  / Ga voor meer verwijdergereedschappen naar onze Groep verwijderen...

Creatieve invoegingen: Invoegen Duizend scheidingstekens  /  Vink vakjes aan  /  Radio knoppen  /  QR Code  /  Barcode  /  Diagonale lijntabel  /  Vergelijking bijschrift  /  Bijschrift bij afbeelding  /  Tabel titel  /  Meerdere afbeeldingen  / Ontdek meer in de Groep invoegen...

???? Precisieselecties: Vaststellen specifieke pagina's  /  tafels  /  vormen  /  kop paragrafen  / Verbeter de navigatie met meer Selecteer functies...

Sterverbeteringen: Navigeer snel naar elke locatie  /  automatisch herhaalde tekst invoegen  /  naadloos schakelen tussen documentvensters  /  11 Conversiehulpmiddelen...

👉 Wil je deze functies proberen? Kutools voor Word biedt een Gratis proefperiode van 60-dag, zonder beperkingen! 🚀
 
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