Bỏ qua nội dung chính

Hình ảnh Excel: Chèn, thay đổi, xóa nhiều hình ảnh hoặc hình ảnh trong Excel

Trong hướng dẫn này, chúng ta sẽ nói về cách chèn nhiều hình ảnh vào ô và thay đổi kích thước chúng để phù hợp với kích thước ô, cách chèn hình ảnh vào bình luận, đầu trang hoặc chân trang, cách chèn hình ảnh từ URL, v.v. Nó cũng giải thích cách lưu, đổi tên, xóa nhiều hình ảnh khi bạn cần trong Excel.

Mục lục:

1. Chèn hình ảnh hoặc hình ảnh vào trang tính từ máy tính, web hoặc OneDrive

2. Khóa hình ảnh hoặc hình ảnh vào ô Excel

3. Chèn nhiều hình ảnh hoặc hình ảnh trong Excel

4. Chèn nhiều hình ảnh hoặc hình ảnh khớp với tên của chúng vào các ô

5. Chèn hoặc hiển thị hình ảnh hoặc hình ảnh từ URL

6. Chèn hoặc hiển thị hình ảnh hoặc hình ảnh từ đường dẫn tệp

7. Chèn hình ảnh hoặc hình ảnh vào bình luận

8. Chèn hình ảnh hoặc hình ảnh vào đầu trang hoặc chân trang

9. Chèn cùng một hình ảnh hoặc hình ảnh vào nhiều trang tính

10. Chèn hình ảnh hoặc hình ảnh phía sau nội dung ô

11. Chèn một dải ô dưới dạng hình ảnh hoặc định dạng ảnh trong Excel

12. Chèn hình ảnh hoặc hình ảnh động dựa trên giá trị ô

13. Xuất hoặc lưu tất cả hình ảnh hoặc hình ảnh từ tệp Excel

14. Đổi tên tên hình ảnh trong một thư mục dựa trên danh sách các ô trong Excel

15. Phóng to hoặc thu nhỏ hình ảnh khi nhấp vào nó

16. Luôn làm nổi hình ảnh khi cuộn trang tính

17. Xóa hình ảnh hoặc hình ảnh khỏi trang tính hiện hoạt / một dải ô


Chèn hình ảnh hoặc hình ảnh vào trang tính từ máy tính, web hoặc OneDrive

Tất cả các phiên bản Excel đều hỗ trợ chèn hình ảnh hoặc hình ảnh từ máy tính, nhưng nếu bạn muốn chèn hình ảnh từ web hoặc OneDrive, bạn nên có phiên bản Excel 2013 trở lên.

Chèn hình ảnh hoặc hình ảnh từ máy tính

Hầu hết chúng ta dễ dàng chèn hình ảnh được lưu trữ trên máy tính vào trang tính. Vui lòng làm như sau:

1. Trong trang tính, bấm vào nơi bạn muốn chèn hình ảnh.

2. Sau đó nhấn vào Chèn > Những bức ảnh > Thiết bị này, xem ảnh chụp màn hình:

3. Trong cửa sổ bật ra Chèn ảnh cửa sổ, mở thư mục chứa ảnh, sau đó giữ Ctrl để chọn hình ảnh bạn muốn chèn, xem ảnh chụp màn hình:

4. Sau đó nhấn vào Chèn , các ảnh đã chọn đã được chèn vào trang tính. Bây giờ, bạn có thể điều chỉnh hoặc thay đổi kích thước hình ảnh theo các ô bạn cần, xem ảnh chụp màn hình:


Chèn hình ảnh hoặc hình ảnh từ web hoặc OneDrive

Nếu bạn có phiên bản Excel 2013 trở lên, bạn có thể chèn hình ảnh từ web hoặc One Drive, vui lòng thực hiện như sau:

1. Trong trang tính, bấm vào nơi bạn muốn chèn hình ảnh.

2. Sau đó nhấn vào Chèn > Những bức ảnh > Hình ảnh trực tuyến, xem ảnh chụp màn hình:

3. Một cửa sổ sau sẽ được hiển thị. bên trong Hình ảnh trực tuyến , vui lòng nhập những gì bạn đang tìm kiếm vào hộp văn bản, sau đó nhấn đăng ký hạng mục thi Chìa khóa. Tất cả các hình ảnh tương ứng được tìm kiếm cùng một lúc, xem ảnh chụp màn hình:

4. Sau đó, chọn ảnh bạn muốn, rồi bấm Chèn cái nút. Sau khi chèn hình ảnh, vui lòng thay đổi kích thước hoặc điều chỉnh hình ảnh đến vị trí bạn cần.

Lời khuyên:

1. Để tìm kiếm một số hình ảnh cụ thể, bạn có thể lọc các hình ảnh được tìm thấy theo kích thước, loại, bố cục hoặc màu sắc khi bạn cần.

2. Bên cạnh việc chèn hình ảnh từ tìm kiếm Bing, bạn cũng có thể chèn hình ảnh được lưu trữ trên OneDrive của mình. Trong cửa sổ bên dưới, hãy nhấp vào OneDrive ở dưới cùng bên trái của cửa sổ, sau đó chọn hình ảnh bạn muốn chèn.


Khóa hình ảnh hoặc hình ảnh vào ô Excel

Thông thường, sau khi chèn hình ảnh vào các ô, khi bạn thay đổi kích thước, lọc hoặc ẩn các ô chứa hình ảnh, hình ảnh sẽ không được thay đổi kích thước hoặc lọc cùng với ô đó như hình minh họa bên dưới.

Trong trường hợp này, bạn nên khóa ảnh vào ô để có thể thay đổi kích thước, lọc hoặc ẩn cùng với ô, vui lòng thực hiện theo các bước sau:

1. Nhấp để chọn một hình ảnh và nhấn Ctrl + A để chọn tất cả các hình ảnh trong trang tính.

2. Sau đó, nhấp chuột phải vào một hình ảnh và chọn Kích thước và thuộc tính từ menu ngữ cảnh, xem ảnh chụp màn hình:

3. Trong phần mở rộng Định dạng ảnh ngăn, dưới Bất động sản phần, chọn Di chuyển và kích thước với các ô tùy chọn, xem ảnh chụp màn hình:

4. Sau đó, đóng Định dạng ảnh ngăn. Bây giờ, khi thay đổi kích thước, lọc hoặc ẩn các ô, các bức ảnh cũng sẽ được di chuyển, lọc hoặc ẩn.


Chèn nhiều hình ảnh hoặc hình ảnh trong Excel

Đôi khi, bạn có thể cần phải chèn nhiều ảnh vào các ô và tự động thay đổi kích thước để vừa với kích thước ô mà không cần thay đổi kích thước và kéo ảnh. Ở đây, tôi sẽ giới thiệu hai cách để giải quyết công việc này trong Excel.

Chèn nhiều hình ảnh hoặc hình ảnh và thay đổi kích thước chúng để phù hợp với các ô có mã VBA

Mã VBA sau có thể giúp bạn chèn nhiều hình ảnh vào ô dựa trên kích thước ô. Vui lòng làm như sau:

1. Điều chỉnh kích thước ô mà bạn muốn đặt ảnh, sau đó chọn các ô.

2. Sau đó, nhấn giữ ALT + F11 phím để mở Microsoft Visual Basic cho các ứng dụng cửa sổ.

3. Nhấp chuột Chèn > Mô-đunvà dán macro sau vào Mô-đun cửa sổ.

Mã VBA: Chèn nhiều ảnh dựa trên kích thước ô

Sub InsertPictures()
'Updateby Extendoffice
Dim PicList() As Variant
Dim PicFormat As String
Dim Rng As Range
Dim sShape As Shape
On Error Resume Next
PicList = Application.GetOpenFilename(PicFormat, MultiSelect:=True)
xColIndex = Application.ActiveCell.Column
If IsArray(PicList) Then
    xRowIndex = Application.ActiveCell.Row
    For lLoop = LBound(PicList) To UBound(PicList)
        Set Rng = Cells(xRowIndex, xColIndex)
        Set sShape = ActiveSheet.Shapes.AddPicture(PicList(lLoop), msoFalse, msoCTrue, Rng.Left, Rng.Top, Rng.Width, Rng.Height)
        xRowIndex = xRowIndex + 1
    Next
