Přejít k hlavnímu obsahu

Jak vložit obrázek nebo obrázek ze skeneru nebo fotoaparátu do aplikace Word?

Při vkládání obrázků ze skeneru nebo fotoaparátu v aplikaci Word 2007 a novější verzi se můžete dostat do potíží, protože Microsoft odstranil možnost vložit obrázek ze skeneru nebo fotoaparátu, který byl právě k dispozici v aplikaci Word 2003. Tento výukový program vám ukáže několik způsobů vkládání obrázků ze skeneru nebo fotoaparátu v aplikaci Word 2007 a novější verzi.

Vložte obrázek ze skeneru nebo fotoaparátu do aplikace Word pomocí zkratek

Vložte obrázek ze skeneru nebo fotoaparátu do aplikace Word vytvořením makra

Vložte obrázek ze skeneru nebo fotoaparátu do Wordu pomocí Kutools pro Word


Vložte obrázek ze skeneru nebo fotoaparátu do aplikace Word pomocí zkratek

Pokud používáte Word 2007 nebo Word 2010, můžete rychle přistupovat k Vložte obrázek ze skeneru nebo fotoaparátu nástroj takto:

1. Nejprve stiskněte Další zadejte v aplikaci Word 2007 nebo Word 2010 a poté pokračujte v zadávání posloupnosti kláves nabídky ips
na klávesnici a zobrazí se Vložte obrázek ze skeneru nebo fotoaparátu dialog.

Po napsání textu Další první a i klíč, uvidíte a Super tip následujícím způsobem:

Po napsání textu p a s klíč, vyskočí Vložte obrázek ze skeneru nebo fotoaparátu dialog.

Poté si můžete vybrat obrázek ze zařízení pomocí Vložte obrázek ze skeneru nebo fotoaparátu dialog.


Vložte obrázek ze skeneru nebo fotoaparátu do aplikace Word vytvořením makra

1. Nejprve byste měli vytvořit a Makro pro váš dokument Word. prosím klikněte Pohled > makra > Zobrazit makra. Viz snímek obrazovky:

doc vložte obrázek ze skeneru 1

2. Po kliknutí Zobrazit makra, tam bude a makra vyskočí dialogové okno. Pod Název makra, vepište "Skenovat“; vybrat Normální. dotm (globální šablona) z Makra v rozbalovací seznam. Pak klikněte na tlačítko Vytvořit. Viz snímek obrazovky:

doc vložte obrázek ze skeneru 2

3. A teď, a Okno Microsoft Visual Basic pro aplikace zobrazí se, zkopírujte a vložte následující kód do dialogového okna mezi Dílčí skenování a Konec pod line.

Kód v roce 2013 a novější verzi:

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 vložte obrázek ze skeneru 3

Kodex v letech 2007 a 2010:

On Error Resume Next
WordBasic.InsertImagerScan

doc vložte obrázek ze skeneru 4

4. Nyní byste měli kliknout Tools > Reference přejděte na Reference - normální V dialogovém okně vyberte a zkontrolujte Knihovna pro získávání obrázků Microsoft Windows možnost, viz screenshot:

doc vložte obrázek ze skeneru 5

5. Pak klikněte na tlačítko OK zavřete dialogové okno a nyní stiskněte F5 klíč ke spuštění tohoto kódu.

Poznámka: Zkontrolujte, zda je skener zapnutý a připojený k počítači


Vložte obrázek ze skeneru nebo fotoaparátu do Wordu pomocí Kutools pro Word

S Kutools pro WordJe Ze skeneru nebo fotoaparátu můžete se těchto nepříjemných operací zbavit a snadno vložit obrázek ze skeneru nebo fotoaparátu do aplikace Word.

Kutools pro Word : s více než 100 užitečnými doplňky Wordu, můžete to vyzkoušet bez omezení za 60 dní. 

1. Umístěte kurzor na místo, kam chcete vložit obrázek.

2. Poté použijte tento nástroj kliknutím Kutools > Moře > Ze skeneru nebo fotoaparátu. Viz snímek obrazovky:

3. Po kliknutí Ze skeneru nebo fotoaparátu, zobrazí se Vložte obrázek ze skeneru nebo fotoaparátu dialog.

A: Pod Přístroj, vyberte související zařízení, ze kterého chcete importovat obrázek.

B: Vyberte libovolné Rozlišení chceš.

C: Klikněte Vložit začít vkládat.

Poznámka: Tento nástroj nelze použít pro Word 2013 a novější verzi.

Klikněte a stáhněte si Kutools pro Word a bezplatnou zkušební verzi hned teď!

Podrobnější informace o Kutools pro WordJe Ze skeneru nebo fotoaparátu nástroj, navštivte prosím: Ze skeneru nebo fotoaparátu.


Nejlepší nástroje pro produktivitu v kanceláři

Kutools pro Word - Zvyšte své zkušenosti se slovem Over 100 Pozoruhodné vlastnosti!

🤖 Kutools AI asistent: Transformujte své psaní pomocí AI - Generovat obsah  /  Přepsat text  /  Shrnout dokumenty  /  Vyžádejte si informace na základě dokumentu, vše ve Wordu

📘 Mistrovství dokumentů: Rozdělit stránky  /  Sloučit dokumenty  /  Exportovat výběr v různých formátech (PDF/TXT/DOC/HTML...)  /  Dávkový převod do PDF  /  Exportujte stránky jako obrázky  /  Tisk více souborů najednou...

Úprava obsahu: Dávkové hledání a nahrazení přes více souborů  /  Změnit velikost všech obrázků  /  Transponujte řádky a sloupce tabulky  /  Převést tabulku na text...

🧹 Čištění bez námahy: Smést pryč Extra prostory  /  Sekce přestávky  /  Všechny záhlaví  /  Textová pole  /  Odkazy  / Další nástroje pro odstraňování naleznete u nás Odstranit skupinu...

Kreativní vložky: Vložit Tisíc separátorů  /  Zaškrtávací políčka  /  Tlačítka rádia  /  QR kód  /  čárový kód  /  Tabulka diagonálních čar  /  Titulek rovnice  /  Titulek obrázku  /  Titulek tabulky  /  Více obrázků  / Objevte více v Vložit skupinu...

???? Přesné výběry: Přesně konkrétní stránky  /  Tabulky  /  Tvary  /  nadpisové odstavce  / Vylepšete navigaci pomocí vice Vyberte funkce...

Vylepšení hvězd: Navigujte rychle na libovolné místo  /  automatické vkládání opakujícího se textu  /  plynule přepínat mezi okny dokumentů  /  11 Konverzní nástroje...

???? Chcete si tyto funkce vyzkoušet? Kutools for Word nabízí a Denní zkušební doba 60, bez omezení! ????
Stažení zdarma     Více     Kup nyní
 
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