Przejdź do głównej zawartości

Jak wstawić obraz lub obraz ze skanera lub aparatu w programie Word?

Możesz mieć problemy z wstawianiem obrazów ze skanera lub aparatu w programie Word 2007 i nowszych wersjach, ponieważ firma Microsoft usunęła opcję wstawiania obrazu ze skanera lub aparatu fotograficznego, która była dostępna właśnie w programie Word 2003. Ten samouczek pokaże Ci kilka metod wstawiania obrazów ze skanera lub aparatu fotograficznego w programie Word 2007 i nowszych wersjach.

Wstaw obraz ze skanera lub aparatu fotograficznego w programie Word za pomocą skrótów

Wstaw obraz ze skanera lub aparatu w programie Word, tworząc makro

Wstaw obraz ze skanera lub aparatu w programie Word za pomocą Kutools for Word


Wstaw obraz ze skanera lub aparatu fotograficznego w programie Word za pomocą skrótów

Jeśli korzystasz z programu Word 2007 lub Word 2010, możesz szybko uzyskać dostęp do Wstaw zdjęcie ze skanera lub aparatu użyteczność w następujący sposób:

1. Najpierw naciśnij inny w programie Word 2007 lub Word 2010, a następnie kontynuuj wpisywanie sekwencji klawiszy menu ips
na klawiaturze i wyświetli Wstaw zdjęcie ze skanera lub aparatu dialog.

Po wpisaniu inny pierwszy i i klucz, zobaczysz Super wskazówka w sposób następujący:

Po wpisaniu p i s klucz, pojawi się plik Wstaw zdjęcie ze skanera lub aparatu dialog.

Następnie możesz wybrać zdjęcie z urządzenia za pomocą pliku Wstaw zdjęcie ze skanera lub aparatu dialog.


Wstaw obraz ze skanera lub aparatu w programie Word, tworząc makro

1. Po pierwsze, powinieneś utworzyć plik Macro dla twojego dokumentu Word. Proszę kliknąć Zobacz i wysłuchaj > Makra > Wyświetl makra. Zobacz zrzut ekranu:

doc wstaw obraz ze skanera 1

2. Po kliknięciu Wyświetl makra, będzie Makra pojawia się okno dialogowe. Pod Nazwa makra, Wpisz "Scan”; Wybierz Normalna. dotm (globalny szablon) z Makra w Lista rozwijana. Następnie kliknij Stwórz. Zobacz zrzut ekranu:

doc wstaw obraz ze skanera 2

3. A teraz a Okno Microsoft Visual Basic for Applications pojawi się, skopiuj i wklej następujący kod do okna dialogowego między Skan podrzędny i Napis końcowy kwestia.

Kod w 2013 i nowszych wersjach:

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 wstaw obraz ze skanera 3

Kod w latach 2007 i 2010:

On Error Resume Next
WordBasic.InsertImagerScan

doc wstaw obraz ze skanera 4

4. Teraz powinieneś kliknąć Tools > Referencje , aby przejść do Odniesienia - normalne okno dialogowe, a następnie wybierz i zaznacz Biblioteka pobierania obrazów systemu Microsoft Windows opcja, patrz zrzut ekranu:

doc wstaw obraz ze skanera 5

5. Następnie kliknij OK aby zamknąć okno dialogowe, a teraz naciśnij F5 klucz do uruchomienia tego kodu.

Note: Upewnij się, że skaner jest włączony i podłączony do komputera


Wstaw obraz ze skanera lub aparatu w programie Word za pomocą Kutools for Word

Z Kutools dla Worda'S Ze skanera lub aparatu narzędzie, możesz pozbyć się tych irytujących operacji i łatwo wstawić obraz ze skanera lub aparatu w słowie.

Kutools dla Worda : z ponad 100 przydatnymi dodatkami do Worda, które można wypróbować bezpłatnie bez ograniczeń przez 60 dni. 

1. Umieść kursor w miejscu, w którym chcesz wstawić obraz.

2. Następnie zastosuj to narzędzie, klikając Kutools > Więcej > Ze skanera lub aparatu. Zobacz zrzut ekranu:

3. Po kliknięciu Ze skanera lub aparatu, wyświetli Wstaw zdjęcie ze skanera lub aparatu dialog.

O: Pod Urządzenie, wybierz powiązane urządzenie, z którego chcesz importować obraz.

B: Wybierz dowolny Rozkład chcesz.

C: Kliknij wstawka aby rozpocząć wstawianie.

Note: Tego narzędzia nie można zastosować w programie Word 2013 i nowszych wersjach.

Kliknij, aby pobrać Kutools for Word i bezpłatną wersję próbną już teraz!

Aby uzyskać bardziej szczegółowe informacje na temat Kutools dla Worda'S Ze skanera lub aparatu narzędzie, odwiedź: Ze skanera lub aparatu.


Najlepsze narzędzia biurowe

Kutools dla Worda - Podnieś swoje doświadczenie ze słowami dzięki Over 100 Niezwykłe funkcje!

🤖 Kutools Asystent AI: Zmień swoje pisanie dzięki AI - Generuj zawartość  /  Przepisz tekst  /  Podsumowanie dokumentów  /  Zapytaj o informacje na podstawie Dokumentu, wszystko w programie Word

📘 Znajomość dokumentów: Podziel strony  /  Scal dokumenty  /  Eksportuj zaznaczenie w różnych formatach (PDF/TXT/DOC/HTML...)  /  Wsadowa konwersja do formatu PDF  /  Eksportuj strony jako obrazy  /  Drukuj wiele plików jednocześnie...

Edycja treści: Znajdź i zamień partii w wielu plikach  /  Zmień rozmiar wszystkich zdjęć  /  Transponuj wiersze i kolumny tabeli  /  Konwertuj tabelę na tekst...

🧹 Łatwe czyszczenie: Wymień Dodatkowe przestrzenie  /  Podziały sekcji  /  Wszystkie nagłówki  /  Pola tekstowe  /  Hiperłącza  / Więcej narzędzi do usuwania znajdziesz na naszej stronie Usuń grupę...

Kreatywne wstawki: Wstawić Tysiące separatorów  /  Pola wyboru  /  Przyciski Radio  /  Kod QR  /  kod kreskowy  /  Tabela linii ukośnych  /  Podpis równania  /  Tytuł Zdjęcia  /  Podpis tabeli  /  Wiele zdjęć  / Odkryj więcej w Wstaw grupę...

🔍 Precyzyjne wybory: Punktowy konkretne strony  /  stoły  /  kształty  /  nagłówki akapitów  / Ulepsz nawigację za pomocą jeszcze Wybierz funkcje...

Ulepszenia gwiazd: Nawiguj szybko do dowolnej lokalizacji  /  automatyczne wstawianie powtarzającego się tekstu  /  płynnie przełączaj się pomiędzy oknami dokumentów  /  11 Narzędzia konwersji...

???? Chcesz wypróbować te funkcje? Kutools dla Word oferuje Bezpłatna wersja próbna 60-day, bez ograniczeń! 🚀
 
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