End If
End Sub

4. Sau đó nhấn F5 phím để chạy mã này. bên trong Mở cửa sổ, vui lòng chọn thư mục chứa hình ảnh, sau đó chọn hình ảnh bạn muốn chèn, sau đó nhấp vào Mở và tất cả các ảnh đã chọn đã được chèn vào lựa chọn của bạn dựa trên kích thước ô. Xem ảnh chụp màn hình:


Chèn nhiều hình ảnh hoặc hình ảnh và thay đổi kích thước chúng để phù hợp với các ô bằng một tính năng mạnh mẽ

Nếu bạn không quen thuộc với mã VBA, tại đây, bạn có thể sử dụng tính năng nguồn - Nhập ảnh of Kutools cho Excel. Với tính năng hữu ích này, bạn có thể nhập nhiều hình ảnh vào các ô một cách nhanh chóng và dễ dàng.

Sau khi cài đặt Kutools cho Excel, vui lòng thực hiện theo các bước sau:

1. Nhấp chuột Kutools Plus > Nhập khẩu xuất khẩu > Nhập ảnh, xem ảnh chụp màn hình:

2. Trong cửa sổ bật ra Nhập ảnh , vui lòng thực hiện các thao tác sau:

  • Chỉ định thứ tự hình ảnh từ danh sách Nhập đơn hàng thả xuống, bạn có thể chọn Điền vào ô theo chiều dọc sau ô or Điền vào ô theo chiều ngang sau ô;
  • Sau đó nhấn vào Thêm để chọn tệp hình ảnh hoặc thư mục để thêm hình ảnh vào Danh sách hình ảnh;
  • Nhấn vào Nhập kích thước nút, trong Nhập kích thước hình ảnh hộp thoại, chọn Kích thước ô phù hợp tùy chọn.

3. Sau khi hoàn tất cài đặt, vui lòng nhấp vào Nhập khẩu và bây giờ, một nút khác Nhập ảnh được bật ra, chỉ định các ô đích mà bạn sẽ nhập ảnh vào, xem ảnh chụp màn hình:

4. Sau đó nhấn vào OK , tất cả các hình ảnh đã chọn đã được chèn để phù hợp với kích thước của các ô cụ thể như hình ảnh chụp màn hình bên dưới:


Chèn nhiều hình ảnh hoặc hình ảnh khớp với tên của chúng vào các ô

Nếu bạn có danh sách tên sản phẩm trong một cột và bây giờ, bạn cần chèn ảnh tương ứng của chúng vào một cột khác như hình minh họa bên dưới. Chèn các hình ảnh, và sau đó kéo chúng đến từng vị trí một sẽ lãng phí rất nhiều thời gian, phần này, tôi sẽ nói về một số phương pháp nhanh chóng.

Chèn nhiều hình ảnh hoặc hình ảnh khớp với tên của chúng bằng mã VBA

Mã VBA sau có thể giúp bạn chèn nhiều hình ảnh khớp với tên của chúng một cách nhanh chóng, vui lòng thực hiện như sau:

1. Giữ ALT + F11 phím để mở Microsoft Visual Basic cho các ứng dụng cửa sổ.

2. Nhấp chuột Insert> Mô-đunvà dán macro sau vào Mô-đun cửa sổ.

Mã VBA: Chèn nhiều hình ảnh khớp với tên của chúng

Sub InserPictureByName()
'Updateby Extendoffice
Dim xFDObject As FileDialog
Dim xStrPath, xStrPicPath As String
Dim xRgName, xRgInser, xRg, xRgI As Range
Dim xFNum As Integer
Set xFDObject = Application.FileDialog(msoFileDialogFolderPicker)
With xFDObject
    .Title = "Please select the folder:"
    .InitialFileName = Application.ActiveWorkbook.Path
    .Show
    .AllowMultiSelect = False
End With
On Error Resume Next
xStrPath = ""
xStrPath = xFDObject.SelectedItems.Item(1)
If xStrPath = "" Then
Exit Sub
End If
Set xRgName = Application.InputBox("Please select the cells contain the image name:", "Kutools for Excel", , , , , , 8)
If xRgName Is Nothing Then
    MsgBox "No cells are select, exit operation! ", vbInformation, "Kutools for Excel"
    Exit Sub
End If
Set xRgInser = Application.InputBox("Please select the cells to output the images", "Kutools for Excel", , , , , , 8)
If xRgInser Is Nothing Then
    MsgBox " No cells are select, exit operation.! ", vbInformation, "Kutools for Excel"
    Exit Sub
End If
For xFNum = 1 To xRgName.Count
    Set xRg = xRgName.Item(xFNum)
    Set xRgI = xRgInser.Item(xFNum)
    xStrPicPath = xStrPath & "\" & xRg.Text & ".png"
    If Not Dir(xStrPicPath, vbDirectory) = vbNullString Then
        With xRgI.Parent.Pictures.Insert(xStrPicPath)
            .Left = xRgI.Left
            .Top = xRgI.Top
            .ShapeRange.LockAspectRatio = msoFalse
            .ShapeRange.Height = 60
            .ShapeRange.Width = 60
        End With
    End If
Next
End Sub

Chú thích: Trong đoạn mã trên, bạn có thể thay đổi chiều cao và chiều rộng của hình ảnh trong các tập lệnh “.ShapeRange.Height = 60",".ShapeRange.Width = 60”Theo nhu cầu của bạn.

3. Sau đó nhấn F5 để chạy mã này, và trong cửa sổ đã mở, vui lòng chọn thư mục chứa hình ảnh bạn muốn chèn, xem ảnh chụp màn hình:

4. Và sau đó, nhấp vào OK , một hộp nhắc xuất hiện, vui lòng chọn các ô chứa tên hình ảnh, xem ảnh chụp màn hình:

5. Tiếp tục nhấp OK và một hộp nhắc khác được theo sau, vui lòng chọn các ô mà bạn muốn xuất ảnh, xem ảnh chụp màn hình:

6. Cuối cùng, hãy nhấp vào OKvà các hình ảnh đã được chèn vào các ô dựa trên tên của chúng cùng một lúc, hãy xem ảnh chụp màn hình:


Chèn nhiều hình ảnh hoặc hình ảnh khớp với tên của chúng bằng một tính năng hữu ích

Nếu bạn có Kutools cho Excel, Với khả Khớp nhập ảnh tính năng, bạn có thể chèn hình ảnh dựa trên tên hình ảnh một cách nhanh chóng và dễ dàng.

Sau khi cài đặt Kutools cho Excel, hãy làm như sau:

1. Nhấp chuột Kutools Plus > Nhập khẩu xuất khẩu > Khớp nhập ảnh, xem ảnh chụp màn hình:

2. Trong cửa sổ bật ra Khớp ảnh nhập hộp thoại, vui lòng thực hiện các thao tác sau:

  • Chỉ định thứ tự hình ảnh từ danh sách Nhập đơn hàng thả xuống, bạn có thể chọn Điền vào ô theo chiều dọc sau ô or Điền vào ô theo chiều ngang sau ô;
  • Sau đó, từ Phạm vi đối sánh hộp văn bản, chọn tên hình ảnh mà bạn muốn chèn hình ảnh dựa trên;
  • Và sau đó, nhấp vào Thêm để chọn tệp hình ảnh hoặc thư mục để thêm hình ảnh vào Danh sách hình ảnh;
  • Tiếp theo, bạn nên xác định kích thước hình ảnh. Vui lòng bấm vào Nhập kích thước nút, trong Nhập kích thước hình ảnh hộp thoại, chọn một kích thước hình ảnh khi bạn cần.

