Wiki

Thủ thuật chèn hình ảnh trực tuyến vào Excel bằng URL

Trong một số bài viết trước về Excel, tôi đã hướng dẫn các bạn cách chèn hàng loạt hình ảnh trong tệp Excel và sửa chúng trong ô, cũng như cách chèn hình ảnh vào khung Comment bằng mã VBA.

Và để giúp các bạn có thêm nhiều lựa chọn trong khi thao tác với ảnh trên file Excel, hôm nay mình sẽ tiếp tục chia sẻ với các bạn một thủ thuật khá đặc biệt.

Đúng ! Đó là cách chèn hình ảnh trực tuyến vào Excel qua URL với mã VBA. Hỗ trợ bạn lập danh sách, thống kê đơn hàng hay quản lý websile bằng hình ảnh minh họa dễ dàng và nhanh chóng hơn.

Đọc thêm:

Cách chèn hàng loạt hình ảnh trực tuyến vào Excel

+ Bước 1: Đầu tiên để chèn hình ảnh vào tệp Excel thông qua URL, bạn cần sao chép các liên kết (URL) của hình ảnh mà bạn muốn chèn trước.

Việc này đơn giản bạn chỉ cần truy cập vào trang web có chứa hình ảnh mà bạn muốn lấy => và click chuột phải vào hình ảnh => chọn Sao chép địa chỉ hình ảnh => Sau đó Paste vào các ô tương ứng trong Excel.

excel (1)

+ Bước 2: Sau khi đã copy toàn bộ URL hình ảnh vào Excel => bây giờ bạn mở tab Nhà phát triển => chọn Visual Basic.

Hoặc là bạn nhấn tổ hợp phím ALT + F11 để mở trình soạn thảo mã VBA trong Excel một cách nhanh chóng.

excel (2)

+ Bước 3: Tại hộp thoại Microsoft Visual Basic for Applications => bạn bấm vào tab Insert trên thanh Menu => và chọn Module.

excel (3)

+ Bước 4: Sau đó sao chép đoạn mã sau …

URL phụPictureInsert ()
‘Updateby Extendoffice 20161116’
Làm mờ Pshp như hình dạng
Dim xRg As Range
Dim xCol As Long
Khi có lỗi Tiếp tục tiếp theo
Application.ScreenUpdating = Sai
Đặt Rng = ActiveSheet.Range (“A2: A7“)
Đối với mỗi ô trong Rng
filenam = ô
ActiveSheet.Pictures.Insert (filenam) .Select
Đặt Pshp = Selection.ShapeRange.Item (1)
Nếu Pshp không có gì thì GoTo lab
xCol = ô.Cột + 1
Đặt xRg = Cells (cell.Row, xCol)
Với Pshp
.LockAspectRatio = msoFalse
.Width = 100
.Height = 100
.Top = xRg.Top + (xRg.Height – .Height) / 2
.Left = xRg.Left + (xRg.Width – .Width) / 2
Kết thúc với
phòng thí nghiệm:
Đặt Pshp = Không có gì
Phạm vi(“A2“).Lựa chọn
tiếp theo
Application.ScreenUpdating = True
Kết thúc Sub

…. và Dán vào hộp thoại Mô-đun. Sau đó, chỉnh sửa thông tin mà bạn đã bôi mờ ở trên cho phù hợp với tệp Excel của bạn:

  • Các ô chứa Phạm vi URL (“A2: A7”)
  • Cột + 1 tức là ô đó sẽ xuất ra hình ảnh liền kề với ô chứa URL.
  • A2 là ô đầu tiên chứa URL

+ Bước 5: Sau đó nhấn nút Run để thực hiện.

Ngoài ra bạn có thể thay đổi chiều dài và chiều cao của hình ảnh hiển thị tại phần Width = 100Height = 100, để có được hình vuông.

Hoặc chỉnh sửa tại CaoBề rộng để chỉnh sửa chiều cao và chiều rộng cho hình ảnh.

excel (4)

+ Bước 6: Có, ngay sau khi bạn nhấp vào Chạy, bạn sẽ nhận được kết quả trong tệp Excel ..

Nhưng vẫn chưa xong, bây giờ để file Excel gọn gàng hơn, bạn có thể bấm vào cột chứa URL => chọn Hide để ẩn, hoặc Delete để xóa nó khỏi bảng tính.

excel (5)

Cuối cùng chúng ta nhận được kết quả như hình dưới đây…

excel (6)

Phần kết

Được rồi, vậy là xong, tôi vừa chỉ cho bạn một mẹo nhỏ trong chèn hình ảnh trực tuyến vào Excel với mã VBA một cách nhanh chóng và đơn giản.

Với phương pháp này, bạn có thể dễ dàng chèn hình ảnh hàng loạt vào Excel mà không cần phải tải hình ảnh xuống và không cần phải thay đổi kích thước hình ảnh.

Tại thời điểm này, hướng dẫn về cách chèn hình ảnh bằng URL trên tệp Excel của tôi cũng sẽ bị tạm dừng. Hi vọng thủ thuật này sẽ hữu ích trong công việc của bạn.

Chúc may mắn !

CTV: Lương Trung – phanmemdownload.com

Ghi chú: Bài viết này có hữu ích cho bạn không? Đừng quên đánh giá bài viết, thích và chia sẻ nó với bạn bè và gia đình của bạn!

Related Articles

Trả lời

Email của bạn sẽ không được hiển thị công khai. Các trường bắt buộc được đánh dấu *

Back to top button