Skip i'r prif gynnwys

Sut i fewnosod llun neu ddelwedd o'r sganiwr neu'r camera yn Word?

Efallai y byddwch yn mynd i drafferth mewnosod lluniau o sganiwr neu gamera yn Word 2007 a fersiwn ddiweddarach wrth i Microsoft ddileu'r opsiwn i fewnosod llun o sganiwr neu gamera a oedd ar gael yn Word 2003. Bydd y tiwtorial hwn yn dangos sawl dull i chi o fewnosod lluniau. o sganiwr neu gamera yn Word 2007 a fersiwn ddiweddarach.

Mewnosod llun o'r sganiwr neu'r camera yn Word trwy ddefnyddio llwybrau byr

Mewnosod llun o'r sganiwr neu'r camera yn Word trwy greu Macro

Mewnosodwch lun o sganiwr neu gamera yn Word gyda Kutools ar gyfer Word


Mewnosod llun o'r sganiwr neu'r camera yn Word trwy ddefnyddio llwybrau byr

Os ydych chi'n defnyddio Word 2007 neu Word 2010, gallwch gyrchu'r Mewnosod Llun o'r Sganiwr neu'r Camera cyfleustodau fel a ganlyn:

1. Pwyswch yn gyntaf Alt allwedd yn Word 2007 neu Word 2010, ac yna parhewch i deipio dilyniant allwedd y ddewislen ips
ar eich bysellfwrdd, a bydd yn arddangos y Mewnosod Llun o'r Sganiwr neu'r Camera deialog.

Ar ôl teipio Alt cyntaf a i allwedd, fe welwch a Awgrym Gwych fel a ganlyn:

Ar ôl teipio p ac s allwedd, bydd yn pop i fyny y Mewnosod Llun o'r Sganiwr neu'r Camera deialog.

Yna gallwch ddewis llun o'r ddyfais trwy'r Mewnosod Llun o'r Sganiwr neu'r Camera deialog.


Mewnosod llun o'r sganiwr neu'r camera yn Word trwy greu Macro

1. Yn gyntaf, dylech greu a Macro ar gyfer eich dogfen Word. Cliciwch Gweld > Macros > Gweld Macros. Gweler y screenshot:

mewnosod doc delwedd o sganiwr 1

2. Ar ôl clicio Gweld Macros, bydd a Macros dialog popping up. O dan Enw macro, teipiwch “Sganio”; dewiswch Arferol. dotm (byd-eang templed) oddi wrth y Macros i mewn rhestr ostwng. Yna cliciwch Creu. Gweler y screenshot:

mewnosod doc delwedd o sganiwr 2

3. Ac yn awr, a Ffenestr Microsoft Visual Basic for Applications yn dangos i fyny, copïwch a gludwch y cod canlynol i'r dialog yn lleoli rhwng Is-sgan ac Diwedd is llinellau.

Cod yn 2013 a fersiwn ddiweddarach:

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

mewnosod doc delwedd o sganiwr 3

Cod yn 2007 a 2010:

On Error Resume Next
WordBasic.InsertImagerScan

mewnosod doc delwedd o sganiwr 4

4. Nawr, dylech glicio offer > Cyfeiriadau i fynd i'r Cyfeiriadau-Arferol blwch deialog, yna dewis a gwirio Llyfrgell Caffael Delwedd Microsoft Windows opsiwn, gweler y screenshot:

mewnosod doc delwedd o sganiwr 5

5. Yna cliciwch OK i gau'r blwch deialog, ac yn awr, pwyswch F5 allwedd i redeg y cod hwn.

Nodyn: Sicrhewch fod y sganiwr ymlaen ac wedi'i gysylltu â'r cyfrifiadur


Mewnosodwch lun o sganiwr neu gamera yn Word gyda Kutools ar gyfer Word

