ไปยังเนื้อหาหลัก

รูปภาพ Excel: แทรกเปลี่ยนลบรูปภาพหรือรูปภาพหลายรูปใน Excel

ในบทช่วยสอนนี้เราจะพูดถึงวิธีแทรกรูปภาพหลายรูปลงในเซลล์และปรับขนาดให้พอดีกับขนาดเซลล์วิธีแทรกรูปภาพลงในความคิดเห็นส่วนหัวหรือส่วนท้ายวิธีแทรกรูปภาพจาก URL และอื่น ๆ นอกจากนี้ยังอธิบายวิธีการบันทึกเปลี่ยนชื่อลบภาพหลายภาพตามที่คุณต้องการใน Excel

สารบัญ:

1. แทรกรูปภาพหรือรูปภาพลงในแผ่นงานจากคอมพิวเตอร์เว็บหรือ OneDrive

2. ล็อครูปภาพหรือรูปภาพลงในเซลล์ Excel

3. แทรกรูปภาพหรือรูปภาพหลาย ๆ รูปใน Excel

4. แทรกรูปภาพหลายรูปหรือรูปภาพที่ตรงกับชื่อลงในเซลล์

5. แทรกหรือแสดงรูปภาพหรือรูปภาพจาก URL

6. แทรกหรือแสดงรูปภาพหรือรูปภาพจากเส้นทางไฟล์

7. แทรกรูปภาพหรือรูปภาพลงในความคิดเห็น

8. แทรกรูปภาพหรือรูปภาพลงในส่วนหัวหรือส่วนท้าย

9. แทรกรูปภาพเดียวกันหรือรูปภาพลงในแผ่นงานหลายแผ่น

10. แทรกรูปภาพหรือรูปภาพด้านหลังเนื้อหาของเซลล์

11. แทรกช่วงของเซลล์เป็นรูปภาพหรือรูปแบบรูปภาพใน Excel

12. แทรกรูปภาพหรือรูปภาพตามค่าของเซลล์แบบไดนามิก

13. ส่งออกหรือบันทึกรูปภาพหรือรูปภาพทั้งหมดจากไฟล์ Excel

14. เปลี่ยนชื่อรูปภาพในโฟลเดอร์ตามรายการเซลล์ใน Excel

15. ขยายหรือย่อภาพเมื่อคลิก

16. ลอยรูปภาพเสมอเมื่อเลื่อนแผ่นงาน

17. ลบรูปภาพหรือรูปภาพจากแผ่นงานที่ใช้งานอยู่ / ช่วงของเซลล์


แทรกรูปภาพหรือรูปภาพลงในแผ่นงานจากคอมพิวเตอร์เว็บหรือ OneDrive

Excel ทุกเวอร์ชันรองรับการแทรกรูปภาพหรือรูปภาพจากคอมพิวเตอร์ แต่ถ้าคุณต้องการแทรกรูปภาพจากเว็บหรือ OneDrive คุณควรมี Excel 2013 และเวอร์ชันที่ใหม่กว่า

แทรกรูปภาพหรือรูปภาพจากคอมพิวเตอร์

เป็นเรื่องง่ายสำหรับพวกเราส่วนใหญ่ในการแทรกรูปภาพที่เก็บไว้ในคอมพิวเตอร์ลงในแผ่นงาน กรุณาทำตามนี้:

1. ในแผ่นงานให้คลิกตำแหน่งที่คุณต้องการแทรกรูปภาพ

2. จากนั้นคลิก สิ่งที่ใส่เข้าไป > ภาพ > เครื่องมือนี้ดูภาพหน้าจอ:

3. ในการโผล่ออกมา แทรกรูปภาพ เปิดโฟลเดอร์ที่มีรูปภาพจากนั้นกดค้างไว้ Ctrl เพื่อเลือกภาพที่คุณต้องการแทรกดูภาพหน้าจอ:

4. จากนั้นคลิก สิ่งที่ใส่เข้าไป ภาพที่เลือกจะถูกแทรกลงในแผ่นงาน ตอนนี้คุณสามารถปรับหรือปรับขนาดภาพไปยังเซลล์ที่คุณต้องการดูภาพหน้าจอ:


แทรกรูปภาพหรือรูปภาพจากเว็บหรือ OneDrive

หากคุณมี Excel 2013 หรือเวอร์ชันที่ใหม่กว่าคุณสามารถแทรกรูปภาพจากเว็บหรือ One Drive ได้โปรดดำเนินการดังนี้:

1. ในแผ่นงานให้คลิกตำแหน่งที่คุณต้องการแทรกรูปภาพ

2. จากนั้นคลิก สิ่งที่ใส่เข้าไป > ภาพ > รูปภาพออนไลน์ดูภาพหน้าจอ:

3. หน้าต่างต่อไปนี้จะปรากฏขึ้น ใน รูปภาพออนไลน์ โปรดพิมพ์สิ่งที่คุณต้องการลงในกล่องข้อความจากนั้นกด เข้าสู่ สำคัญ. ค้นหารูปภาพที่เกี่ยวข้องทั้งหมดพร้อมกันดูภาพหน้าจอ:

4. จากนั้นเลือกรูปภาพที่คุณต้องการจากนั้นคลิก สิ่งที่ใส่เข้าไป ปุ่ม. หลังจากใส่รูปภาพแล้วโปรดปรับขนาดหรือปรับรูปภาพให้อยู่ในตำแหน่งที่คุณต้องการ

ทิปส์:

1. ในการค้นหาภาพบางภาพคุณสามารถกรองภาพที่พบตามขนาดประเภทเค้าโครงหรือสีตามที่คุณต้องการ

2. นอกจากการแทรกรูปภาพจากการค้นหา Bing แล้วคุณยังสามารถแทรกรูปภาพที่เก็บไว้ใน OneDrive ของคุณได้อีกด้วย ในหน้าต่างด้านล่างคลิก วันไดรฟ์ ที่ด้านล่างซ้ายของหน้าต่างจากนั้นเลือกรูปภาพที่คุณต้องการแทรก


ล็อครูปภาพหรือรูปภาพลงในเซลล์ Excel

โดยปกติหลังจากแทรกรูปภาพลงในเซลล์แล้วเมื่อคุณปรับขนาดกรองหรือซ่อนเซลล์ที่มีรูปภาพรูปภาพจะไม่ถูกปรับขนาดหรือกรองพร้อมกับเซลล์ดังที่แสดงด้านล่าง

ในกรณีนี้คุณควรล็อครูปภาพไว้ในเซลล์เพื่อให้สามารถปรับขนาดกรองหรือซ่อนพร้อมกับเซลล์ได้โปรดทำตามขั้นตอนต่อไปนี้:

1. คลิกเพื่อเลือกภาพหนึ่งภาพแล้วกด Ctrl + เพื่อเลือกภาพทั้งหมดในแผ่นงาน

2. จากนั้นคลิกขวาที่รูปภาพหนึ่งภาพแล้วเลือก ขนาดและคุณสมบัติ จากเมนูบริบทดูภาพหน้าจอ:

3. ในการขยายตัว จัดรูปแบบรูปภาพ บานหน้าต่างใต้ อสังหาริมทรัพย์ เลือก ย้ายและปรับขนาดด้วยเซลล์ ตัวเลือกดูภาพหน้าจอ:

4. จากนั้นปิดไฟล์ จัดรูปแบบรูปภาพ บานหน้าต่าง ตอนนี้เมื่อปรับขนาดกรองหรือซ่อนเซลล์รูปภาพจะถูกย้ายกรองหรือซ่อนด้วย


แทรกรูปภาพหรือรูปภาพหลายรูปใน Excel

บางครั้งคุณอาจต้องแทรกรูปภาพหลายรูปลงในเซลล์และปรับขนาดให้พอดีกับขนาดเซลล์โดยอัตโนมัติโดยไม่ต้องปรับขนาดและลากรูปภาพ ที่นี่ฉันจะแนะนำสองวิธีในการแก้งานนี้ใน Excel