3. Sau khi hoàn tất cài đặt, vui lòng nhấp vào Nhập khẩu , chọn một ô hoặc một danh sách các ô để xác định vị trí các hình ảnh từ ô hiện ra Khớp nhập ảnh hộp thoại, xem ảnh chụp màn hình:

4. Sau đó nhấn vào OKvà tất cả các ảnh có tên khớp với giá trị ô đã được chèn vào, hãy xem ảnh chụp màn hình:


Chèn hoặc hiển thị hình ảnh hoặc hình ảnh từ URL

Bạn đã bao giờ cố gắng hiển thị hoặc chèn hình ảnh từ danh sách URL chưa? Có thể không có phương pháp tốt nào khác để chèn hình ảnh trực tiếp trong Excel, nhưng bạn có thể áp dụng mã hoặc công cụ của bên thứ ba để xử lý nó.

Chèn hoặc hiển thị hình ảnh hoặc hình ảnh từ URL có mã VBA

Vui lòng áp dụng mã VBA sau để chèn hình ảnh dựa trên danh sách các URL.

1. Đầu tiên, điều chỉnh kích thước ô liền kề mà bạn muốn định vị hình ảnh.

2. Giữ ALT + F11 phím để mở Microsoft Visual Basic cho các ứng dụng cửa sổ.

3. Nhấp chuột Chèn > Mô-đunvà dán macro sau vào Mô-đun cửa sổ.

Mã VBA: Chèn ảnh từ danh sách URL

Sub URLPictureInsert()
'Updateby Extendoffice
Dim Pshp As Shape
Dim xRg As Range
Dim xCol As Long
On Error Resume Next
Application.ScreenUpdating = False
Set Rng = ActiveSheet.Range("A2:A5")
For Each cell In Rng
filenam = cell
ActiveSheet.Pictures.Insert(filenam).Select
Set Pshp = Selection.ShapeRange.Item(1)
If Pshp Is Nothing Then GoTo lab
xCol = cell.Column + 1
Set xRg = Cells(cell.Row, xCol)
With Pshp
.LockAspectRatio = msoFalse
If .Width > xRg.Width Then .Width = xRg.Width * 2 / 3
If .Height > xRg.Height Then .Height = xRg.Height * 2 / 3
.Top = xRg.Top + (xRg.Height - .Height) / 2
.Left = xRg.Left + (xRg.Width - .Width) / 2
End With
lab:
Set Pshp = Nothing
Range("A2").Select
Next
Application.ScreenUpdating = True
End Sub

Chú ý: Trong đoạn mã trên, A2: A5 là dải ô chứa địa chỉ URL bạn muốn trích xuất hình ảnh, bạn nên thay đổi tham chiếu ô theo nhu cầu của mình.

4. Sau đó nhấn F5 để chạy mã này, các hình ảnh phù hợp sẽ được trích xuất từ ​​các URL sang cột liền kề và được đặt ở trung tâm của các ô, xem ảnh chụp màn hình:


Chèn hoặc hiển thị hình ảnh hoặc hình ảnh từ URL với một tính năng tuyệt vời

Kutools cho Excel có một tính năng tuyệt vời - Chèn ảnh từ đường dẫn (URL). Với tiện ích này, các hình ảnh tương ứng sẽ được trích xuất từ ​​các URL một cách nhanh chóng và dễ dàng.

Sau khi cài đặt Kutools cho Excel, vui lòng thực hiện theo các bước sau:

1. Nhấp chuột Kutools > Chèn > Chèn ảnh từ đường dẫn (URL), xem ảnh chụp màn hình:

2. Trong cửa sổ bật ra Chèn ảnh từ đường dẫn (URL) hộp thoại, vui lòng thiết lập các hoạt động sau:

  • Chọn danh sách các ô URL và một loạt các ô mà bạn muốn đặt hình ảnh;
  • Chỉ định kích thước của hình ảnh khi bạn cần từ Cỡ tranh phần.

3. Và sau đó, nhấp vào Ok và tất cả các hình ảnh đã được trích xuất từ ​​các URL, hãy xem ảnh chụp màn hình:


Chèn hoặc hiển thị hình ảnh hoặc hình ảnh từ đường dẫn tệp

Nếu bạn cần chèn hình ảnh từ đường dẫn tệp, tại đây cũng cung cấp các giải pháp cho bạn.

Chèn hoặc hiển thị hình ảnh hoặc hình ảnh từ đường dẫn tệp với mã VBA

Bạn có thể áp dụng mã VBA sau để chèn hình ảnh dựa trên đường dẫn tệp hình ảnh.

1. Giữ ALT + F11 phím để mở Microsoft Visual Basic cho các ứng dụng cửa sổ.

2. Nhấp chuột Chèn > Mô-đun, và sau đó dán mã sau vào Mô-đun Cửa sổ.

Mã VBA: Chèn hình ảnh từ một loạt các đường dẫn tệp

Sub InsertPicFromFilePath()
'Updateby Extendoffice
    Dim xRg As Range
    Dim xCell As Range
    Dim xVal As String
    On Error Resume Next
    Set xRg = Application.InputBox("Please select file path cells:", "KuTools for Excel", Selection.Address, , , , , 8)
    If xRg Is Nothing Then Exit Sub
    Application.ScreenUpdating = False
    For Each xCell In xRg
        xVal = xCell.Value
        If xVal <> "" Then
            ActiveSheet.Shapes.AddPicture xCell.Value, msoFalse, msoTrue, _
            xCell.Offset(0, 1).Left, xCell.Top, xCell.Height, _
            xCell.Height
        End If
    Next
    Application.ScreenUpdating = True
End Sub

3. Sau khi chèn mã trên, nhấn F5 để chạy mã này, sau đó một hộp nhắc xuất hiện, vui lòng chọn các ô của đường dẫn tệp, xem ảnh chụp màn hình:

4. Sau đó nhấn vào OK , tất cả các hình ảnh dựa trên đường dẫn tệp đã được hiển thị trong cột tiếp theo như ảnh chụp màn hình sau:


Chèn hoặc hiển thị hình ảnh hoặc hình ảnh từ đường dẫn tệp với một tính năng tuyệt vời

Kutools cho Excel'S Chèn ảnh từ đường dẫn (URL) tính năng này cũng có thể giúp bạn hiển thị các hình ảnh tương đối từ đường dẫn tệp.

Sau khi cài đặt Kutools cho Excel, hãy làm như sau:

1. Nhấp chuột Kutools > Chèn > Chèn ảnh từ đường dẫn (URL), trong hộp thoại hiện ra, vui lòng chỉ định phạm vi đường dẫn tệp, phạm vi xuất hình ảnh, kích thước hình ảnh khi bạn cần, xem ảnh chụp màn hình:

2. Sau khi thiết lập các tùy chọn, hãy nhấp vào Ok , các hình ảnh sẽ được chèn vào các ô đã chọn cùng một lúc, xem ảnh chụp màn hình:


Chèn hình ảnh hoặc hình ảnh vào bình luận

Có thể dễ dàng để chèn ảnh vào ô, nhưng đôi khi, bạn có thể muốn chèn ảnh vào ô chú thích, bạn giải quyết công việc này như thế nào?

1. Chọn và bấm chuột phải vào ô mà bạn muốn chèn chú thích, sau đó chọn Chèn nhận xét, xem ảnh chụp màn hình:

Lời khuyên: Nếu bạn đã chèn một bình luận, vui lòng bỏ qua bước này.

2. Sau đó di con trỏ vào các cạnh của hộp nhận xét, cho đến khi bạn thấy con trỏ chuyển thành biểu tượng bốn mũi tên. Và sau đó, nhấp chuột phải và chọn Định dạng Nhận xét tùy chọn, xem ảnh chụp màn hình:

3. Trong cửa sổ bật ra Định dạng Nhận xét hộp thoại, nhấn Màu sắc và đường kẻ tab, sau đó chọn Hiệu ứng tô màu từ Màu danh sách thả xuống, xem ảnh chụp màn hình:

4. Sau đó, trong phần sau Hiệu ứng tô màu hộp thoại, nhấn Hình ảnh và nhấp vào Chọn Ảnh để chọn một hình ảnh mà bạn muốn chèn, xem ảnh chụp màn hình:

5. Và sau đó, nhấp vào OK > OK, hình ảnh đã được chèn vào hộp bình luận, xem ảnh chụp màn hình:


Chèn hình ảnh hoặc hình ảnh vào đầu trang hoặc chân trang

Nếu bạn muốn chèn ảnh vào đầu trang hoặc chân trang của trang tính Excel của mình, các bước trong phần này có thể giúp bạn, vui lòng thực hiện như sau:

1. Kích hoạt trang tính mà bạn muốn chèn hình ảnh vào đầu trang hoặc chân trang.

2. Sau đó nhấn vào Chèn > Đầu trang & Chân trang, và bạn sẽ đi đến Công cụ Đầu trang & Chân trang chuyển hướng. Xem ảnh chụp màn hình:

3. Để chèn ảnh vào đầu trang hoặc chân trang, vui lòng nhấp vào hộp đầu trang hoặc chân trang bên trái, bên phải hoặc chính giữa khi bạn cần, sau đó nhấp vào Hình ảnh theo Thiết kế tab, xem ảnh chụp màn hình:

4. Sau đó, một Chèn ảnh cửa sổ sẽ bật lên, vui lòng chọn hình ảnh bạn muốn thêm và nhấp vào Chèn. Bây giờ, một &[Hình ảnh] chỗ dành sẵn sẽ xuất hiện trong hộp đầu trang hoặc chân trang. Nhấp vào bất kỳ đâu bên ngoài hộp đầu trang hoặc chân trang, hình ảnh được chèn sẽ được hiển thị như ảnh chụp màn hình bên dưới:

Lời khuyên: Đôi khi, bạn có thể thấy rằng hình ảnh trùng lặp với vùng dữ liệu của trang tính như hình minh họa bên dưới. Điều này xảy ra do hình ảnh quá lớn và nó sẽ không được tự động thay đổi kích thước để vừa với hộp phần đầu trang hoặc chân trang.

Để giải quyết vấn đề này, bạn chỉ cần thay đổi kích thước hình ảnh trong đầu trang hoặc chân trang, vui lòng thực hiện theo các bước sau:

1. Bấm vào phần đầu trang hoặc chân trang nơi đặt hình ảnh, sau đó bấm Định dạng ảnh theo Thiết kế tab, xem ảnh chụp màn hình:

2. Trong Định dạng ảnh hộp thoại, bên dưới Kích thước máy , vui lòng điều chỉnh kích thước của hình ảnh để vừa với hộp phần đầu trang hoặc chân trang, xem ảnh chụp màn hình:

3. Và sau đó, nhấp vào OK, bạn sẽ nhận được kết quả như bạn cần.


Chèn cùng một hình ảnh hoặc hình ảnh vào nhiều trang tính

Đôi khi, bạn có thể muốn chèn ảnh biểu trưng vào tất cả các trang tính của sổ làm việc, thông thường, bạn có thể áp dụng chức năng Chèn để chèn ảnh từ trang này sang trang khác. Ngoại trừ tính năng tốn thời gian này, mã VBA sau có thể giúp bạn chèn cùng một hình ảnh vào ô cụ thể của tất cả các trang tính cùng một lúc. Vui lòng thực hiện theo các bước dưới đây:

1. Giữ ALT + F11 phím để mở Microsoft Visual Basic cho các ứng dụng cửa sổ.

2. Nhấp chuột Chèn > Mô-đunvà dán mã sau vào Mô-đun Cửa sổ.

Mã VBA: Chèn cùng một hình ảnh vào tất cả các trang tính:

Sub InsertImagetoallsheets()
'Updateby Extendoffice
    Dim I As Long
    Dim xPath As String
    Dim xShape As Shape
    Dim xRg As Range
    xPath = "C:\Users\AddinTestWin10\Desktop\my images\logo.png"
    If Dir(xPath) = "" Then
        MsgBox "Picture file was not found in path!", vbInformation, "KuTools for Excel"
        Exit Sub
    End If
    For I = 1 To ActiveWorkbook.Sheets.Count
        Set xRg = Sheets(I).Range("A1")
        Set xShape = Sheets(I).Shapes.AddPicture(xPath, True, True, xRg.Left, xRg.Top, xRg.Width, xRg.Height)
    Next
End Sub

Chú thích: Trong đoạn mã trên, C: \ Users \ AddinTestWin10 \ Desktop \ my images \ logo.png là đường dẫn và tên của hình ảnh, và A1 in Phạm vi ("A1") là ô mà bạn muốn chèn hình ảnh, vui lòng thay đổi chúng theo nhu cầu của bạn.

3. Sau đó nhấn F5 để chạy mã này và hình ảnh cụ thể đã được chèn ngay vào ô A1 của mỗi trang tính. Xem bản demo dưới đây:


Chèn hình ảnh hoặc hình ảnh phía sau nội dung ô

Để làm cho dữ liệu trang tính đẹp và hấp dẫn hơn, bạn có thể sử dụng hình ảnh làm nền. Để chèn một hình ảnh đằng sau nội dung ô, đây là một số phương pháp có thể giúp bạn.

Chèn hình ảnh hoặc hình ảnh phía sau nội dung ô bằng tính năng Nền

1. Mở trang tính mà bạn muốn chèn hình nền.

2. Sau đó nhấn vào Page Layout > Tiểu sử, xem ảnh chụp màn hình:

3. Trong cửa sổ bật ra Chèn ảnh cửa sổ, vui lòng chọn một ảnh từ máy tính, trang web hoặc OneDrive của bạn khi bạn cần, xem ảnh chụp màn hình:

4. Bây giờ, hình ảnh đã được chèn vào trang tính làm nền như ảnh chụp màn hình bên dưới:

Lời khuyên: Để xóa hình nền, chỉ cần nhấp vào Page Layout > Xóa nền. Xem ảnh chụp màn hình:


Chèn hình ảnh trong suốt hoặc hình ảnh phía sau nội dung ô

Với phương pháp trên, bạn không thể thay đổi độ trong suốt của ảnh nền đã chèn, do đó, nếu màu của ảnh nền đậm, bạn sẽ không thuận tiện khi đọc dữ liệu của trang tính. Phần này, tôi sẽ nói về cách chèn một hình ảnh trong suốt phía sau các ô.

1. Nhấp chuột Chèn > Hình dạngvà chọn một hình chữ nhật, xem ảnh chụp màn hình:

2. Sau đó, vẽ một hình dạng lớn như bạn cần trong trang tính đang hoạt động.

3. Sau khi vẽ hình, a Các công cụ vẽ tab được hiển thị trong ruy-băng, sau đó bấm Định dạng > Hình dạng phác thảo > Không có phác thảo, xem ảnh chụp màn hình:

4. Và sau đó, nhấp chuột phải vào hình dạng và chọn Định dạng hình dạng từ menu ngữ cảnh, xem ảnh chụp màn hình:

5. Trong phần mở rộng Định dạng hình dạng ngăn, dưới Điền vào dòng , hãy thực hiện các thao tác sau:

  • Bên dưới Điền phần, chọn Hình ảnh hoặc họa tiết điền vào Tùy chọn;
  • Nhấp chuột Chèn nút từ Nguồn ảnh, và chọn một hình ảnh bạn muốn chèn;
  • Sau đó, điều chỉnh độ trong suốt của hình ảnh theo nhu cầu của bạn từ minh bạchphần y.

6. Và sau đó, bạn sẽ thấy hình dạng chứa đầy hình ảnh trông giống như một hình nền như ảnh chụp màn hình ở trên được hiển thị.

