Bỏ qua nội dung chính

Làm cách nào để chèn hình ảnh hoặc hình ảnh từ máy quét hoặc máy ảnh trong Word?

Bạn có thể gặp rắc rối khi chèn ảnh từ máy quét hoặc máy ảnh trong Word 2007 và phiên bản mới hơn vì Microsoft đã loại bỏ tùy chọn chèn ảnh từ máy quét hoặc máy ảnh chỉ có trong Word 2003. Hướng dẫn này sẽ chỉ cho bạn một số phương pháp chèn ảnh từ máy quét hoặc máy ảnh trong Word 2007 và phiên bản mới hơn.

Chèn ảnh từ máy quét hoặc máy ảnh trong Word bằng cách sử dụng các phím tắt

Chèn ảnh từ máy quét hoặc máy ảnh trong Word bằng cách tạo Macro

Chèn ảnh từ máy quét hoặc máy ảnh trong Word với Kutools cho Word


Chèn ảnh từ máy quét hoặc máy ảnh trong Word bằng cách sử dụng các phím tắt

Nếu bạn đang sử dụng Word 2007 hoặc Word 2010, bạn có thể nhanh chóng truy cập vào Chèn ảnh từ máy quét hoặc máy ảnh tiện ích như sau:

1. Trước tiên hãy nhấn Khác trong Word 2007 hoặc Word 2010, rồi tiếp tục nhập chuỗi phím menu ips
trên bàn phím của bạn và nó sẽ hiển thị Chèn ảnh từ máy quét hoặc máy ảnh thoại.

Sau khi nhập Khác đầu tiên và i chìa khóa, bạn sẽ thấy một Mẹo siêu như sau:

Sau khi nhập ps chìa khóa, nó sẽ bật lên Chèn ảnh từ máy quét hoặc máy ảnh thoại.

Sau đó, bạn có thể chọn ảnh từ thiết bị thông qua Chèn ảnh từ máy quét hoặc máy ảnh thoại.


Chèn ảnh từ máy quét hoặc máy ảnh trong Word bằng cách tạo Macro

1. Trước tiên, bạn nên tạo Macro cho tài liệu Word của bạn. Vui lòng bấm vào Xem > Macros > Xem Macro. Xem ảnh chụp màn hình:

doc chèn hình ảnh từ máy quét 1

2. Sau khi nhấp Xem Macro, sẽ có một Macros hộp thoại bật lên. Dưới Tên macro, gõ vào "Quét”; lựa chọn Bình thường. dotm (toàn cầu bản mẫu) từ Macro trong danh sách thả xuống. Sau đó nhấp vào Tạo. Xem ảnh chụp màn hình:

doc chèn hình ảnh từ máy quét 2

3. Và bây giờ, một Cửa sổ Microsoft Visual Basic for Applications hiển thị, vui lòng sao chép và dán mã sau vào hộp thoại nằm giữa Quét phụ Kết thúc phụ Đường dây.

Mã phiên bản 2013 trở lên:

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 chèn hình ảnh từ máy quét 3

Mã năm 2007 và 2010:

On Error Resume Next
WordBasic.InsertImagerScan

doc chèn hình ảnh từ máy quét 4

4. Bây giờ, bạn nên nhấp vào CÔNG CỤ > dự án đi đến Tài liệu tham khảo-Bình thường hộp thoại, sau đó chọn và kiểm tra Thư viện thu thập hình ảnh Microsoft Windows tùy chọn, xem ảnh chụp màn hình:

doc chèn hình ảnh từ máy quét 5

5. Sau đó nhấn vào OK để đóng hộp thoại và bây giờ, hãy nhấn F5 phím để chạy mã này.

Chú thích: Đảm bảo rằng máy quét được bật và kết nối với máy tính


Chèn ảnh từ máy quét hoặc máy ảnh trong Word với Kutools cho Word