Gyda Kutools am Word'S O'r Sganiwr neu'r Camera cyfleustodau, gallwch gael gwared ar y gweithrediadau annifyr hynny a mewnosod llun o'r sganiwr neu'r camera mewn gair yn hawdd.

Kutools am Word : gyda mwy na 100 o ychwanegiadau Word defnyddiol, am ddim i geisio heb unrhyw gyfyngiad mewn 60 diwrnod. 

1. Rhowch y cyrchwr lle rydych chi am fewnosod llun.

2. Yna cymhwyswch y cyfleustodau hwn trwy glicio Kutools > Mwy > O'r Sganiwr neu'r Camera. Gweler y screenshot:

3. Ar ôl clicio O'r Sganiwr neu'r Camera, bydd yn arddangos y Mewnosod Llun o'r Sganiwr neu'r Camera deialog.

A: O dan dyfais, dewiswch y ddyfais gysylltiedig rydych chi am fewnforio llun ohoni.

B: Dewiswch unrhyw Datrys ydych ei eisiau.

C: Cliciwch Mewnosod i ddechrau mewnosod.

Nodyn: Ni ellir cymhwyso'r cyfleustodau hwn ar gyfer Word 2013 a fersiwn ddiweddarach.

Cliciwch i lawrlwytho Kutools ar gyfer Word a threial am ddim nawr!

Am wybodaeth fanylach o Kutools am Word'S O'r Sganiwr neu'r Camera cyfleustodau, ewch i: O'r Sganiwr neu'r Camera.


Offer Cynhyrchiant Swyddfa Gorau

Kutools am Word - Dyrchafu Eich Profiad Word gyda Dros 100 Nodweddion Rhyfeddol!

🤖 Cynorthwy-ydd Kutools AI: Trawsnewidiwch eich ysgrifennu gydag AI - Cynhyrchu Cynnwys  /  Ailysgrifennu Testun  /  Crynhoi Dogfennau  /  Ymholwch am Wybodaeth yn seiliedig ar Ddogfen, i gyd o fewn Word

📘 Meistrolaeth Dogfen: Tudalennau Hollti  /  Uno Dogfennau  /  Dewis Allforio mewn Fformatau Amrywiol (PDF/TXT/DOC/HTML...)  /  Trosi swp i PDF  /  Allforio Tudalennau fel Delweddau  /  Argraffu Ffeiliau Lluosog ar unwaith...

Golygu Cynnwys: Swp Dod o Hyd i ac Amnewid ar draws Ffeiliau Lluosog  /  Newid Maint Pob Llun  /  Trawsosod Rhesi Bwrdd a Cholofnau  /  Trosi Tabl i Testun...

🧹 Ymdrech Glân: swap i ffwrdd Mannau Ychwanegol  /  Toriadau Adran  /  Pob Pennawd  /  Blychau Testun  /  hypergysylltiadau  / Am fwy o offer tynnu, ewch i'n Dileu Grŵp...

Mewnosodiadau Creadigol: mewnosod Mil o Wahanwyr  /  Blychau Gwirio  /  Botymau Radio  /  Cod QR  /  Cod Bar  /  Tabl Llinell Lletraws  /  Pennawd Hafaliad  /  Capsiwn Delwedd  /  Pennawd Tabl  /  Lluniau Lluosog  / Darganfod mwy yn y Mewnosod Grŵp...

🔍 Detholiadau Manwl: pinbwynt tudalennau penodol  /  tablau  /  siapiau  /  paragraffau pennawd  / Gwella llywio gyda mwy Dewiswch nodweddion...

Gwelliannau Seren: Llywiwch yn gyflym i unrhyw leoliad  /  auto-mewnosod testun ailadroddus  /  toglo'n ddi-dor rhwng ffenestri dogfennau  /  11 Offer Trosi...

???? Eisiau rhoi cynnig ar y nodweddion hyn? Mae Kutools ar gyfer Word yn cynnig a Treial am ddim 60-dydd, heb unrhyw gyfyngiadau! 🚀
 
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