Chú thích: Sau khi chèn loại ảnh nền này, bạn sẽ không được phép nhập bất kỳ văn bản nào trong phạm vi ảnh.


Chèn hình ảnh trong suốt hoặc hình ảnh phía sau nội dung ô làm hình mờ

Cả hai phương pháp trên đều có những hạn chế riêng, phương pháp đầu tiên không thể thay đổi độ trong suốt của hình ảnh, phương pháp thứ hai không cho phép nhập văn bản vào các ô bên trong vùng ảnh. Để giải quyết những vấn đề này, Kutools cho Excel'S Chèn hình mờ tính năng có thể giúp bạn một lợi ích

Sau khi cài đặt Kutools cho Excel, hãy làm như sau:

1. Nhấp chuột Kutools > Chèn > Chèn hình mờ, xem ảnh chụp màn hình:

2. Trong cửa sổ bật ra Chèn hình mờ hộp thoại, chọn Hình mờ hình ảnh, Và sau đó nhấp vào Chọn Ảnh để chọn một hình ảnh bạn muốn chèn, sau đó chỉ định tỷ lệ hình ảnh và kiểm tra tùy chọn Washout, xem ảnh chụp màn hình:

3. Sau đó nhấn vào Ok , hình ảnh đã được chèn vào trang tính làm hình nền.


Chèn một dải ô dưới dạng hình ảnh hoặc định dạng ảnh trong Excel

Bạn đã bao giờ cố gắng sao chép một loạt các ô và chèn nó dưới dạng hình ảnh trong Excel chưa? Phần này, tôi sẽ giới thiệu một số cách nhanh chóng để giải quyết công việc này trong Excel.

Chèn một dải ô dưới dạng hình ảnh hoặc định dạng hình ảnh với tính năng Sao chép dưới dạng Hình ảnh

Trong Excel, bạn có thể sử dụng Sao chép dưới dạng hình ảnh chức năng sao chép và chèn một dải ô dưới dạng hình ảnh.

1. Chọn phạm vi ô mà bạn muốn sao chép và chèn dưới dạng hình ảnh.

2. Sau đó nhấn vào Trang Chủ > Sao chép > Sao chép dưới dạng hình ảnh, xem ảnh chụp màn hình:

3. Trong cửa sổ bật ra Sao chép hình ảnh hộp thoại, chọn Hình ảnh từ Định dạng , xem ảnh chụp màn hình:

4. Sau đó nhấn vào OK , bây giờ, bạn chỉ cần nhấn Ctrl + V để dán hình ảnh vào bất kỳ vị trí nào của sổ làm việc.


Chèn một dải ô dưới dạng hình ảnh hoặc định dạng hình ảnh bằng công cụ Máy ảnh

Trong Excel, có một Máy Chụp Hình công cụ này có thể giúp bạn chụp ảnh cho dữ liệu đã chọn của bạn, sau đó dán nó dưới dạng hình ảnh. Khi dữ liệu ban đầu thay đổi, hình ảnh được sao chép sẽ được thay đổi động.

Đầu tiên, bạn nên hiển thị Máy Chụp Hình trên ruy-băng, và sau đó áp dụng nó.

1. Nhấp chuột Tùy chỉnh thanh công cụ truy cập nhanh biểu tượng, và sau đó nhấp vào Các lệnh khác tùy chọn, xem ảnh chụp màn hình:

2. Trong mở Tùy chọn Excel hộp thoại, vui lòng thực hiện các thao tác sau:

  • Chọn Tất cả các lệnh từ Chọn lệnh từ thả xuống;
  • Sau đó, cuộn để chọn Máy Chụp Hình từ hộp danh sách;
  • Và sau đó, nhấp vào Thêm để thêm công cụ này vào Tùy chỉnh thanh công cụ truy cập nhanh;
  • Cuối cùng, hãy nhấp vào OK để đóng hộp thoại này.

3. Và Máy Chụp Hình công cụ đã được hiển thị trên ruy-băng, xem ảnh chụp màn hình:

4. Sau đó, chọn phạm vi ô mà bạn muốn có hình ảnh.

5. Và sau đó, nhấp vào Máy Chụp Hình công cụ, sau đó đi tới trang tính và nhấp vào bất kỳ đâu, phạm vi dữ liệu sẽ được chèn vào dưới dạng hình ảnh như minh họa bên dưới:


Chèn một dải ô dưới dạng hình ảnh hoặc định dạng hình ảnh với một tính năng hữu ích

Nếu bạn có Kutools cho Excel, Với khả Thư viện tài nguyên , bạn có thể lưu dữ liệu đã chọn vào Thư viện tài nguyên, và sau đó sử dụng nó dưới dạng hình ảnh hoặc văn bản cho tương lai như bạn muốn.

Sau khi cài đặt Kutools cho Excel, hãy làm như sau:

1. Chọn phạm vi dữ liệu mà bạn muốn chèn dưới dạng hình ảnh.

2. Sau đó nhấn vào Kutools > THÔNG TIN, xem ảnh chụp màn hình:

3. Trong phần mở rộng THÔNG TIN pane, click Thư viện tài nguyên biểu tượng, và sau đó nhấp vào Thêm nội dung đã chọn vào Thư viện tài nguyên biểu tượng, xem ảnh chụp màn hình:

4. Trong Mục nhập Thư viện tài nguyên mới hộp thoại, chỉ định tên cho mục này, sau đó chọn một nhóm bạn muốn thêm vào. Xem ảnh chụp màn hình:

5. Sau đó nhấn vào Thêm nút để thêm nó vào Thư viện tài nguyên ngăn. Nếu bạn muốn chèn phạm vi này dưới dạng ảnh, chỉ cần bấm vào một ô để xác định vị trí ảnh, sau đó tìm mục đã lưu từ Thư viện tài nguyên và nhấp vào Chèn dưới dạng > Hình ảnh (EMF) từ danh sách thả xuống của mục. Và dải dữ liệu sẽ được chèn vào trang tính dưới dạng hình ảnh, hãy xem ảnh chụp màn hình:


Chèn hình ảnh hoặc hình ảnh dựa trên giá trị ô một cách động

Trong phần này, tôi sẽ chỉ cho bạn cách hiển thị một hình ảnh cụ thể dựa trên một giá trị ô. Ví dụ: tôi muốn hiển thị hình ảnh tương ứng khi tôi chọn một mục cụ thể từ một ô thả xuống và khi tôi chọn một mục khác, hình ảnh sẽ được thay đổi động như hình minh họa bên dưới:

Chèn hình ảnh hoặc hình ảnh động dựa trên giá trị ô với tính năng Dải ô được đặt tên

Thông thường, trong Excel, bạn có thể tạo một phạm vi được đặt tên động, sau đó sử dụng ảnh được liên kết để giải quyết tác vụ này trong Excel.

1. Đầu tiên, bạn nên tạo hai cột chứa tên sản phẩm và hình ảnh tương đối, xem ảnh chụp màn hình:

2. Sau đó, vui lòng tạo một danh sách thả xuống cho các giá trị ô. Bấm vào ô để xuất danh sách thả xuống, sau đó bấm Ngày > Xác nhận dữ liệu > Xác nhận dữ liệu, xem ảnh chụp màn hình:

3. Trong cửa sổ bật ra Xác nhận dữ liệu hộp thoại, bên dưới Cài đặt tab, chọn Danh sách từ Cho phép thả xuống, sau đó chọn các ô mà bạn muốn tạo danh sách thả xuống từ nguồn hộp văn bản, xem ảnh chụp màn hình:

4. Nhấp chuột OKvà danh sách thả xuống với các giá trị ô đã được tạo, hãy chọn một mục từ danh sách thả xuống, xem ảnh chụp màn hình:

5. Sau đó nhấn vào Công thức > Xác định tên, xem ảnh chụp màn hình:

6. Trong Tên mới hộp thoại, vui lòng thực hiện các thao tác sau:

  • Nhập tên gọi là myimage vào Họ tên hộp văn bản;
  • Sau đó, sao chép và dán công thức này: =INDEX(Sheet11!$A$2:$B$6,MATCH(Sheet11!$E$2,Sheet11!$A$2:$A$6,0),2) vào hộp văn bản Tham chiếu đến.

Chú thích: Trong công thức trên:

  • Trang tính 11! $ A $ 2: $ B $ 6: là trang tính và phạm vi chứa các giá trị và hình ảnh bạn muốn sử dụng;
  • Trang tính 11! $ E $ 2: là ô trong trang tính nơi bạn đã tạo danh sách thả xuống;
  • Trang tính 11! $ A $ 2: $ A $ 6: là danh sách các ô mà bạn được tạo danh sách thả xuống dựa trên;
  • Số biến 2 là số cột chứa hình ảnh. Nếu hình ảnh của bạn nằm trong cột C, bạn nên nhập 3.

7. Và sau đó, nhấp vào OK , sau đó vui lòng sao chép và dán ảnh tương ứng dựa trên giá trị ô trong E2 từ dải ô gốc sang ô F2, xem ảnh chụp màn hình:

8. Tiếp theo, vui lòng chọn hình ảnh trong ô F2, sau đó nhập công thức này = myimage (hình ảnh của tôi là tên phạm vi mà bạn đã tạo ở bước 6) vào thanh công thức, xem ảnh chụp màn hình:

9. Sau khi nhập công thức, nhấn đăng ký hạng mục thi và bây giờ, khi bạn chọn một mục từ danh sách thả xuống, hình ảnh tương đối của nó sẽ được hiển thị ngay lập tức. Xem ảnh chụp màn hình:


Chèn hình ảnh hoặc hình ảnh dựa trên giá trị ô một cách linh động với một tính năng tiện dụng

Phương pháp trên có thể khó đối với hầu hết chúng ta, ở đây, tôi sẽ giới thiệu một tính năng tiện dụng - Danh sách Hình ảnh thả xuống of Kutools cho Excel, với công cụ hữu ích này, bạn có thể tạo nhiều danh sách thả xuống với hình ảnh tương đối của chúng chỉ với vài cú nhấp chuột.

Sau khi cài đặt Kutools cho Excel, vui lòng thực hiện theo các bước sau:

1. Đầu tiên, bạn nên tạo hai cột chứa tên sản phẩm và hình ảnh tương đối trong trang tính của mình.

2. Và sau đó, nhấp vào Kutools > Danh sách thả xuống > Danh sách Hình ảnh thả xuống, xem ảnh chụp màn hình:

3. Trong Danh sách Hình ảnh thả xuống hộp thoại, nếu bạn đã tạo các cột giá trị ô và hình ảnh, vui lòng bỏ qua bước 1, sau đó, chọn dải dữ liệu và hình ảnh gốc và dải ô đầu ra, xem ảnh chụp màn hình:

4. Và sau đó, nhấp vào Ok , danh sách thả xuống với hình ảnh đã được tạo vào các ô đã chọn và khi chọn một mục từ ô thả xuống, hình ảnh tương ứng của nó sẽ được hiển thị cùng một lúc, hãy xem bản trình diễn bên dưới:


Xuất hoặc lưu tất cả hình ảnh hoặc hình ảnh từ tệp Excel

Nếu có nhiều hình ảnh trong sổ làm việc của bạn và bây giờ, bạn muốn trích xuất và lưu tất cả hình ảnh từ tệp Excel vào một thư mục. Làm thế nào bạn có thể giải quyết công việc này trong Excel?

Xuất hoặc lưu tất cả hình ảnh hoặc hình ảnh từ Excel với tính năng Save As

Thông thường, bạn có thể sử dụng Save As để lưu tất cả hình ảnh từ sổ làm việc, vui lòng thực hiện như sau:

1. Nhấp chuột Tập tin > Save As, Trong Save As cửa sổ, chỉ định một thư mục để đặt các tệp đã xuất, sau đó chọn Trang Web (*. Htm; *. Html) từ Tiết kiệm như gõ danh sách thả xuống, xem ảnh chụp màn hình:

2. Và sau đó nhấp vào Lưu , vào thư mục cụ thể, bạn sẽ thấy hai tệp, một là tệp định dạng HTML và một tệp khác là thư mục chứa hình ảnh, biểu đồ hoặc các đối tượng khác từ sổ làm việc. Xem ảnh chụp màn hình:

3. Sau đó, bạn chỉ có thể kéo các hình ảnh vào một thư mục khác khi cần.

Chú thích: Bằng cách sử dụng cái này Save As tính năng, bạn sẽ nhận được mỗi hình ảnh hai lần, một hình nhỏ hơn, một hình khác lớn hơn, vì vậy bạn có thể lưu hình ảnh có độ phân giải cao hơn khi bạn cần.


Xuất hoặc lưu tất cả hình ảnh hoặc hình ảnh từ Excel với việc thay đổi phần mở rộng tệp

Để lưu tất cả hình ảnh từ tệp Excel, bạn cũng có thể thay đổi phần mở rộng tệp thành RAR. Vui lòng làm như sau:

1. Thay đổi phần mở rộng tệp xlsx đến rar như ảnh chụp màn hình dưới đây được hiển thị:

2. Sau đó, giải nén tệp và bạn sẽ thấy 3 thư mục và 1 tệp trong thư mục, xem ảnh chụp màn hình:

3. Sau đó, nhấp để mở xl thư mục, và sau đó mở phương tiện truyền thông thư mục, bạn sẽ thấy tất cả các hình ảnh được lưu trữ ở đây mà không có bản sao, xem ảnh chụp màn hình:


Xuất hoặc lưu tất cả hình ảnh hoặc hình ảnh từ Excel với một tính năng mạnh mẽ

Nếu bạn có Kutools cho Excel, Với khả Xuất đồ họa , bạn có thể nhanh chóng xuất một số đối tượng cụ thể, chẳng hạn như hình ảnh, biểu đồ, hình dạng sang định dạng hình ảnh khi bạn cần.

Sau khi cài đặt Kutools cho Excel, vui lòng thực hiện theo các bước sau:

1. Nhấp chuột Kutools Plus > Nhập khẩu xuất khẩu > Xuất đồ họa, xem ảnh chụp màn hình:

2. Trong Xuất đồ họa hộp thoại, hãy thực hiện các thao tác sau:

  • Chọn Những bức ảnh tùy chọn từ Các loại danh sách thả xuống;
  • Chỉ định một thư mục để lưu ảnh xuất của bạn;
  • Sau đó nhấp vào danh sách thả xuống từ Định dạng xuất để chọn một định dạng cho ảnh của bạn.

3. Cuối cùng, hãy nhấp vào Ok , tất cả hình ảnh trong sổ làm việc hiện tại đã được lưu vào thư mục bạn đã chỉ định, xem ảnh chụp màn hình:


Đổi tên tên hình ảnh trong một thư mục dựa trên danh sách các ô trong Excel

Nếu bạn có nhiều hình ảnh trong một thư mục và bây giờ, bạn muốn đổi tên tất cả những hình ảnh này, làm thế nào bạn có thể giải quyết công việc này một cách dễ dàng trong Excel?

Trong Excel, trước tiên, bạn nên liệt kê tất cả các tên hình ảnh cũ thành một cột, sau đó nhập các tên mới, cuối cùng, áp dụng mã VBA để thay thế các tên cũ bằng các tên mới cùng một lúc. Vui lòng thực hiện theo các bước dưới đây:

1. Vui lòng liệt kê tất cả các tên hình ảnh vào một danh sách các ô hoặc bạn có thể áp dụng mã dưới đây để liệt kê tất cả các tên hình ảnh trong một thư mục cụ thể mà không cần nhập từng tên một theo cách thủ công.

2. Nhấn giữ ALT + F11 phím để mở Microsoft Visual Basic cho các ứng dụng Cửa sổ.