แทรกรูปภาพหรือรูปภาพหลาย ๆ รูปและปรับขนาดให้พอดีกับเซลล์ด้วยรหัส VBA

รหัส VBA ต่อไปนี้สามารถช่วยคุณในการแทรกรูปภาพหลายภาพลงในเซลล์ตามขนาดของเซลล์ กรุณาทำตามนี้:

1. ปรับขนาดเซลล์ที่คุณต้องการใส่รูปภาพจากนั้นเลือกเซลล์

2. จากนั้นกดไฟล์ ALT + F11 คีย์เพื่อเปิด Microsoft Visual Basic สำหรับแอปพลิเคชัน หน้าต่าง

3. คลิก สิ่งที่ใส่เข้าไป > โมดูลและวางมาโครต่อไปนี้ในไฟล์ โมดูล หน้าต่าง

รหัส VBA: แทรกรูปภาพหลายภาพตามขนาดเซลล์

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. จากนั้นกดปุ่ม F5 กุญแจสำคัญในการเรียกใช้รหัสนี้ ใน จุดเปิด โปรดเลือกโฟลเดอร์ที่มีรูปภาพจากนั้นเลือกรูปภาพที่คุณต้องการแทรกจากนั้นคลิก จุดเปิด และรูปภาพที่เลือกทั้งหมดได้ถูกแทรกลงในสิ่งที่คุณเลือกตามขนาดเซลล์ ดูภาพหน้าจอ:


แทรกรูปภาพหรือรูปภาพหลาย ๆ รูปและปรับขนาดให้พอดีกับเซลล์ด้วยคุณสมบัติอันทรงพลัง

หากคุณไม่คุ้นเคยกับรหัส VBA ที่นี่คุณสามารถใช้คุณสมบัติการใช้พลังงาน - นำเข้ารูปภาพ of Kutools สำหรับ Excel. ด้วยคุณสมบัติที่มีประโยชน์นี้คุณสามารถนำเข้าภาพหลายภาพไปยังเซลล์ได้อย่างรวดเร็วและง่ายดาย

หลังจากการติดตั้ง Kutools สำหรับ Excelโปรดทำตามขั้นตอนต่อไปนี้:

1. คลิก Kutools พลัส > นำเข้าส่งออก > นำเข้ารูปภาพดูภาพหน้าจอ:

2. ในการโผล่ออกมา นำเข้ารูปภาพ โปรดดำเนินการดังต่อไปนี้:

  • ระบุลำดับรูปภาพจากรายการแบบเลื่อนลงคำสั่งนำเข้าคุณสามารถเลือกได้ เติมเซลล์ในแนวตั้งหลังเซลล์ or เติมเซลล์ตามแนวนอนหลังเซลล์;
  • จากนั้นคลิก เพิ่ม เพื่อเลือกไฟล์ภาพหรือโฟลเดอร์ที่จะเพิ่มรูปภาพลงในไฟล์ รายการรูปภาพ;
  • คลิก นำเข้าขนาด ในปุ่ม นำเข้าขนาดรูปภาพ กล่องโต้ตอบเลือกไฟล์ จับคู่ขนาดเซลล์ ตัวเลือก

3. หลังจากเสร็จสิ้นการตั้งค่าโปรดคลิก นำเข้า ปุ่มและตอนนี้อีกปุ่มหนึ่ง นำเข้ารูปภาพ โผล่ออกมาระบุเซลล์ปลายทางที่คุณจะนำเข้ารูปภาพดูภาพหน้าจอ:

4. จากนั้นคลิก OK ภาพที่เลือกทั้งหมดได้ถูกแทรกเพื่อให้ตรงกับขนาดของเซลล์เฉพาะดังภาพด้านล่างที่แสดง:


แทรกรูปภาพหลายรูปหรือรูปภาพที่ตรงกับชื่อลงในเซลล์

หากคุณมีรายชื่อผลิตภัณฑ์ในคอลัมน์เดียวและตอนนี้คุณต้องแทรกรูปภาพที่เกี่ยวข้องลงในคอลัมน์อื่นตามภาพด้านล่างที่แสดง การแทรกรูปภาพแล้วลากไปทีละตำแหน่งจะเสียเวลามากในส่วนนี้ผมจะพูดถึงวิธีการบางอย่างที่รวดเร็ว

แทรกรูปภาพหรือรูปภาพหลายรูปที่ตรงกับชื่อของพวกเขาด้วยรหัส VBA

รหัส VBA ต่อไปนี้สามารถช่วยให้คุณสามารถแทรกรูปภาพหลายภาพที่ตรงกับชื่อของพวกเขาได้อย่างรวดเร็วโปรดดำเนินการดังนี้:

1. กด ALT + F11 คีย์เพื่อเปิด Microsoft Visual Basic สำหรับแอปพลิเคชัน หน้าต่าง

2. คลิก ตระหนักถึงt> โมดูลและวางมาโครต่อไปนี้ในไฟล์ โมดูล หน้าต่าง

รหัส VBA: แทรกรูปภาพหลายภาพที่ตรงกับชื่อของพวกเขา

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

หมายเหตุ: ในโค้ดด้านบนคุณสามารถเปลี่ยนความสูงและความกว้างของรูปภาพภายในสคริปต์ ". รูปร่างช่วงความสูง = 60",".hapeRange.Width = 60” ตามความต้องการของคุณ

3. จากนั้นกด F5 คีย์เพื่อเรียกใช้รหัสนี้และในหน้าต่างที่เปิดขึ้นโปรดเลือกโฟลเดอร์ที่มีภาพที่คุณต้องการแทรกดูภาพหน้าจอ:

4. จากนั้นคลิก OK ปุ่มกล่องพร้อมต์จะปรากฏขึ้นโปรดเลือกเซลล์ที่มีชื่อภาพดูภาพหน้าจอ:

5. ไปที่การคลิก OK และตามด้วยกล่องข้อความอื่นโปรดเลือกเซลล์ที่คุณต้องการส่งออกภาพดูภาพหน้าจอ:

6. ในที่สุดคลิก OKและรูปภาพถูกแทรกลงในเซลล์ตามชื่อพร้อมกันดูภาพหน้าจอ:


แทรกรูปภาพหรือรูปภาพหลาย ๆ รูปที่ตรงกับชื่อของพวกเขาด้วยคุณสมบัติที่มีประโยชน์

ถ้าคุณมี Kutools สำหรับ Excelเดียวกันกับที่ จับคู่รูปภาพนำเข้า คุณสามารถแทรกรูปภาพตามชื่อภาพได้อย่างรวดเร็วและง่ายดาย

หลังจากการติดตั้ง Kutools สำหรับ Excelโปรดทำตามนี้:

1. คลิก Kutools พลัส > นำเข้าส่งออก > จับคู่รูปภาพนำเข้าดูภาพหน้าจอ:

2. ในการโผล่ออกมา จับคู่รูปภาพนำเข้า โปรดดำเนินการดังต่อไปนี้:

  • ระบุลำดับรูปภาพจากรายการแบบเลื่อนลงคำสั่งนำเข้าคุณสามารถเลือกได้ เติมเซลล์ในแนวตั้งหลังเซลล์ or เติมเซลล์ตามแนวนอนหลังเซลล์;
  • จากนั้นจากไฟล์ ช่วงการแข่งขัน กล่องข้อความเลือกชื่อรูปภาพที่คุณต้องการแทรกรูปภาพตาม;
  • จากนั้นคลิก เพิ่ม เพื่อเลือกไฟล์ภาพหรือโฟลเดอร์ที่จะเพิ่มรูปภาพลงในไฟล์ รายการรูปภาพ;
  • ถัดไปคุณควรระบุขนาดรูปภาพ กรุณาคลิก นำเข้าขนาด ในปุ่ม นำเข้าขนาดรูปภาพ กล่องโต้ตอบเลือกขนาดภาพหนึ่งภาพตามที่คุณต้องการ

3. หลังจากเสร็จสิ้นการตั้งค่าโปรดคลิก นำเข้า เลือกเซลล์หนึ่งเซลล์หรือรายการเซลล์เพื่อค้นหาภาพจากภาพที่โผล่ออกมา จับคู่รูปภาพนำเข้า กล่องโต้ตอบดูภาพหน้าจอ:

4. จากนั้นคลิก OKและรูปภาพทั้งหมดที่มีการแทรกชื่อที่ตรงกับค่าของเซลล์ดูภาพหน้าจอ:


แทรกหรือแสดงรูปภาพหรือรูปภาพจาก URL

คุณเคยพยายามแสดงหรือแทรกรูปภาพจากรายการ URL หรือไม่? อาจไม่มีวิธีอื่นที่ดีในการแทรกรูปภาพใน Excel โดยตรง แต่คุณสามารถใช้รหัสหรือเครื่องมือของบุคคลที่สามเพื่อจัดการกับมันได้

แทรกหรือแสดงรูปภาพหรือรูปภาพจาก URL ด้วยรหัส VBA

โปรดใช้รหัส VBA ต่อไปนี้เพื่อแทรกรูปภาพตามรายการ URL

1. ขั้นแรกให้ปรับขนาดเซลล์ที่อยู่ติดกันที่คุณต้องการค้นหารูปภาพ

2. กด ALT + F11 คีย์เพื่อเปิด Microsoft Visual Basic สำหรับแอปพลิเคชัน หน้าต่าง

3. คลิก สิ่งที่ใส่เข้าไป > โมดูลและวางมาโครต่อไปนี้ในไฟล์ โมดูล หน้าต่าง

รหัส VBA: แทรกรูปภาพจากรายการ 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

หมายเหตุ / รายละเอียดเพิ่มเติม: ในโค้ดด้านบน A2: A5 คือช่วงของเซลล์ที่มีที่อยู่ URL ที่คุณต้องการแยกรูปภาพคุณควรเปลี่ยนการอ้างอิงเซลล์ตามความต้องการของคุณ

4. จากนั้นกด F5 กุญแจสำคัญในการเรียกใช้รหัสนี้รูปภาพที่ตรงกันจะถูกดึงออกจาก URL ไปยังคอลัมน์ที่อยู่ติดกันและวางไว้ที่กึ่งกลางของเซลล์ดูภาพหน้าจอ:


แทรกหรือแสดงรูปภาพหรือรูปภาพจาก URL ด้วยคุณสมบัติที่น่าทึ่ง

Kutools สำหรับ Excel มีคุณสมบัติที่น่าทึ่ง - แทรกรูปภาพจากเส้นทาง (URL). ด้วยยูทิลิตี้นี้รูปภาพที่เกี่ยวข้องจะถูกดึงออกจาก URL อย่างรวดเร็วและง่ายดาย

หลังจากการติดตั้ง Kutools สำหรับ Excelโปรดทำตามขั้นตอนต่อไปนี้:

1. คลิก Kutools > สิ่งที่ใส่เข้าไป > แทรกรูปภาพจากเส้นทาง (URL)ดูภาพหน้าจอ:

2. ในการโผล่ออกมา แทรกรูปภาพจากเส้นทาง (URL) โปรดตั้งค่าการดำเนินการต่อไปนี้:

  • เลือกรายการเซลล์ URL และช่วงของเซลล์ที่คุณต้องการใส่รูปภาพ
  • ระบุขนาดของภาพตามที่คุณต้องการจากไฟล์ ขนาดรูปภาพ มาตรา.

3. จากนั้นคลิก Ok และรูปภาพทั้งหมดถูกดึงออกจาก URL ดูภาพหน้าจอ:


แทรกหรือแสดงรูปภาพหรือรูปภาพจากเส้นทางไฟล์

หากคุณต้องการแทรกรูปภาพจากเส้นทางไฟล์ที่นี่ยังมีวิธีแก้ปัญหาสำหรับคุณ

แทรกหรือแสดงรูปภาพหรือรูปภาพจากเส้นทางไฟล์ด้วยรหัส VBA

คุณสามารถใช้รหัส VBA ต่อไปนี้สำหรับการแทรกรูปภาพตามพา ธ ไฟล์รูปภาพ

1. กด ALT + F11 คีย์เพื่อเปิด Microsoft Visual Basic สำหรับแอปพลิเคชัน หน้าต่าง

2. คลิก สิ่งที่ใส่เข้าไป > โมดูลแล้ววางรหัสต่อไปนี้ในไฟล์ โมดูล หน้าต่าง.

รหัส VBA: แทรกภาพจากช่วงของเส้นทางไฟล์

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. หลังจากใส่รหัสด้านบนแล้วให้กด F5 คีย์เพื่อเรียกใช้รหัสนี้จากนั้นกล่องพร้อมต์จะปรากฏขึ้นโปรดเลือกเซลล์ของเส้นทางไฟล์ดูภาพหน้าจอ:

4. จากนั้นคลิก OK รูปภาพทั้งหมดตามเส้นทางของไฟล์จะแสดงในคอลัมน์ถัดไปตามภาพหน้าจอต่อไปนี้:


แทรกหรือแสดงรูปภาพหรือรูปภาพจากเส้นทางไฟล์ด้วยคุณสมบัติที่น่าทึ่ง

Kutools สำหรับ Excel's แทรกรูปภาพจากเส้นทาง (URL) คุณลักษณะนี้ยังสามารถช่วยให้คุณแสดงภาพที่สัมพันธ์กันจากเส้นทางของไฟล์

หลังจากการติดตั้ง Kutools สำหรับ Excelโปรดทำตามนี้:

1. คลิก Kutools > สิ่งที่ใส่เข้าไป > แทรกรูปภาพจากเส้นทาง (URL)ในกล่องโต้ตอบที่โผล่ออกมาโปรดระบุช่วงเส้นทางของไฟล์ช่วงสำหรับการส่งออกภาพขนาดภาพตามที่คุณต้องการดูภาพหน้าจอ:

2. หลังจากตั้งค่าตัวเลือกแล้วให้คลิก Ok ปุ่มรูปภาพจะถูกแทรกลงในเซลล์ที่เลือกพร้อมกันดูภาพหน้าจอ:


แทรกรูปภาพหรือรูปภาพลงในความคิดเห็น

อาจเป็นเรื่องง่ายที่จะแทรกรูปภาพลงในเซลล์ แต่บางครั้งคุณอาจต้องการแทรกรูปภาพลงในช่องแสดงความคิดเห็นคุณจะจัดการกับงานนี้อย่างไร?

1. เลือกและคลิกขวาที่เซลล์ที่คุณต้องการแทรกความคิดเห็นจากนั้นเลือก แทรกความคิดเห็นดูภาพหน้าจอ:

เคล็ดลับ: หากคุณได้ใส่ความคิดเห็นโปรดเพิกเฉยต่อขั้นตอนนี้

2. จากนั้นวางเคอร์เซอร์ไว้ที่ขอบของช่องแสดงความคิดเห็นจนกว่าคุณจะเห็นเคอร์เซอร์เปลี่ยนเป็นไอคอนลูกศรสี่ลูก จากนั้นคลิกขวาและเลือก จัดรูปแบบความคิดเห็น ตัวเลือกดูภาพหน้าจอ:

3. ในการโผล่ออกมา จัดรูปแบบความคิดเห็น คลิกตกลง สีและเส้น แท็บและจากนั้นเลือก เติมเอฟเฟกต์ จาก สี รายการแบบเลื่อนลงดูภาพหน้าจอ:

4. จากนั้นต่อไปนี้ เติมเอฟเฟกต์ คลิกตกลง ภาพ แล้วคลิก เลือกรูปภาพ ปุ่มเพื่อเลือกหนึ่งภาพที่คุณต้องการแทรกดูภาพหน้าจอ:

5. จากนั้นคลิก OK > OKรูปภาพถูกแทรกลงในช่องแสดงความคิดเห็นดูภาพหน้าจอ:


แทรกรูปภาพหรือรูปภาพลงในส่วนหัวหรือส่วนท้าย