Với Kutools cho Word'S Từ máy quét hoặc máy ảnh tiện ích, bạn có thể thoát khỏi những thao tác phiền phức đó và dễ dàng chèn hình ảnh từ máy quét hoặc máy ảnh trong word.

Kutools cho Word : với hơn 100 phần bổ trợ Word tiện dụng, dùng thử miễn phí không giới hạn trong 60 ngày. 

1. Đặt con trỏ vào nơi bạn muốn chèn ảnh.

2. Sau đó, vui lòng áp dụng tiện ích này bằng cách nhấp vào Kutools > Hơn > Từ máy quét hoặc máy ảnh. Xem ảnh chụp màn hình:

3. Sau khi nhấp Từ máy quét hoặc máy ảnh, nó sẽ hiển thị Chèn ảnh từ máy quét hoặc máy ảnh thoại.

A: Dưới Dụng cụ, chọn thiết bị liên quan mà bạn muốn nhập ảnh.

B: Chọn bất kỳ Độ phân giải bạn muốn.

C: Nhấp vào Chèn để bắt đầu chèn.

Chú thích: Không thể áp dụng tiện ích này cho Word 2013 và phiên bản mới hơn.

Nhấp để tải xuống Kutools cho Word và dùng thử miễn phí ngay bây giờ!

Để biết thêm thông tin chi tiết của Kutools cho Word'S Từ máy quét hoặc máy ảnh tiện ích, vui lòng truy cập: Từ máy quét hoặc máy ảnh.


Công cụ năng suất văn phòng tốt nhất

Kutools cho Word - Nâng cao trải nghiệm sử dụng từ của bạn với Over 100 Các tính năng đáng chú ý!

🤖 Trợ lý AI của Kutools: Biến đổi bài viết của bạn bằng AI - Tạo nội dung  /  Viết lại văn bản  /  Tóm tắt tài liệu  /  Hỏi thông tin dựa trên tài liệu, tất cả đều có trong Word

📘 Làm chủ tài liệu: Chia trang  /  Hợp nhất tài liệu  /  Lựa chọn xuất khẩu ở nhiều định dạng khác nhau (PDF/TXT/DOC/HTML...)  /  Chuyển đổi hàng loạt sang PDF  /  Xuất trang dưới dạng hình ảnh  /  In nhiều tập tin cùng một lúchữu ích. Cảm ơn !

Chỉnh sửa nội dung: Tìm và thay thế hàng loạt trên nhiều tệp  /  Thay đổi kích thước tất cả hình ảnh  /  Hoán đổi hàng và cột của bảng  /  Chuyển bảng thành văn bảnhữu ích. Cảm ơn !

🧹 Dễ dàng làm sạch: Quét đi Không gian bổ sung  /  Phần ngắt  /  Tất cả các tiêu đề  /  Hộp văn bản  /  Các siêu liên kết  / Để biết thêm các công cụ xóa, hãy truy cập Xóa nhómhữu ích. Cảm ơn !

Phụ trang quảng cáo: Chèn Ngàn dấu phân cách  /  Hộp kiểm tra  /  Nút radio  /  Mã QR  /  Mã vạch  /  Bảng đường chéo  /  Chú thích phương trình  /  Hình ảnh Caption  /  Bảng chú thích  /  Nhiều Hình Ảnh  / Khám phá thêm trong Chèn nhómhữu ích. Cảm ơn !

???? Lựa chọn chính xác: Xác định trang cụ thể  /  bảng  /  hình dạng  /  đoạn văn tiêu đề  / Tăng cường điều hướng với chi tiết Chọn tính nănghữu ích. Cảm ơn !

Cải tiến sao: Điều hướng nhanh chóng đến bất kỳ vị trí nào  /  tự động chèn văn bản lặp đi lặp lại  /  chuyển đổi liền mạch giữa các cửa sổ tài liệu  /  11 công cụ chuyển đổihữu ích. Cảm ơn !

👉 Bạn muốn thử những tính năng này? Kutools cho Word cung cấp một 60 ngày dùng thử miễn phí, không có giới hạn! 🚀
 
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