3. Nhấp chuột Chèn > Mô-đunvà dán macro sau vào Mô-đun cửa sổ.

Mã VBA: liệt kê tất cả các tên hình ảnh từ một thư mục

Sub MainList()
'Updateby Extendoffice
On Error Resume Next
Set xRg = Application.InputBox("Please select a cell to put the filenames:", "KuTools For Excel", Selection.Address, , , , , 8)
If xRg Is Nothing Then Exit Sub
Set xRg = xRg(1)
Set Folder = Application.FileDialog(msoFileDialogFolderPicker)
If Folder.Show <> -1 Then Exit Sub
xDir = Folder.SelectedItems(1)
Call ListFilesInFolder(xRg, xDir, True)
End Sub
Sub ListFilesInFolder(ByVal xRg As Range, ByVal xFolderName As String, ByVal xIsSubfolders As Boolean)
Dim xFileSystemObject As Object
Dim xFolder As Object
Dim xSubFolder As Object
Dim xFile As Object
Dim rowIndex As Long
Set xFileSystemObject = CreateObject("Scripting.FileSystemObject")
Set xFolder = xFileSystemObject.GetFolder(xFolderName)
rowIndex = 1
For Each xFile In xFolder.Files
xRg.Formula = xFile.Name
Set xRg = xRg.Offset(rowIndex)
rowIndex = 1
Next xFile
If xIsSubfolders Then
For Each xSubFolder In xFolder.SubFolders
ListFilesInFolder xRg, xSubFolder.Path, True
Next xSubFolder
End If
Set xFile = Nothing
Set xFolder = Nothing
Set xFileSystemObject = Nothing
End Sub

4. Sau đó nhấn F5 để chạy mã này và một hộp nhắc xuất hiện, vui lòng nhấp vào ô để xuất tên hình ảnh, xem ảnh chụp màn hình:

5. Sau đó nhấn vào OK, Một Xem hộp thoại sẽ bật ra, vui lòng chọn thư mục chứa ảnh bạn muốn liệt kê tất cả tên ảnh, xem ảnh chụp màn hình:

6. Nhấp chuột OK, tất cả các tên hình ảnh trong thư mục cụ thể đã được liệt kê vào các ô, xem ảnh chụp màn hình:

7. Sau đó, nhập các tên mới bạn cần vào một cột khác như hình minh họa bên dưới:

8. Và sau đó, bạn có thể áp dụng mã dưới đây để đổi tên hình ảnh, tiếp tục nhấn ALT + F11 phím để mở Microsoft Visual Basic cho các ứng dụng Cửa sổ.

9. Nhấp chuột Chèn > Mô-đunvà dán macro sau vào Mô-đun cửa sổ.

Mã VBA: Đổi tên nhiều tệp trong một thư mục

Sub RenameFiles()
'Updateby Extendoffice
Dim xDir As String
Dim xFile As String
Dim xRow As Long
With Application.FileDialog(msoFileDialogFolderPicker)
    .AllowMultiSelect = False
If .Show = -1 Then
    xDir = .SelectedItems(1)
    xFile = Dir(xDir & Application.PathSeparator & "*")
    Do Until xFile = ""
        xRow = 0
        On Error Resume Next
        xRow = Application.Match(xFile, Range("A:A"), 0)
        If xRow > 0 Then
            Name xDir & Application.PathSeparator & xFile As _
            xDir & Application.PathSeparator & Cells(xRow, "B").Value
        End If
        xFile = Dir
    Loop
End If
End With
End Sub

Chú thích: Trong đoạn mã trên, A: A cho biết danh sách tên hình ảnh cũ mà bạn muốn đổi tên và B chứa các tên hình ảnh mới mà bạn muốn sử dụng, bạn có thể thay đổi chúng theo nhu cầu của mình.

10. Sau đó nhấn F5 phím để chạy mã này và trong cửa sổ bật ra Xem cửa sổ, chọn thư mục chứa hình ảnh bạn muốn đổi tên, xem ảnh chụp màn hình:

11. Và sau đó, nhấp vào OK , tất cả các tên hình ảnh đã được thay thế bằng các tên mới như hình ảnh chụp màn hình dưới đây:


Phóng to hoặc thu nhỏ hình ảnh khi nhấp vào nó

Giả sử, bạn đã chèn một hình ảnh nhỏ vào trang tính, bây giờ, bạn muốn phóng to hình ảnh khi nhấp vào nó và thu nhỏ hình ảnh khi nhấp lại như hình minh họa bên dưới. Làm thế nào bạn có thể giải quyết công việc này trong Excel?

Để phóng to hoặc thu nhỏ kích thước hình ảnh khi nhấp vào nó, đoạn mã sau có thể giúp bạn. Vui lòng thực hiện theo các bước dưới đây:

1. Nhấp chuột phải vào hình ảnh và chọn Chỉ định Macro, xem ảnh chụp màn hình:

2. Sau đó, trong cửa sổ bật ra Chỉ định Macro hộp thoại, nhấp vào Mới nút, xem ảnh chụp màn hình:

3. Trong Microsoft Visual Basic cho các ứng dụng cửa sổ, vui lòng sao chép và dán đoạn mã dưới đây vào giữa SubEnd Sub mã. Xem ảnh chụp màn hình:

Dim shp As Shape
    Dim big As Single, small As Single
    Dim shpDouH As Double, shpDouOriH As Double
    big = 3  
    small = 1
    On Error Resume Next
    Set shp = ActiveSheet.Shapes(Application.Caller)
    With shp
        shpDouH = .Height
        .ScaleHeight 1, msoTrue, msoScaleFromTopLeft
        shpDouOriH = .Height
     
        If Round(shpDouH / shpDouOriH, 2) = big Then
            .ScaleHeight small, msoTrue, msoScaleFromTopLeft
            .ScaleWidth small, msoTrue, msoScaleFromTopLeft
            .ZOrder msoSendToBack
        Else
            .ScaleHeight big, msoTrue, msoScaleFromTopLeft
            .ScaleWidth big, msoTrue, msoScaleFromTopLeft
            .ZOrder msoBringToFront
        End If
    End With

4. Sau đó nhấn Tổ hợp phím + Q chìa khóa để đóng Microsoft Visual Basic cho các ứng dụng cửa sổ. Bây giờ, khi bạn nhấp vào hình ảnh, nó sẽ được phóng to theo kích thước bạn đã chỉ định, và nhấp lại vào hình ảnh sẽ thu nhỏ lại kích thước ban đầu như hình minh họa bên dưới:


Luôn thả nổi hình ảnh khi cuộn trang tính

Đôi khi, bạn có thể muốn làm nổi ảnh trên màn hình trang tính ngay cả khi bạn cuộn lên hoặc xuống trang tính để bạn có thể xem ảnh mọi lúc. Trong phần này, tôi sẽ giới thiệu một thủ thuật nhanh để bạn giải quyết công việc này trong Excel. Vui lòng thực hiện theo các bước sau:

1. Đầu tiên, chèn một hình ảnh mà bạn muốn sử dụng.

2. Sau đó, bấm chuột phải vào tab trang tính có chứa ảnh bạn muốn luôn hiển thị, rồi chọn Mã Chế độ xem từ menu ngữ cảnh. Trong khai trương Microsoft Visual Basic cho các ứng dụng cửa sổ, sao chép và dán mã dưới đây vào Mô-đun trống:

Mã VBA: Luôn thả nổi hình ảnh trong trang tính

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'Updateby Extendoffice
    Application.ScreenUpdating = False
    If Target.Cells.Count > 1 Then Exit Sub
        With ActiveSheet.Shapes("Picture1")
            .Top = ActiveWindow.VisibleRange.Top + 5
            .Left = ActiveWindow.VisibleRange.Left + ActiveWindow.VisibleRange.Width - .Width - 45
        End With
    Application.ScreenUpdating = False
End Sub

