Note: The other languages of the website are Google-translated. Back to English

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.



Doporučené nástroje produktivity slov

 

Kutools pro Word - více než 100 pokročilých funkcí pro Word, ušetříte 50% času

  • Složité a opakované operace lze provádět jednorázově během několika sekund.
  • Vložte více obrázků do složek do dokumentu Word najednou.
  • Sloučte a zkombinujte více souborů Wordu napříč složkami do jednoho v požadovaném pořadí.
  • Rozdělte aktuální dokument na samostatné dokumenty podle záhlaví, zalomení sekce nebo jiných kritérií.
  • Převádějte soubory mezi Doc a Docx, Docx a PDF, kolekci nástrojů pro běžné převody a výběr atd. ...
Komentáře (6)
Zatím žádné hodnocení. Buďte první, kdo ohodnotí!
Tento komentář byl moderátorem webu minimalizován
Takže jsem vytvořil makro pomocí kódu, který jste dodali, děkuji, zajímalo by mě, jestli existuje způsob, jak jít dále a zahrnout kód pro výběr, který provedete, jakmile se objeví okno Vložit obrázek. dík
Tento komentář byl moderátorem webu minimalizován
takové úžasné a užitečné.
Tento komentář byl moderátorem webu minimalizován
Děkuji mnohokrát za tento velmi užitečný článek! Klávesová zkratka i makro fungují jako kouzlo!
Tento komentář byl moderátorem webu minimalizován
Páni! super snadné. Děkuji!
Tento komentář byl moderátorem webu minimalizován
Sledoval jsem VŠECHNY pokyny pro načtení obrázku ze skeneru a vše, co se stane, je, že se na mé stránce Wordu 10 objeví obrys prázdného rámečku? Vaše pomoc je v pořádku. David 76 let mladý
Tento komentář byl moderátorem webu minimalizován
To by mělo fungovat ve většině verzí 64 nebo 32 bit Přidat odkaz na Microsoft Windows Image Acquisition x2.0 Sub Scan() Dim objCommonDialog As WIA.CommonDialog Dim objImage As WIA.ImageFile Dim strScanName As String ' instance Scan WIA objektů Set objCommonDialog = New WIA .CommonDialog Set objImage = objCommonDialog.ShowAcquireImage strScanName = Environ$("TEMP") & "\Scan.jpg" ' nastavit dočasný soubor If Not objImage Is Nothing Then If Dir(strScanName) "" Then Kill strScanName objImage.SaveFile' strScanName do dočasného souboru DoEvents 'Word Selection.InlineShapes.AddPicture strScanName ' vložit do dokumentu End If End Sub
Zatím zde nejsou žádné komentáře
Zanechat své připomínky
Odesílání jako host
×
Ohodnoťte tento příspěvek:
0   Postavy
Doporučená umístění