หากคุณต้องการแทรกรูปภาพลงในส่วนหัวหรือส่วนท้ายของแผ่นงาน Excel ของคุณขั้นตอนในส่วนนี้สามารถช่วยคุณได้โปรดดำเนินการดังนี้:

1. เปิดใช้งานแผ่นงานที่คุณต้องการแทรกรูปภาพลงในส่วนหัวหรือส่วนท้าย

2. จากนั้นคลิก สิ่งที่ใส่เข้าไป > ส่วนหัวและส่วนท้ายและคุณจะไปที่ไฟล์ เครื่องมือส่วนหัวและส่วนท้าย แท็บ ดูภาพหน้าจอ:

3. หากต้องการแทรกรูปภาพในส่วนหัวหรือส่วนท้ายโปรดคลิกช่องด้านซ้ายขวาหรือตรงกลางส่วนหัวหรือส่วนท้ายตามที่คุณต้องการจากนั้นคลิก ภาพ ภายใต้ ออกแบบ ดูภาพหน้าจอ:

4. จากนั้น แทรกรูปภาพ หน้าต่างจะปรากฏขึ้นโปรดเลือกรูปภาพที่คุณต้องการเพิ่มแล้วคลิกแทรก ตอนนี้ก &[ภาพ] ตัวยึดจะปรากฏในกล่องส่วนหัวหรือส่วนท้าย คลิกที่ใดก็ได้นอกกล่องส่วนหัวหรือส่วนท้ายรูปภาพที่แทรกจะแสดงดังภาพด้านล่างที่แสดง:

เคล็ดลับ: บางครั้งคุณอาจพบว่าภาพซ้อนทับกับพื้นที่ข้อมูลของแผ่นงานดังภาพด้านล่างที่แสดง กรณีนี้เกิดขึ้นเนื่องจากรูปภาพมีขนาดใหญ่เกินไปและจะไม่ถูกปรับขนาดให้พอดีกับกล่องส่วนหัวหรือส่วนท้ายโดยอัตโนมัติ

ในการแก้ไขปัญหานี้คุณเพียงแค่ปรับขนาดรูปภาพในส่วนหัวหรือส่วนท้ายโปรดทำตามขั้นตอนต่อไปนี้:

1. คลิกในส่วนหัวกระดาษหรือส่วนท้ายที่มีรูปภาพอยู่แล้วคลิก จัดรูปแบบรูปภาพ ภายใต้ ออกแบบ ดูภาพหน้าจอ:

2. ใน จัดรูปแบบรูปภาพ ภายใต้ ขนาด โปรดปรับขนาดของภาพให้พอดีกับส่วนหัวหรือส่วนท้ายดูภาพหน้าจอ:

3. จากนั้นคลิก OKคุณจะได้รับผลลัพธ์ตามที่คุณต้องการ


แทรกรูปภาพหรือรูปภาพเดียวกันลงในแผ่นงานหลายแผ่น

บางครั้งคุณอาจต้องการแทรกรูปภาพโลโก้ลงในแผ่นงานทั้งหมดของสมุดงานของคุณโดยปกติคุณสามารถใช้ฟังก์ชันแทรกเพื่อแทรกรูปภาพจากแผ่นงานหนึ่งไปยังอีกแผ่นหนึ่งได้ ยกเว้นคุณลักษณะที่ใช้เวลานานรหัส VBA ต่อไปนี้สามารถช่วยให้คุณแทรกรูปภาพเดียวกันลงในเซลล์เฉพาะของแผ่นงานทั้งหมดพร้อมกันได้ โปรดทำตามขั้นตอนด้านล่าง:

1. กด ALT + F11 คีย์เพื่อเปิด Microsoft Visual Basic สำหรับแอปพลิเคชัน หน้าต่าง

2. คลิก สิ่งที่ใส่เข้าไป > โมดูลและวางรหัสต่อไปนี้ในไฟล์ โมดูล หน้าต่าง.

รหัส VBA: แทรกรูปภาพเดียวกันลงในแผ่นงานทั้งหมด:

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

หมายเหตุ: ในโค้ดด้านบน C: \ Users \ AddinTestWin10 \ Desktop \ my images \ logo.png คือเส้นทางและชื่อของภาพและ A1 in ช่วง ("A1") คือเซลล์ที่คุณต้องการแทรกรูปภาพโปรดเปลี่ยนตามความต้องการของคุณ

3. จากนั้นกด F5 เพื่อเรียกใช้รหัสนี้และรูปภาพที่ระบุจะถูกแทรกลงในเซลล์ A1 ของแต่ละแผ่นงานทันที ดูการสาธิตด้านล่าง:


แทรกรูปภาพหรือรูปภาพด้านหลังเนื้อหาของเซลล์

เพื่อให้ข้อมูลในเวิร์กชีตสวยงามและน่าสนใจยิ่งขึ้นคุณสามารถใช้รูปภาพเป็นพื้นหลังได้ สำหรับการแทรกรูปภาพด้านหลังเนื้อหาของเซลล์ต่อไปนี้เป็นวิธีการบางอย่างที่สามารถช่วยคุณได้

แทรกรูปภาพหรือรูปภาพด้านหลังเนื้อหาของเซลล์ด้วยคุณสมบัติพื้นหลัง

1. เปิดแผ่นงานที่คุณต้องการแทรกภาพพื้นหลัง

2. จากนั้นคลิก เค้าโครงหน้ากระดาษ > พื้นหลังดูภาพหน้าจอ:

3. ในการโผล่ออกมา แทรกรูปภาพ โปรดเลือกภาพจากคอมพิวเตอร์เว็บไซต์หรือ OneDrive ตามที่คุณต้องการดูภาพหน้าจอ:

4. ตอนนี้ภาพถูกแทรกลงในแผ่นงานเป็นพื้นหลังตามภาพด้านล่างที่แสดง:

เคล็ดลับ: ในการลบภาพพื้นหลังเพียงแค่คลิก เค้าโครงหน้ากระดาษ > ลบพื้นหลัง. ดูภาพหน้าจอ:


แทรกรูปภาพโปร่งใสหรือรูปภาพด้านหลังเนื้อหาของเซลล์

ด้วยวิธีการข้างต้นคุณไม่สามารถเปลี่ยนความโปร่งใสของภาพพื้นหลังที่แทรกได้ดังนั้นหากสีของภาพพื้นหลังมีน้ำหนักมากคุณจะไม่สะดวกในการอ่านข้อมูลของแผ่นงาน ส่วนนี้ฉันจะพูดถึงวิธีแทรกรูปภาพโปร่งใสด้านหลังเซลล์

1. คลิก สิ่งที่ใส่เข้าไป > รูปร่างและเลือกรูปทรงสี่เหลี่ยมผืนผ้าดูภาพหน้าจอ:

2. จากนั้นวาดรูปร่างให้ใหญ่เท่าที่คุณต้องการในแผ่นงานที่ใช้งานอยู่

3. หลังจากวาดรูปร่างแล้ว a เครื่องมือการวาด แท็บจะแสดงขึ้นใน Ribbon จากนั้นคลิก รูปแบบ > เค้าร่างรูปร่าง > ไม่มีโครงร่างดูภาพหน้าจอ:

4. จากนั้นคลิกขวาที่รูปร่างและเลือก จัดรูปแบบรูปร่าง จากเมนูบริบทดูภาพหน้าจอ:

5. ในการขยายตัว จัดรูปแบบรูปร่าง บานหน้าต่างใต้ เติม & Line ทำตามขั้นตอนต่อไปนี้:

  • ภายใต้ ใส่ เลือก เติมรูปภาพหรือพื้นผิว ตัวเลือก;
  • คลิก สิ่งที่ใส่เข้าไป จากปุ่ม แหล่งที่มาของรูปภาพและเลือกหนึ่งภาพที่คุณต้องการแทรก
  • จากนั้นปรับความโปร่งใสของภาพตามความต้องการของคุณจากไฟล์ แผ่นใสส่วน y

6. จากนั้นคุณจะเห็นรูปร่างที่เต็มไปด้วยรูปภาพดูเหมือนภาพพื้นหลังดังภาพด้านบนที่แสดง

หมายเหตุ: หลังจากแทรกภาพพื้นหลังประเภทนี้แล้วคุณจะไม่ได้รับอนุญาตให้ป้อนข้อความใด ๆ ภายในช่วงภาพ


แทรกรูปภาพโปร่งใสหรือรูปภาพด้านหลังเนื้อหาของเซลล์เป็นลายน้ำ

ทั้งสองวิธีข้างต้นมีข้อ จำกัด ของตัวเองวิธีแรกไม่สามารถเปลี่ยนความโปร่งใสของภาพได้วิธีที่สองไม่อนุญาตให้ป้อนข้อความลงในเซลล์ภายในพื้นที่รูปภาพ เพื่อแก้ปัญหาเหล่านี้ Kutools สำหรับ Excel's ใส่ลายน้ำ คุณสมบัติสามารถช่วยคุณได้

หลังจากการติดตั้ง Kutools สำหรับ Excelโปรดทำตามนี้:

1. คลิก Kutools > สิ่งที่ใส่เข้าไป > ใส่ลายน้ำดูภาพหน้าจอ:

2. ในการโผล่ออกมา ใส่ลายน้ำ ใหเลือก ลายน้ำรูปภาพและจากนั้นคลิก เลือกรูปภาพ เพื่อเลือกหนึ่งภาพที่คุณต้องการแทรกจากนั้นระบุขนาดภาพและเลือกตัวเลือก Washout ดูภาพหน้าจอ:

3. จากนั้นคลิก Ok รูปภาพถูกแทรกลงในแผ่นงานเป็นภาพพื้นหลัง


แทรกช่วงของเซลล์เป็นรูปภาพหรือรูปแบบรูปภาพใน Excel

คุณเคยพยายามคัดลอกช่วงของเซลล์และแทรกเป็นรูปภาพใน Excel หรือไม่? ในส่วนนี้ฉันจะแนะนำวิธีที่รวดเร็วในการจัดการกับงานนี้ใน Excel

แทรกช่วงของเซลล์เป็นรูปภาพหรือรูปแบบรูปภาพด้วยคุณสมบัติคัดลอกเป็นรูปภาพ

ใน Excel คุณสามารถใช้ไฟล์ คัดลอกเป็นรูปภาพ ฟังก์ชันคัดลอกและแทรกช่วงของเซลล์เป็นรูปภาพ

1. เลือกช่วงของเซลล์ที่คุณต้องการคัดลอกและแทรกเป็นรูปภาพ

2. จากนั้นคลิก หน้าแรก > คัดลอก > คัดลอกเป็นรูปภาพดูภาพหน้าจอ:

3. ในการโผล่ออกมา คัดลอกรูปภาพ ใหเลือก ภาพ จาก รูปแบบ ส่วนดูภาพหน้าจอ:

4. จากนั้นคลิก OK ตอนนี้คุณต้องกด Ctrl + V เพื่อวางภาพไปที่ใดก็ได้ของสมุดงาน


แทรกช่วงของเซลล์เป็นรูปภาพหรือรูปแบบรูปภาพด้วยเครื่องมือกล้อง

ใน Excel มีไฟล์ กล้อง เครื่องมือที่ช่วยให้คุณสามารถถ่ายภาพสำหรับข้อมูลที่คุณเลือกแล้ววางเป็นภาพ เมื่อข้อมูลต้นฉบับเปลี่ยนแปลงรูปภาพที่คัดลอกจะเปลี่ยนแบบไดนามิก

ขั้นแรกคุณควรแสดงไฟล์ กล้อง บนริบบิ้นแล้วนำไปใช้

1. คลิก ปรับแต่งแถบเครื่องมือด่วน แล้วคลิก คำสั่งเพิ่มเติม ตัวเลือกดูภาพหน้าจอ:

2. ในการเปิด ตัวเลือก Excel โปรดดำเนินการดังต่อไปนี้:

  • เลือก คำสั่งทั้งหมด จาก เลือกคำสั่งจาก หล่นลง;
  • จากนั้นเลื่อนเพื่อเลือก กล้อง จากกล่องรายการ
  • จากนั้นคลิก เพิ่ม เพื่อเพิ่มเครื่องมือนี้ลงในไฟล์ ปรับแต่งแถบเครื่องมือด่วน;
  • ในที่สุดคลิก OK เพื่อปิดกล่องโต้ตอบนี้

3. และ กล้อง มีการแสดงเครื่องมือบนริบบิ้นดูภาพหน้าจอ:

4. จากนั้นเลือกช่วงของเซลล์ที่คุณต้องการรูปภาพ

5. จากนั้นคลิกไฟล์ กล้อง เครื่องมือจากนั้นไปที่แผ่นงานและคลิกที่ใดก็ได้ช่วงข้อมูลจะถูกแทรกเป็นภาพดังตัวอย่างด้านล่างที่แสดง:


แทรกช่วงของเซลล์เป็นรูปแบบรูปภาพหรือรูปภาพพร้อมคุณสมบัติที่มีประโยชน์

ถ้าคุณมี Kutools สำหรับ Excelเดียวกันกับที่ ห้องสมุดทรัพยากร คุณสามารถบันทึกข้อมูลที่เลือกลงในไฟล์ ห้องสมุดทรัพยากรแล้วใช้เป็นรูปภาพหรือข้อความในอนาคตได้ตามต้องการ

หลังจากการติดตั้ง Kutools สำหรับ Excelโปรดทำตามนี้:

1. เลือกช่วงข้อมูลที่คุณต้องการแทรกเป็นรูปภาพ

2. จากนั้นคลิก Kutools > การเดินเรือดูภาพหน้าจอ:

3. ในการขยายตัว การเดินเรือ บานหน้าต่างคลิก ห้องสมุดทรัพยากร แล้วคลิก เพิ่มเนื้อหาที่เลือกลงในไลบรารีทรัพยากร ไอคอนดูภาพหน้าจอ:

4. ใน รายการคลังทรัพยากรใหม่ กล่องโต้ตอบระบุชื่อสำหรับรายการนี้จากนั้นเลือกกลุ่มที่คุณต้องการเพิ่ม ดูภาพหน้าจอ:

5. จากนั้นคลิก เพิ่ม เพื่อเพิ่มเข้าไป ห้องสมุดทรัพยากร บานหน้าต่าง หากคุณต้องการแทรกช่วงนี้เป็นรูปภาพเพียงแค่คลิกเซลล์เพื่อค้นหารูปภาพจากนั้นค้นหารายการที่บันทึกไว้จาก ห้องสมุดทรัพยากร บานหน้าต่างแล้วคลิก แทรกเป็น > รูปภาพ (EMF) จากรายการแบบหล่นลงของรายการ และช่วงข้อมูลจะถูกแทรกลงในแผ่นงานเป็นภาพดูภาพหน้าจอ:


แทรกรูปภาพหรือรูปภาพตามค่าของเซลล์แบบไดนามิก

ในส่วนนี้ฉันจะแสดงวิธีการแสดงภาพเฉพาะตามค่าของเซลล์ ตัวอย่างเช่นฉันต้องการแสดงรูปภาพที่เกี่ยวข้องเมื่อฉันเลือกรายการใดรายการหนึ่งจากเซลล์แบบเลื่อนลงและเมื่อฉันเลือกรายการอื่นรูปภาพจะเปลี่ยนแบบไดนามิกดังตัวอย่างที่แสดงด้านล่าง:

แทรกรูปภาพหรือรูปภาพตามค่าของเซลล์แบบไดนามิกด้วยคุณสมบัติช่วงที่ตั้งชื่อ

โดยปกติใน Excel คุณสามารถสร้างช่วงที่มีชื่อแบบไดนามิกจากนั้นใช้รูปภาพที่เชื่อมโยงเพื่อแก้ไขงานนี้ใน Excel

1. ขั้นแรกคุณควรสร้างสองคอลัมน์ที่มีชื่อผลิตภัณฑ์และรูปภาพที่เกี่ยวข้องดูภาพหน้าจอ:

2. จากนั้นโปรดสร้างรายการแบบเลื่อนลงสำหรับค่าของเซลล์ คลิกเซลล์เพื่อแสดงรายการดรอปดาวน์จากนั้นคลิก ข้อมูล > การตรวจสอบข้อมูล > การตรวจสอบข้อมูลดูภาพหน้าจอ:

3. ในการโผล่ออกมา การตรวจสอบข้อมูล ภายใต้ การตั้งค่า เลือกแท็บ รายการ จาก อนุญาต ดรอปดาวน์จากนั้นเลือกเซลล์ที่คุณต้องการสร้างรายการดรอปดาวน์จากไฟล์ แหล่ง กล่องข้อความดูภาพหน้าจอ:

4. คลิก OKและมีการสร้างรายการแบบหล่นลงพร้อมค่าเซลล์เลือกหนึ่งรายการจากรายการแบบเลื่อนลงดูภาพหน้าจอ:

5. จากนั้นคลิก สูตร > กำหนดชื่อดูภาพหน้าจอ:

6. ใน ชื่อใหม่ โปรดดำเนินการดังต่อไปนี้:

  • ป้อนชื่อ myimage ลงในไฟล์ Name กล่องข้อความ;
  • จากนั้นคัดลอกและวางสูตรนี้: =INDEX(Sheet11!$A$2:$B$6,MATCH(Sheet11!$E$2,Sheet11!$A$2:$A$6,0),2) ลงในกล่องข้อความอ้างอิงถึง

หมายเหตุ: ในสูตรข้างต้น:

  • Sheet11! $ A $ 2: $ B $ 6: คือแผ่นงานและช่วงที่มีค่าและรูปภาพที่คุณต้องการใช้
  • Sheet11! $ E $ 2: คือเซลล์ภายในแผ่นงานที่คุณสร้างรายการแบบหล่นลง
  • Sheet11! $ A $ 2: $ A $ 6: คือรายชื่อเซลล์ที่คุณสร้างรายการแบบหล่นลงตาม;
  • จำนวนตัวแปร 2 คือหมายเลขคอลัมน์ที่มีรูปภาพ หากภาพของคุณอยู่ในคอลัมน์ C คุณควรป้อน 3

7. จากนั้นคลิก OK จากนั้นโปรดคัดลอกและวางรูปภาพที่เกี่ยวข้องตามค่าเซลล์ใน E2 จากช่วงดั้งเดิมไปยังเซลล์ F2 ดูภาพหน้าจอ:

8. ถัดไปโปรดเลือกรูปภาพในเซลล์ F2 จากนั้นป้อนสูตรนี้ = myimage (มายอิมเมจ คือชื่อช่วงที่คุณสร้างในขั้นตอนที่ 6) ลงในแถบสูตรดูภาพหน้าจอ:

9. หลังจากป้อนสูตรแล้วให้กด เข้าสู่ และตอนนี้เมื่อคุณเลือกหนึ่งรายการจากรายการแบบเลื่อนลงรูปภาพสัมพัทธ์จะแสดงทันที ดูภาพหน้าจอ:


แทรกรูปภาพหรือรูปภาพตามค่าของเซลล์แบบไดนามิกด้วยคุณสมบัติที่มีประโยชน์

วิธีการข้างต้นอาจเป็นเรื่องยากสำหรับพวกเราส่วนใหญ่ที่นี่ฉันจะแนะนำคุณสมบัติที่มีประโยชน์ - รายการดรอปดาวน์รูปภาพ of Kutools สำหรับ Excelด้วยเครื่องมือที่มีประโยชน์นี้คุณสามารถสร้างรายการแบบเลื่อนลงหลายรายการพร้อมรูปภาพที่สัมพันธ์กันได้โดยคลิกเพียงไม่กี่ครั้ง

หลังจากการติดตั้ง Kutools สำหรับ Excelโปรดทำตามขั้นตอนต่อไปนี้:

1. ขั้นแรกคุณควรสร้างคอลัมน์สองคอลัมน์ซึ่งมีชื่อผลิตภัณฑ์และรูปภาพที่สัมพันธ์กันในแผ่นงานของคุณ

2. จากนั้นคลิก Kutools > รายการแบบหล่นลง > รายการดรอปดาวน์รูปภาพดูภาพหน้าจอ:

3. ใน รายการดรอปดาวน์รูปภาพ กล่องโต้ตอบหากคุณได้สร้างคอลัมน์ของค่าและรูปภาพของเซลล์โปรดละเว้นขั้นตอนที่ 1 จากนั้นเลือกข้อมูลต้นฉบับและช่วงภาพและช่วงเอาต์พุตดูภาพหน้าจอ:

4. จากนั้นคลิก Ok ปุ่มรายการแบบหล่นลงพร้อมรูปภาพได้ถูกสร้างขึ้นในเซลล์ที่เลือกและเมื่อเลือกรายการจากเซลล์แบบเลื่อนลงรูปภาพที่เกี่ยวข้องจะปรากฏขึ้นพร้อมกันดูการสาธิตด้านล่าง:


ส่งออกหรือบันทึกรูปภาพหรือรูปภาพทั้งหมดจากไฟล์ Excel

หากมีภาพหลายภาพในสมุดงานของคุณและตอนนี้คุณต้องการแยกและบันทึกภาพทั้งหมดจากไฟล์ Excel ไปยังโฟลเดอร์ คุณจะแก้ปัญหานี้ใน Excel ได้อย่างไร?

ส่งออกหรือบันทึกรูปภาพหรือรูปภาพทั้งหมดจาก Excel ด้วยคุณสมบัติบันทึกเป็น

โดยปกติคุณสามารถใช้ไฟล์ บันทึกเป็น คุณสมบัติในการบันทึกภาพทั้งหมดจากสมุดงานโปรดทำดังนี้:

1. คลิก เนื้อไม่มีมัน > บันทึกเป็นใน บันทึกเป็น หน้าต่างระบุโฟลเดอร์ที่จะใส่ไฟล์ที่ส่งออกจากนั้นเลือก หน้าเว็บ (*. htm; *. html) จาก บันทึกเป็น พิมพ์รายการแบบเลื่อนลงดูภาพหน้าจอ:

2. จากนั้นคลิก ลด ไปที่โฟลเดอร์เฉพาะคุณจะเห็นไฟล์สองไฟล์ไฟล์หนึ่งเป็นไฟล์รูปแบบ HTML และอีกไฟล์เป็นโฟลเดอร์ที่มีรูปภาพแผนภูมิหรือวัตถุอื่น ๆ จากสมุดงาน ดูภาพหน้าจอ:

3. จากนั้นคุณสามารถลากเฉพาะภาพไปยังโฟลเดอร์อื่นได้ตามที่คุณต้องการ

หมายเหตุ: โดยใช้สิ่งนี้ บันทึกเป็น คุณจะได้รับแต่ละภาพสองครั้งภาพหนึ่งมีขนาดเล็กกว่าอีกภาพหนึ่งมีขนาดใหญ่กว่าดังนั้นคุณสามารถบันทึกภาพที่มีความละเอียดสูงขึ้นได้ตามที่คุณต้องการ


ส่งออกหรือบันทึกรูปภาพหรือรูปภาพทั้งหมดจาก Excel โดยเปลี่ยนนามสกุลไฟล์

หากต้องการบันทึกภาพทั้งหมดจากไฟล์ Excel คุณยังสามารถเปลี่ยนนามสกุลไฟล์เป็น RAR ได้ กรุณาทำตามนี้:

1. เปลี่ยนนามสกุลไฟล์ xlsx ไปยัง RAR ดังภาพด้านล่างที่แสดง:

2. จากนั้นแตกไฟล์และคุณจะเห็น 3 โฟลเดอร์และ 1 ไฟล์ในโฟลเดอร์ดูภาพหน้าจอ:

3. จากนั้นคลิกเพื่อเปิดไฟล์ xl จากนั้นเปิดไฟล์ สื่อ คุณจะเห็นภาพทั้งหมดถูกเก็บไว้ที่นี่โดยไม่ซ้ำดูภาพหน้าจอ:


ส่งออกหรือบันทึกรูปภาพหรือรูปภาพทั้งหมดจาก Excel ด้วยคุณสมบัติที่มีประสิทธิภาพ

ถ้าคุณมี Kutools สำหรับ Excelเดียวกันกับที่ ส่งออกกราฟิก คุณลักษณะนี้คุณสามารถส่งออกวัตถุบางอย่างได้อย่างรวดเร็วเช่นรูปภาพแผนภูมิรูปร่างเป็นรูปแบบภาพตามที่คุณต้องการ

หลังจากการติดตั้ง Kutools สำหรับ Excelโปรดทำตามขั้นตอนต่อไปนี้:

1. คลิก Kutools พลัส > นำเข้าส่งออก > ส่งออกกราฟิกดูภาพหน้าจอ:

2. ใน ส่งออกกราฟิก ไดอะล็อกบ็อกซ์ให้ดำเนินการดังต่อไปนี้:

  • Choose ภาพ ตัวเลือกจาก ประเภท รายการแบบหล่นลง
  • ระบุโฟลเดอร์เพื่อบันทึกรูปภาพที่ส่งออกของคุณ
  • จากนั้นคลิกรายการแบบหล่นลงจากไฟล์ รูปแบบการส่งออก เพื่อเลือกรูปแบบเดียวสำหรับรูปภาพของคุณ

3. ในที่สุดคลิก Ok รูปภาพทั้งหมดในสมุดงานปัจจุบันได้รับการบันทึกลงในโฟลเดอร์ที่คุณระบุดูภาพหน้าจอ:


เปลี่ยนชื่อรูปภาพในโฟลเดอร์ตามรายการเซลล์ใน Excel

หากคุณมีรูปภาพจำนวนมากในโฟลเดอร์และตอนนี้คุณต้องการเปลี่ยนชื่อรูปภาพเหล่านี้ทั้งหมดคุณจะแก้ปัญหานี้ด้วยวิธีง่ายๆใน Excel ได้อย่างไร?

ใน Excel อันดับแรกคุณควรแสดงชื่อรูปภาพเก่าทั้งหมดลงในคอลัมน์จากนั้นพิมพ์ชื่อใหม่ในที่สุดใช้รหัส VBA เพื่อแทนที่ชื่อเก่าด้วยชื่อใหม่พร้อมกัน โปรดทำตามขั้นตอนด้านล่าง:

1. โปรดระบุชื่อรูปภาพทั้งหมดในรายการเซลล์หรือคุณสามารถใช้รหัสด้านล่างเพื่อแสดงชื่อรูปภาพทั้งหมดในโฟลเดอร์เฉพาะโดยไม่ต้องพิมพ์ทีละภาพด้วยตนเอง

2. กดค้างไว้ ALT + F11 คีย์เพื่อเปิด Microsoft Visual Basic สำหรับแอปพลิเคชัน หน้าต่าง.

3. คลิก สิ่งที่ใส่เข้าไป > โมดูลและวางมาโครต่อไปนี้ในไฟล์ โมดูล หน้าต่าง

รหัส VBA: แสดงชื่อภาพทั้งหมดจากโฟลเดอร์

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. จากนั้นกด F5 คีย์เพื่อเรียกใช้รหัสนี้และกล่องพร้อมต์จะปรากฏขึ้นโปรดคลิกเซลล์ที่จะแสดงชื่อรูปภาพดูภาพหน้าจอ:

5. จากนั้นคลิก OKอีก หมวดหมู่สินค้า กล่องโต้ตอบจะปรากฏขึ้นโปรดเลือกโฟลเดอร์ที่มีรูปภาพที่คุณต้องการแสดงรายชื่อรูปภาพทั้งหมดดูภาพหน้าจอ:

6. คลิก OKชื่อรูปภาพทั้งหมดในโฟลเดอร์เฉพาะได้รับการระบุไว้ในเซลล์ดูภาพหน้าจอ:

7. จากนั้นพิมพ์ชื่อใหม่ที่คุณต้องการลงในคอลัมน์อื่นตามภาพด้านล่างที่แสดง:

8. จากนั้นคุณสามารถใช้รหัสด้านล่างเพื่อเปลี่ยนชื่อภาพได้โดยกด ALT + F11 คีย์เพื่อเปิด Microsoft Visual Basic สำหรับแอปพลิเคชัน หน้าต่าง.

9. คลิก สิ่งที่ใส่เข้าไป > โมดูลและวางมาโครต่อไปนี้ในไฟล์ โมดูล หน้าต่าง

รหัส VBA: เปลี่ยนชื่อไฟล์หลายไฟล์ในโฟลเดอร์

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

หมายเหตุ: ในโค้ดด้านบน A: A ระบุรายชื่อรูปภาพเก่าที่คุณต้องการเปลี่ยนชื่อและ B มีชื่อรูปภาพใหม่ที่คุณต้องการใช้คุณสามารถเปลี่ยนได้ตามต้องการ

10. จากนั้นกด F5 คีย์เพื่อเรียกใช้รหัสนี้และในป๊อปอัปออกมา หมวดหมู่สินค้า หน้าต่างเลือกโฟลเดอร์ที่มีภาพที่คุณต้องการเปลี่ยนชื่อดูภาพหน้าจอ:

11. จากนั้นคลิก OK ปุ่มชื่อภาพทั้งหมดถูกแทนที่ด้วยชื่อใหม่ดังภาพด้านล่างที่แสดง:


ขยายหรือย่อขนาดภาพเมื่อคลิก

สมมติว่าคุณได้แทรกรูปภาพขนาดเล็กลงในแผ่นงานแล้วตอนนี้คุณต้องการขยายภาพเมื่อคลิกและย่อขนาดเมื่อคลิกอีกครั้งตามตัวอย่างด้านล่างที่แสดง คุณจะแก้ปัญหานี้ใน Excel ได้อย่างไร?

หากต้องการขยายหรือย่อขนาดภาพเมื่อคลิกรหัสต่อไปนี้สามารถช่วยคุณได้ โปรดทำตามขั้นตอนด้านล่าง:

1. คลิกขวาที่รูปภาพแล้วเลือก กำหนดมาโครดูภาพหน้าจอ:

2. จากนั้นในโผล่ออกมา กำหนดมาโคร ใหคลิกปุ the ม ใหม่ ปุ่มดูภาพหน้าจอ:

3. ใน Microsoft Visual Basic สำหรับแอปพลิเคชัน โปรดคัดลอกและวางรหัสด้านล่างระหว่างไฟล์ และ ย่อยสิ้นสุด รหัส ดูภาพหน้าจอ:

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. จากนั้นกดปุ่ม Alt+Q ปุ่มเพื่อปิดไฟล์ Microsoft Visual Basic สำหรับแอปพลิเคชัน หน้าต่าง. ตอนนี้เมื่อคุณคลิกที่รูปภาพภาพจะถูกขยายให้ใหญ่ขึ้นตามขนาดที่คุณระบุและคลิกอีกครั้งจะย่อขนาดเป็นขนาดดั้งเดิมดังตัวอย่างด้านล่างที่แสดง:


ลอยรูปภาพเสมอเมื่อเลื่อนแผ่นงาน

บางครั้งคุณอาจต้องการลอยรูปภาพบนหน้าจอเวิร์กชีตแม้ว่าคุณจะเลื่อนขึ้นหรือลงในแผ่นงานเพื่อที่คุณจะได้เห็นภาพตลอดเวลา ในส่วนนี้ฉันจะแนะนำเคล็ดลับง่ายๆสำหรับคุณในการจัดการกับงานนี้ใน Excel โปรดทำตามขั้นตอนต่อไปนี้:

1. ขั้นแรกแทรกรูปภาพที่คุณต้องการใช้

2. จากนั้นคลิกขวาที่แท็บแผ่นงานซึ่งมีรูปภาพที่คุณต้องการให้มองเห็นอยู่เสมอจากนั้นเลือก ดูรหัส จากเมนูบริบท ในการเปิด Microsoft Visual Basic สำหรับแอปพลิเคชัน หน้าต่างคัดลอกและวางโค้ดด้านล่างลงในโมดูลว่าง:

รหัส VBA: ลอยรูปภาพในแผ่นงานเสมอ

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

หมายเหตุ: ในรหัสนี้ไฟล์ 1 รูปภาพ คือชื่อภาพที่คุณใส่ไว้โปรดเปลี่ยนตามความต้องการของคุณ

3. จากนั้นบันทึกและปิดหน้าต่างรหัสตอนนี้เมื่อเลื่อนแผ่นงานและคลิกเซลล์รูปภาพจะถูกเก็บไว้ที่มุมขวาบนของแผ่นงานเสมอ ดูภาพหน้าจอ:


ลบรูปภาพหรือรูปภาพจากแผ่นงานที่ใช้งานอยู่ / ช่วงของเซลล์

คุณมีวิธีที่รวดเร็วในการลบภาพทั้งหมดจากแผ่นงานช่วงของเซลล์หรือสมุดงานปัจจุบันหรือไม่? ส่วนนี้ผมจะแนะนำวิธีการบางอย่างในการแก้งานนี้ใน Excel

ลบรูปภาพหรือรูปภาพจากแผ่นงานที่ใช้งานด้วยรหัส VBA

หากต้องการลบรูปภาพออกจากแผ่นงานปัจจุบันรหัส VBA ด้านล่างสามารถช่วยคุณได้โปรดดำเนินการดังนี้:

1. เปิดใช้งานแผ่นงานที่มีภาพที่คุณต้องการลบ

2. กด ALT + F11 คีย์เพื่อเปิด Microsoft Visual Basic สำหรับแอปพลิเคชัน หน้าต่าง

3. คลิก สิ่งที่ใส่เข้าไป > โมดูลและวางมาโครต่อไปนี้ในไฟล์ โมดูล หน้าต่าง.

รหัส VBA: ลบรูปภาพทั้งหมดจากแผ่นงานปัจจุบัน

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

4. จากนั้นกด F5 กุญแจสำคัญในการเรียกใช้รหัสนี้และรูปภาพทั้งหมดในแผ่นงานที่ใช้งานอยู่จะถูกลบออกพร้อมกัน


ลบรูปภาพหรือรูปภาพจากช่วงของเซลล์ด้วยรหัส VBA

หากคุณต้องการลบภาพออกจากเซลล์เพียงช่วงเดียวนี่เป็นอีกหนึ่งรหัสง่ายๆที่สามารถช่วยคุณได้

1. กด ALT + F11 คีย์เพื่อเปิด Microsoft Visual Basic สำหรับแอปพลิเคชัน หน้าต่าง

2. คลิก สิ่งที่ใส่เข้าไป > โมดูลและวางมาโครต่อไปนี้ในไฟล์ โมดูล หน้าต่าง.

รหัส VBA: ลบรูปภาพจากช่วงของเซลล์

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

หมายเหตุ: ในโค้ดด้านบน B4: C6 คือช่วงที่คุณต้องการลบรูปภาพ

3. จากนั้นกด F5 คีย์เพื่อเรียกใช้รหัสนี้และรูปภาพในช่วงที่เลือกจะถูกลบพร้อมกันดูภาพหน้าจอ:


ลบภาพหรือรูปภาพออกจากแผ่นงานที่ใช้งานแผ่นงานที่เลือกแผ่นงานทั้งหมดด้วยคุณสมบัติที่มีประโยชน์

ถ้าคุณมี Kutools สำหรับ Excelเดียวกันกับที่ ลบภาพประกอบและวัตถุ คุณสามารถลบภาพออกจากแผ่นงานแผ่นงานที่เลือกบางแผ่นหรือสมุดงานทั้งหมดได้อย่างรวดเร็ว

หลังจากการติดตั้ง Kutools สำหรับ Excelโปรดทำตามขั้นตอนต่อไปนี้:

1. คลิก Kutools > ลบ > ลบภาพประกอบและวัตถุดูภาพหน้าจอ:

2. ในการเปิด ลบภาพประกอบและวัตถุ กล่องโต้ตอบตรวจสอบ ภาพ จาก ลบ จากนั้นระบุขอบเขตที่คุณต้องการลบรูปภาพจากในส่วน มองเข้าไป ส่วนดูภาพหน้าจอ:

3. จากนั้นคลิก Ok และรูปภาพทั้งหมดจะถูกลบออกจากแผ่นงานแผ่นงานที่เลือกหรือสมุดงานทั้งหมดตามที่คุณระบุ


เครื่องมือเพิ่มประสิทธิภาพการทำงานในสำนักงานที่ดีที่สุด

Kutools สำหรับ Excel แก้ปัญหาส่วนใหญ่ของคุณและเพิ่มผลผลิตของคุณได้ถึง 80%

  • ซุปเปอร์ฟอร์มูล่าบาร์ (แก้ไขข้อความและสูตรหลายบรรทัดได้อย่างง่ายดาย); การอ่านเค้าโครง (อ่านและแก้ไขเซลล์จำนวนมากได้อย่างง่ายดาย); วางลงในช่วงที่กรองแล้ว...
  • ผสานเซลล์ / แถว / คอลัมน์ และการเก็บรักษาข้อมูล แยกเนื้อหาของเซลล์ รวมแถวที่ซ้ำกันและผลรวม / ค่าเฉลี่ย... ป้องกันเซลล์ซ้ำ; เปรียบเทียบช่วง...
  • เลือกซ้ำหรือไม่ซ้ำ แถว; เลือกแถวว่าง (เซลล์ทั้งหมดว่างเปล่า); Super Find และ Fuzzy Find ในสมุดงานจำนวนมาก สุ่มเลือก ...
  • สำเนาถูกต้อง หลายเซลล์โดยไม่เปลี่ยนการอ้างอิงสูตร สร้างการอ้างอิงอัตโนมัติ ถึงหลายแผ่น ใส่สัญลักษณ์แสดงหัวข้อย่อย, กล่องกาเครื่องหมายและอื่น ๆ ...
  • แทรกสูตรที่ชื่นชอบและรวดเร็ว, ช่วงแผนภูมิและรูปภาพ; เข้ารหัสเซลล์ ด้วยรหัสผ่าน; สร้างรายชื่อผู้รับจดหมาย และส่งอีเมล ...
  • แยกข้อความ, เพิ่มข้อความ, ลบตามตำแหน่ง, ลบ Space; สร้างและพิมพ์ผลรวมย่อยของเพจ แปลงระหว่างเนื้อหาของเซลล์และความคิดเห็น...
  • ซุปเปอร์ฟิลเตอร์ (บันทึกและใช้โครงร่างตัวกรองกับแผ่นงานอื่น ๆ ); การเรียงลำดับขั้นสูง ตามเดือน / สัปดาห์ / วันความถี่และอื่น ๆ ตัวกรองพิเศษ โดยตัวหนาตัวเอียง ...
  • รวมสมุดงานและแผ่นงาน; ผสานตารางตามคอลัมน์สำคัญ แยกข้อมูลออกเป็นหลายแผ่น; Batch แปลง xls, xlsx และ PDF...
  • การจัดกลุ่มตาราง Pivot ตาม จำนวนสัปดาห์วันในสัปดาห์และอื่น ๆ ... แสดงปลดล็อกเซลล์ที่ถูกล็อก ด้วยสีที่ต่างกัน เน้นเซลล์ที่มีสูตร / ชื่อ...
kte แท็บ 201905
  • เปิดใช้งานการแก้ไขและอ่านแบบแท็บใน Word, Excel, PowerPoint, ผู้จัดพิมพ์, Access, Visio และโครงการ
  • เปิดและสร้างเอกสารหลายรายการในแท็บใหม่ของหน้าต่างเดียวกันแทนที่จะเป็นในหน้าต่างใหม่
  • เพิ่มประสิทธิภาพการทำงานของคุณ 50% และลดการคลิกเมาส์หลายร้อยครั้งให้คุณทุกวัน!
ด้านล่าง officetab
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