Chú thích: Trong mã này, Hình ảnh 1 là tên hình ảnh bạn đã chèn, vui lòng thay đổi nó theo nhu cầu của bạn.

3. Sau đó, lưu và đóng cửa sổ mã, bây giờ, khi cuộn trang tính và nhấp vào một ô, hình ảnh sẽ luôn được giữ ở góc trên cùng bên phải của trang tính. Xem ảnh chụp màn hình:


Xóa hình ảnh hoặc hình ảnh khỏi trang tính hiện hoạt / một loạt ô

Bạn có bất kỳ cách nhanh chóng nào để xóa tất cả hình ảnh khỏi trang tính, phạm vi ô hoặc sổ làm việc hiện tại không? Phần này, tôi sẽ giới thiệu một số phương pháp để giải quyết công việc này trong Excel.

Xóa hình ảnh hoặc hình ảnh khỏi trang tính đang hoạt động bằng mã VBA

Để xóa ảnh khỏi trang tính hiện tại, mã VBA dưới đây có thể giúp bạn, vui lòng thực hiện như sau:

1. Kích hoạt trang tính có chứa hình ảnh bạn muốn xóa.

2. Giữ ALT + F11 phím để mở Microsoft Visual Basic cho các ứng dụng cửa sổ.

3. Nhấp chuột Chèn > Mô-đunvà dán macro sau vào Mô-đun Cửa sổ.

Mã VBA: Xóa tất cả ảnh khỏi trang tính hiện tại

Sub DeleteAllPics()
'Updateby Extendoffice
Dim Pic As Object
For Each Pic In ActiveSheet.Pictures
Pic.Delete
Next Pic
End Sub

4. Sau đó nhấn F5 để chạy mã này và tất cả ảnh trong trang tính đang hoạt động sẽ bị xóa cùng một lúc.


Xóa hình ảnh hoặc hình ảnh từ một loạt các ô có mã VBA

Nếu bạn chỉ cần xóa hình ảnh khỏi một phạm vi ô, đây là một mã đơn giản khác có thể giúp bạn.

1. Giữ ALT + F11 phím để mở Microsoft Visual Basic cho các ứng dụng cửa sổ.

2. Nhấp chuột Chèn > Mô-đunvà dán macro sau vào Mô-đun Cửa sổ.

Mã VBA: Xóa ảnh khỏi một loạt ô

Sub DeletePic()
'Updateby Extendoffice
    Dim xPicRg As Range
    Dim xPic As Picture
    Dim xRg As Range
    Application.ScreenUpdating = False
    Set xRg = Range("B4:C6")
    For Each xPic In ActiveSheet.Pictures
        Set xPicRg = Range(xPic.TopLeftCell.Address & ":" & xPic.BottomRightCell.Address)
        If Not Intersect(xRg, xPicRg) Is Nothing Then xPic.Delete
    Next
    Application.ScreenUpdating = True
End Sub

Chú thích: Trong đoạn mã trên, B4: C6 là phạm vi mà bạn muốn xóa ảnh.

3. Sau đó nhấn F5 để chạy mã này và các ảnh trong phạm vi đã chọn sẽ bị xóa ngay lập tức, hãy xem ảnh chụp màn hình:


Xóa hình ảnh hoặc hình ảnh khỏi trang tính đang hoạt động, trang tính đã chọn, tất cả các trang tính bằng một tính năng tiện dụng

Nếu bạn có Kutools cho Excel, Với khả Xóa Hình minh họa & Đối tượng tính năng, bạn có thể nhanh chóng xóa hình ảnh khỏi trang tính, một số trang tính đã chọn hoặc toàn bộ sổ làm việc.

Sau khi cài đặt Kutools cho Excel, vui lòng thực hiện theo các bước sau:

1. Nhấp chuột Kutools > Xóa bỏ > Xóa Hình minh họa & Đối tượng, xem ảnh chụp màn hình:

2. Trong mở Xóa Hình minh họa & Đối tượng hộp thoại, kiểm tra Những bức ảnh từ Xóa bỏ và sau đó chỉ định phạm vi mà bạn muốn xóa ảnh trong nhìn vào , xem ảnh chụp màn hình:

3. Sau đó nhấn vào Ok và tất cả ảnh sẽ bị xóa khỏi trang tính, các trang tính đã chọn hoặc toàn bộ sổ làm việc như bạn đã chỉ định.


  • Thanh siêu công thức (dễ dàng chỉnh sửa nhiều dòng văn bản và công thức); Bố cục đọc (dễ dàng đọc và chỉnh sửa số lượng ô lớn); Dán vào Dải ô đã Lọchữu ích. Cảm ơn !
  • Hợp nhất các ô / hàng / cột và Lưu giữ dữ liệu; Nội dung phân chia ô; Kết hợp các hàng trùng lặp và Tổng / Trung bình... Ngăn chặn các ô trùng lặp; So sánh các dãyhữu ích. Cảm ơn !
  • Chọn trùng lặp hoặc duy nhất Hàng; Chọn hàng trống (tất cả các ô đều trống); Tìm siêu và Tìm mờ trong Nhiều Sổ làm việc; Chọn ngẫu nhiên ...
  • Bản sao chính xác Nhiều ô mà không thay đổi tham chiếu công thức; Tự động tạo tài liệu tham khảo sang Nhiều Trang tính; Chèn Bullets, Hộp kiểm và hơn thế nữa ...
  • Yêu thích và Chèn công thức nhanh chóng, Dãy, Biểu đồ và Hình ảnh; Mã hóa ô với mật khẩu; Tạo danh sách gửi thư và gửi email ...
  • Trích xuất văn bản, Thêm Văn bản, Xóa theo Vị trí, Xóa không gian; Tạo và In Tổng số phân trang; Chuyển đổi giữa nội dung ô và nhận xéthữu ích. Cảm ơn !
  • Siêu lọc (lưu và áp dụng các lược đồ lọc cho các trang tính khác); Sắp xếp nâng cao theo tháng / tuần / ngày, tần suất và hơn thế nữa; Bộ lọc đặc biệt bằng cách in đậm, in nghiêng ...
  • Kết hợp Workbook và WorkSheets; Hợp nhất các bảng dựa trên các cột chính; Chia dữ liệu thành nhiều trang tính; Chuyển đổi hàng loạt xls, xlsx và PDFhữu ích. Cảm ơn !
  • Nhóm bảng tổng hợp theo số tuần, ngày trong tuần và hơn thế nữa ... Hiển thị các ô đã mở khóa, đã khóa bởi các màu sắc khác nhau; Đánh dấu các ô có công thức / tênhữu ích. Cảm ơn !
tab kte 201905
  • Cho phép chỉnh sửa và đọc theo thẻ trong Word, Excel, PowerPoint, Publisher, Access, Visio và Project.
  • Mở và tạo nhiều tài liệu trong các tab mới của cùng một cửa sổ, thay vì trong các cửa sổ mới.
  • Tăng 50% năng suất của bạn và giảm hàng trăm cú nhấp chuột cho bạn mỗi ngày!
officetab dưới cùng
Comments (5)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Geachte,

Zeer interesse pagina.

Wel stel ik me de vraag hoe we na input van de foto's, die foto's in het midden van de cel krijgen.

Bestaat er hier ook een macro voor.?
This comment was minimized by the moderator on the site
Hello,
There are several vba codes in this article, which VBA code do you need to put the pictures in center of the cells?
Thank you!
This comment was minimized by the moderator on the site
Good afternoon,

Very nice page.

Only I tried the VBA of "Insert Multiple Images Or Images That Match Their Names With VBA Code" but unfortunately it doesn't work.

I can finish everything but unfortunately I can't get with pictures in the excel.

Any idea what the problem could be here?
This comment was minimized by the moderator on the site
Hello, janick,The code works well in my workbook, do you select the correct folder contains the images? Please check it?
Thank you!
This comment was minimized by the moderator on the site
This is a great article! I really like how you presented it so easy to understand
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations