Excel 이미지: Excel 에서 여러 이미지 또는 사진 삽입， 크기 조정， 저장， 삭제

컴퓨터에 저장된 이미지 삽입 을 워크시트에 삽입하는 것은 대부분의 사용자에게 쉽습니다。 다음 단계를 따르세요：

1。 워크시트에서 이미지 삽입 하고자 하는 위치를 클릭합니다。

2。 그런 다음삽입>그림>이 장치를 클릭하세요。 스크린샷 참조：

3。 나타난그림 삽입창에서 그림이 포함된 폴더를 열고，Ctrl키를 누른 상태로 삽입할 이미지를 선택합니다。 스크린샷 참조：

4。 그런 다음삽입버튼을 클릭하면 선택한 그림이 시트에 삽입됩니다。 이제 필요에 따라 이미지를 조정하거나 크기를 변경할 수 있습니다。 스크린샷 참조：

Excel 2013 이상 버전을 사용하는 경우 웹이나 OneDrive 에서 이미지를 삽입할 수 있습니다。 다음 단계를 따르세요：

1。 워크시트에서 이미지 삽입 하고자 하는 위치를 클릭합니다。

2。 그런 다음삽입>그림>온라인 그림를 클릭하세요。 스크린샷 참조：

3。 다음과 같은 창이 표시됩니다。온라인 그림섹션에서 검색어를 텍스트 상자에 입력한 후Enter키를 누르면 관련 그림이 모두 한 번에 검색됩니다。 스크린샷 참조：

4。 그런 다음 원하는 그림을 선택하고삽입버튼을 클릭합니다。 그림 삽입 후 필요에 따라 크기를 조정하거나 위치를 변경하세요。

다음 VBA 코드를 사용하면 셀 크기에 따라 여러 이미지를 셀에 삽입할 수 있습니다。 다음 단계를 따르세요：

1。 그림을 넣을 셀의 크기를 조정한 후 해당 셀을 선택합니다。

2。 그런 다음ALT + F11키를 눌러Microsoft Visual Basic for Applications창을 엽니다。

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 코드에 익숙하지 않다면 다음과 같은 강력한 기능을 사용할 수 있습니다 –사진 가져오기의Kutools for Excel。 이 유용한 기능을 사용하면 여러 이미지를 셀에 빠르고 쉽게 가져올 수 있습니다。

1。 클릭하세요。Kutools 플러스>가져오기/내보내기>사진 가져오기。 스크린샷 참조：

2。 나타난사진 가져오기대화 상자에서 다음 작업을 수행하세요：

• 가져오기 순서 드롭다운 목록에서 그림 순서를 지정할 수 있으며，열로 채우고 행으로 채우기또는행으로 채우고 열로 채우기중 선택할 수 있습니다；
• 그런 다음추가버튼을 클릭하여 사진을 추가할 이미지 파일 또는 폴더를 선택합니다。사진 목록;
• 다음에서가져오기 크기버튼을 클릭하고，그림 크기 가져오기대화 상자에서셀 크기 일치옵션을 선택합니다。
• 

3。 설정을 완료한 후가져오기버튼을 클릭하면 또 다른사진 가져오기창이 나타납니다。 그림을 가져올 대상 셀을 지정하세요。 스크린샷 참조：

4。 그런 다음확인버튼을 클릭하면 선택한 모든 이미지가 아래 스크린샷과 같이 특정 셀의 크기에 맞춰 삽입됩니다。

다음 VBA 코드를 사용하면 파일 이름과 일치하는 여러 이미지를 빠르게 삽입할 수 있습니다。 아래 단계대로 진행하세요：

1.ALT + F11키를 누른 상태로Microsoft Visual Basic for Applications창을 엽니다。

2.삽입 >모듈을 클릭하고， 다음 매크로를모듈창에 붙여넣습니다。

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

참고： 위 코드에서 “.ShapeRange.Height = 60”, “.ShapeRange.Width = 60” 부분의 이미지 높이와 너비 값을 필요에 따라 변경할 수 있습니다。

3。 그런 다음F5키를 눌러 이 코드를 실행합니다。 열린 창에서 이미지를 삽입하려는 폴더를 선택하세요합니다。 스크린샷 참조：

4。 그런 다음확인버튼을 클릭하면 프롬프트 상자가 나타납니다。 이미지 이름이 포함된 셀을 선택하세요합니다。 스크린샷 참조：

5。 계속해서확인버튼을 클릭하면 또 다른 프롬프트 상자가 나타납니다。 이미지를 출력할 셀을 선택하세요합니다。 스크린샷 참조：

6。 마지막으로확인을 클릭하면 이미지가 이름에 따라 해당 셀에 한 번에 삽입됩니다。 스크린샷 참조：

만약Kutools for Excel를 보유하고 있다면，사진 일치 가져오기기능을 사용해 이미지 이름에 기반한 이미지를 빠르고 쉽게 삽입할 수 있습니다。

1.Kutools 플러스>가져오기/내보내기>사진 일치 가져오기를 클릭합니다。 스크린샷 참조：

2。 나타난Match Import Picture대화 상자에서 다음 작업을 수행합니다：

• 가져오기 순서 드롭다운 목록에서 그림 순서를 지정할 수 있습니다。 다음 중에서 선택하세요：열로 채우고 행으로 채우기또는행으로 채우고 열로 채우기;
• 그런 다음일치 범위텍스트 상자에서 이미지 삽입 기준으로 사용할 그림 이름을 선택합니다。
• 그리고 나서추가버튼을 클릭하여 사진을 추가할 이미지 파일 또는 폴더를 선택합니다。사진 목록;
• 다음으로 그림 크기를 지정해야 합니다。가져오기 크기버튼을 클릭하고，그림 크기 가져오기대화 상자에서 필요한 그림 크기를 하나 선택하세요。
• 

3。 설정을 완료한 후가져오기버튼을 클릭하고， 나타난사진 일치 가져오기대화 상자에서 이미지를 배치할 셀 또는 셀 목록을 선택합니다。 스크린샷 참조：

4。 그런 다음확인을 클릭하면 셀 값과 이름이 일치하는 모든 이미지가 삽입됩니다。 스크린샷 참조：

다음 VBA 코드를 적용하여 URL 목록에 기반해 이미지를 삽입할 수 있습니다。

1。 먼저 이미지를 배치할 인접 셀의 크기를 조정합니다。

2.ALT + F11키를 누른 상태로Microsoft Visual Basic for Applications창을 엽니다。

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 에서 인접 열로 추출되어 셀 중앙에 배치됩니다。 스크린샷 참조：

Kutools for Excel에는 놀라운 기능인 –경로(URL)에서 그림 삽입이 있습니다. 이 유틸리티를 사용하면 URL 에서 해당 그림을 빠르고 쉽게 추출할 수 있습니다。

1.Kutools>삽입>경로에서 사진 삽입를 클릭합니다。 스크린샷 참조：

2。 나타난경로에서 사진 삽입대화 상자에서 다음 작업을 설정합니다：

• URL 셀 목록과 이미지를 삽입할 셀 범위를 선택합니다。
• 필요에 따라그림 크기섹션에서 이미지 크기를 지정합니다。
• 

3。 그런 다음확인버튼을 클릭하면 모든 그림이 URL 에서 추출됩니다。 스크린샷 참조：

이미지 파일 경로에 기반해 이미지를 삽입하려면 다음 VBA 코드를 적용할 수 있습니다。

1.ALT + F11키를 누른 상태로Microsoft Visual Basic for Applications창을 엽니다。

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。 그런 다음확인버튼을 클릭하면 파일 경로에 기반한 모든 이미지가 다음 열에 아래 스크린샷과 같이 표시됩니다：

Kutools for Excel의경로에서 사진 삽입기능도 파일 경로에서 관련 이미지를 표시하는 데 도움을 줄 수 있습니다。

1.Kutools>삽입>경로에서 사진 삽입을 클릭합니다。 나타난 대화 상자에서 필요한 대로 파일 경로 범위， 이미지 출력 범위， 이미지 크기를 지정합니다。 스크린샷 참조：

2。 옵션을 설정한 후확인버튼을 클릭하면 이미지가 선택한 셀에 한 번에 삽입됩니다。 스크린샷 참조：

팁： 때때로 아래 스크린샷과 같이 이미지가 워크시트의 데이터 영역과 겹치는 경우가 있습니다。 이는 이미지가 너무 커서 머리글이나 바닥글 섹션 상자에 자동으로 맞춰지지 않기 때문입니다。

이 문제를 해결하려면 머리글 또는 바닥글 내 이미지 크기만 조정하면 됩니다。 다음 단계를 따르세요：

1。 이미지가 있는 머리글 또는 바닥글 섹션을 클릭한 후그림 서식을디자인탭에서 클릭합니다。 스크린샷 참조：

2.그림 서식대화 상자에서크기탭 아래에서 이미지 크기를 머리글 또는 바닥글 섹션 상자에 맞게 조정합니다。 스크린샷 참조：

3。 그런 다음확인을 클릭하면 원하는 결과를 얻을 수 있습니다。

1.배경 이미지를 삽입하려는 워크시트를 엽니다。

2.그런 다음페이지 레이아웃>배경을 클릭합니다。 스크린샷 참조：

3.팝업된그림 삽입창에서 필요에 따라 컴퓨터, 웹사이트 또는 OneDrive 에서 원하는 그림을 선택합니다。 스크린샷 참조：

4.이제 아래 스크린샷과 같이 이미지가 배경으로 워크시트에 삽입되었습니다。

위의 방법을 사용하면 삽입된 배경 이미지의 투명도를 변경할 수 없습니다。 따라서 배경 이미지 색상이 진하면 워크시트 데이터를 읽기 불편할 수 있습니다。 이 섹션에서는 셀 뒤에 투명한 그림을 삽입하는 방법을 설명합니다。

1.클릭하여삽입>도형으로 이동한 후 직사각형 도형을 선택합니다。 스크린샷 참조：

2.그런 다음 활성 워크시트에서 필요한 크기로 도형을 그립니다。

3.도형을 그린 후에는 리본에도형 도구탭이 표시되며， 이를 클릭한 다음서식>도형 윤곽선>윤곽선 없음을 선택합니다。 스크린샷 참조：

4.그런 다음 도형을 마우스 오른쪽 버튼으로 클릭하고 상황에 맞는 메뉴에서도형 서식을 선택합니다。 스크린샷 참조：

5.펼쳐진도형 서식창에서채우기 및 선탭 아래에서 다음 작업을 수행합니다：

• 채우기섹션에서그림 또는 텍스처 채우기옵션을 선택합니다。
• 클릭하세요。삽입버튼을그림 소스에서 선택하고， 삽입할 그림을 하나 고르세요。
• 그런 다음투명도섹션에서 필요에 따라 그림의 투명도를 조정합니다。
• 

6.그러면 위 스크린샷과 같이 그림으로 채워진 도형이 배경 이미지처럼 보입니다。

참고： 이러한 유형의 배경 이미지를 삽입한 후에는 그림 범위 내에 텍스트를 입력할 수 없습니다。

위의 두 가지 방법 모두 고유한 제한 사항이 있습니다。 첫 번째 방법은 이미지 투명도를 변경할 수 없고， 두 번째 방법은 그림 영역 내 셀에 텍스트를 입력할 수 없습니다。 이러한 문제를 해결하기 위해Kutools for Excel의워터마크 삽입기능이 도움을 줄 수 있습니다。

1.클릭하여Kutools>삽입>워터마크 삽입으로 이동합니다。 스크린샷 참조：

2.팝업된워터마크 삽입대화 상자에서그림 워터마크을 선택한 후그림 선택버튼을 클릭하여 삽입할 이미지를 선택하고， 이미지 크기를 지정한 후 '연하게‘ 옵션을 선택합니다。 스크린샷 참조：

3.그런 다음확인버튼을 클릭하면 그림이 배경 이미지로 워크시트에 삽입됩니다。

Excel 에서는그림으로 복사기능을 사용하여 셀 범위를 이미지로 복사 및 삽입할 수 있습니다。

1.이미지로 복사 및 삽입하려는 셀 범위를 선택합니다。

2.그런 다음 클릭하여홈>복사>그림으로 복사로 이동합니다。 스크린샷 참조：

3.팝업된그림 복사대화 상자에서그림을형식섹션에서 선택합니다。 스크린샷 참조：

4.그런 다음확인버튼을 클릭하고， 이제 워크북의 원하는 위치에 이미지를 붙여넣으려면Ctrl + V를 누르기만 하면 됩니다。

Excel 에는카메라도구가 있어 데이터 선택의 사진을 찍어 이미지로 붙여넣을 수 있습니다。 원본 데이터가 변경되면 복사된 이미지도 동적으로 변경됩니다。

먼저 리본에카메라도구를 표시한 후 사용해야 합니다。

1.클릭하여빠른 실행 도구 모음 사용자 지정아이콘을 선택한 후다른 명령 선택옵션을 클릭합니다。 스크린샷 참조：

2.열린Excel 옵션대화 상자에서 다음 작업을 수행합니다：

• 선택하세요。모든 명령을(를)명령 선택 기준드롭다운에서 선택합니다。
• 그런 다음 목록 상자에서카메라를 선택하기 위해 스크롤합니다。
• 그리고 나서추가버튼을 클릭하여 이 도구를빠른 실행 도구 모음 사용자 지정에 추가합니다。
• 마지막으로확인을 클릭하여 이 대화 상자를 닫습니다。
• 

3.그러면 리본에카메라도구가 표시됩니다。 스크린샷 참조：

4.그런 다음 이미지를 만들고자 하는 셀 범위를 선택합니다。

5.그런 다음카메라도구를 클릭하고 워크시트로 이동하여 아무 곳이나 클릭하면 데이터 범위이 아래 데모와 같이 이미지로 삽입됩니다：

만약Kutools for Excel을 보유하고 있다면， 그자원 라이브러리기능을 사용하여 데이터 선택을자원 라이브러리에 저장한 후 향후 필요에 따라 이미지나 텍스트로 사용할 수 있습니다。

1.이미지로 삽입하려는 데이터 범위를 선택합니다。

2.그런 다음 클릭하여Kutools>탐색으로 이동합니다。 스크린샷 참조：

3.펼쳐진탐색창에서자원 라이브러리아이콘을 클릭한 후선택한 콘텐츠를 자동 텍스트에 추가아이콘을 클릭합니다。 스크린샷 참조：

4.자동 텍스트에 추가대화 상자에서 항목 이름을 지정하고 추가할 그룹을 선택합니다。 스크린샷 참조：

5.그런 다음추가버튼을 클릭하여자원 라이브러리창에 추가합니다。 이 범위를 그림으로 삽입하려면 먼저 그림을 배치할 셀을 클릭한 후자원 라이브러리창에서 저장된 항목을 찾아 클릭하고 드롭다운 목록에서다음으로 삽입>그림(EMF)을 선택합니다。 그러면 데이터 범위이 시트에 이미지로 삽입됩니다。 스크린샷 참조：

일반적으로 Excel 에서는 동적 이름 범위를 생성한 후 연결된 그림을 사용하여 이 작업을 해결할 수 있습니다。

1.먼저 제품 이름과 관련 이미지를 포함하는 두 개의 열을 만듭니다。 스크린샷 참조：

2。 그런 다음 셀 값에 대한 드롭다운 목록을 생성하세요。 드롭다운 목록을 출력할 셀을 클릭한 후데이터>데이터 유효성 검사>데이터 유효성 검사를 클릭하세요(스크린샷 참조)：

3。 표시된데이터 유효성 검사대화 상자에서설정탭의허용드롭다운 목록에서목록을 선택하고， 드롭다운 목록을 생성할 셀 범위를원본텍스트 상자에 지정하세요(스크린샷 참조)：

4.확인을 클릭하면 셀 값을 기반으로 한 드롭다운 목록이 생성됩니다。 드롭다운 목록에서 항목을 하나 선택하세요(스크린샷 참조)：

5。 그런 다음수식>이름 정의를 클릭하세요(스크린샷 참조)：

6.새 이름대화 상자에서 다음 작업을 수행하세요：

• 이름 텍스트 상자에Name‘myimage'라는 이름을 입력합니다。
• 그런 다음 다음 수식을 복사하여 붙여넣으세요：=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。 그런 다음확인버튼을 클릭하고， 원래 범위에서 E2 셀 값에 해당하는 그림을 복사하여 F2 셀에 붙여넣으세요(스크린샷 참조)：

8。 다음으로 F2 셀의 그림을 선택하세요하고， 다음 수식을=myimage(myimage은 단계 6 에서 생성한 셀 이름입니다) 수식 표시줄에 입력하세요(스크린샷 참조)：

9。 수식을 입력한 후Enter키를 누르면， 드롭다운 목록에서 항목을 선택할 때마다 해당 그림이 즉시 표시됩니다(스크린샷 참조)：

상기 방법은 대부분의 사용자에게 어려울 수 있습니다。 여기서는 간편한 기능인이미지 드롭다운 목록을 소개합니다。Kutools for Excel의 이 유용한 도구를 사용하면 몇 번의 클릭만으로 관련 이미지가 포함된 여러 드롭다운 목록을 생성할 수 있습니다。

2。 먼저 워크시트에 제품 이름과 관련 이미지를 각각 포함하는 두 열을 만들어야 합니다。

2。 그런 다음Kutools>드롭다운 목록>이미지 드롭다운 목록를 클릭하세요(스크린샷 참조)：

3.이미지 드롭다운 목록대화 상자에서 이미 셀 값 및 이미지 열을 생성한 경우 단계 1 은 건너뛰고， 원본 데이터와 이미지 범위 및 목록 배치 영역을 선택하세요(스크린샷 참조)：

4。 그런 다음확인버튼을 클릭하면 선택한 셀에 이미지가 포함된 드롭다운 목록이 생성되며， 드롭다운 셀에서 항목을 선택할 때마다 해당 그림이 즉시 표시됩니다(아래 데모 참조)：

일반적으로 워크북에서 모든 이미지를 저장하려면다른 이름으로 저장기능을 사용할 수 있습니다。 다음과 같이 진행하세요：

1.파일>다른 이름으로 저장을 클릭하고，다른 이름으로 저장창에서 내보낼 파일을 저장할 폴더를 지정한 후웹 페이지(*。htm；*。html)을파일 종류드롭다운 목록에서 선택하세요(스크린샷 참조)：

2。 그런 다음저장버튼을 클릭하고 지정한 폴더로 이동하면 두 개의 파일이 표시됩니다。 하나는 HTML 형식 파일이고， 다른 하나는 워크북의 그림， 차트 또는 기타 개체가 포함된 폴더입니다(스크린샷 참조)：

3。 이후 필요에 따라 이미지만 다른 폴더로 드래그할 수 있습니다。

참고： 이다른 이름으로 저장기능을 사용하면 각 그림이 두 번 저장됩니다。 하나는 작고 다른 하나는 큽니다。 따라서 필요에 따라 고해상도 이미지를 저장할 수 있습니다。

Excel 파일에서 모든 이미지를 저장하려면 파일 확장자를 RAR 로 변경할 수도 있습니다。 다음과 같이 진행하세요：

1。 아래 스크린샷과 같이 파일 확장자xlsx를rar로 변경하세요：

2. 그런 다음 파일을 압축 해제하면 폴더 안에 3 개의 폴더와 1 개의 파일이 표시됩니다(스크린샷 참조)：

3。 그런 다음xl폴더를 열고， 그 안에 있는media폴더를 열면 중복 없이 모든 이미지가 여기에 저장되어 있음을 확인할 수 있습니다(스크린샷 참조)：

만약Kutools for Excel을 보유하고 있다면， 그차트 내보내기기능을 통해 필요한 특정 개체(예： 그림， 차트， 도형)를 이미지 형식으로 신속하게 내보낼 수 있습니다。

1.Kutools 플러스>가져오기/내보내기>차트 내보내기를 클릭하세요(스크린샷 참조)：

2.차트 내보내기대화 상자에서 다음 작업을 수행하세요：

• 선택하세요。그림옵션을유형드롭다운 목록에서 선택합니다。
• 내보낼 그림을 저장할 폴더를 지정합니다。
• 그런 다음내보내기 형식의 드롭다운 목록을 클릭하여 그림 형식을 하나 선택합니다。
• 

3。 마지막으로확인버튼을 클릭하면 현재 워크북의 모든 이미지가 지정한 폴더에 저장됩니다(스크린샷 참조)：

현재 워크시트에서 그림을 삭제하려면 아래 VBA 코드를 사용할 수 있습니다。 다음과 같이 진행하세요：

1。 삭제할 이미지가 포함된 워크시트를 활성화하세요。

2.ALT + F11키를 누르면Microsoft Visual Basic for Applications창이 열립니다。

3.삽입>모듈을 클릭하고 다음 매크로를모듈창에 붙여넣으세요。

VBA 코드： 현재 워크시트에서 모든 그림 삭제

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

4。 그런 다음F5키를 눌러 이 코드를 실행하면 활성 워크시트의 모든 그림이 즉시 삭제됩니다。

특정 셀 범위에서만 이미지를 삭제해야 하는 경우， 다음 간단한 코드를 사용할 수 있습니다。

1.ALT + F11키를 누르면Microsoft Visual Basic for Applications창이 열립니다。

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 for Excel을 보유하고 계시다면， 그그림 및 개체 삭제기능을 사용하여 워크시트， 일부 선택한 워크시트 또는 전체 워크북에서 이미지를 빠르게 삭제할 수 있습니다。

1.Kutools>삭제>그림 및 개체 삭제를 클릭하세요。 스크린샷 참조：

2。 열린그림 및 개체 삭제대화 상자에서그림을삭제섹션에서 선택한 후，검색 위치섹션에서 그림을 삭제할 범위를 지정하세요。 스크린샷 참조：

3。 그런 다음확인버튼을 클릭하면 지정한 대로 워크시트， 선택한 시트 또는 전체 워크북에서 모든 그림이 삭제됩니다。