Excel에서 VBA를 사용하여 셀에 그림을 삽입하는 방법

Excel 스프레드시트에 이미지를 쉽게 삽입 하고 매크로 코드로 편집 할 수 있습니다 . Excel에서 VBA를 사용하여 셀에 그림을 삽입하는 방법은 다음과 같습니다 .

VBA로 축약되는 Visual Basic for Application은 Microsoft Office 프로그램에 통합된 Visual Basic 6의 한 형태입니다. 코딩을 통해 VBA를 사용하면 Excel을 포함한 Office 응용 프로그램의 작업을 자동화할 수 있습니다. 어떤 경우에는 VBA를 사용하여 Excel에 새로운 기능을 추가할 수도 있습니다.

VBA를 사용하기 위해 코드 작업이 필요하다고 해서 VBA가 문자와 숫자로 가득 차 있다는 의미는 아닙니다. Excel의 VBA를 사용하면 셀이나 셀 범위에 그림을 삽입할 수 있는 매크로를 만들 수 있습니다. VBA를 사용하여 Excel의 셀에 그림을 삽입하는 방법에 대해 알아야 할 사항은 다음과 같습니다.

Excel에서 VBA를 사용하여 셀에 그림을 삽입하는 방법

1. 개발자 도구를 켜세요
2. 매크로 생성 및 코드 삽입
3. 분할 코드

VBA를 사용하여 Excel 셀에 그림을 삽입하는 매크로를 만들려면 실제로 고급 Visual Basic 지식이 필요하지 않습니다. 개발자 도구를 켜고, 매크로를 만들고, 적절한 코드를 붙여넣기만 하면 됩니다. 물론 VBA를 사용하지 않고도 Excel에 이미지를 삽입할 수도 있습니다. 그러나 이 기사에서는 VBA에 중점을 둘 것입니다.

1. 개발자 도구를 켜세요

Excel에서 VBA를 사용하려면 개발자 도구를 활성화해야 합니다. 이 작업을 수행하면 기본적으로 비활성화되어 있는 리본의 개발자 탭이 활성화됩니다.

엑셀을 엽니다 .
파일 메뉴 로 이동합니다 .
화면 하단에서 옵션을 클릭하세요 . Excel 옵션 창이 나타납니다.
Excel 옵션에서 리본 사용자 정의 탭으로 이동합니다 .
기본 탭 에서 개발자를 확인하세요 .

Excel에서 VBA를 사용하여 셀에 그림을 삽입하는 방법

이제 VBA 액세스를 포함한 개발자 도구가 활성화되었습니다. Excel에서 VBA를 사용하려고 할 때마다 이 작업을 수행할 필요는 없습니다. 개발자 도구는 비활성화할 때까지 항상 활성화됩니다.

2. 매크로 생성 및 코드 삽입

Excel에서 개발자 탭으로 이동합니다 .
코드 섹션에서 매크로 를 선택합니다 .
새 창에서 매크로 이름 에 매크로 이름을 입력합니다 . 이 기사에서는 insertPhotoMacro 를 사용합니다 .
만들기 를 클릭합니다 .

Excel에서 VBA를 사용하여 셀에 그림을 삽입하는 방법

만들기를 클릭하면 VBA 창이 열리고 매크로 코드가 표시됩니다. 현재 코드는 매크로를 시작하는 Sub 와 매크로 를 끝내는 End Sub 의 두 줄로 구성됩니다.

Excel에서 VBA를 사용하여 셀에 그림을 삽입하는 방법

이 매크로에 작은 코드를 추가하세요. 두 줄 사이에 다음 코드 줄을 추가합니다.

Dim photoNameAndPath As Variant
Dim photo As Picture
photoNameAndPath = Application.GetOpenFilename(Title:="Select Photo to Insert")
If photoNameAndPath = False Then Exit Sub
Set photo = ActiveSheet.Pictures.Insert(photoNameAndPath)
With photo
.Left = ActiveSheet.Range("A1").Left
.Top = ActiveSheet.Range("A1").Top
.Width = ActiveSheet.Range("A1").Width
.Height = ActiveSheet.Range("A1").Height
.Placement = 1
End With

최종 코드는 다음과 같습니다:

Excel에서 VBA를 사용하여 셀에 그림을 삽입하는 방법

이 프로세스를 저장하는 것에 대해 걱정할 필요가 없습니다. VBA에서 변경한 내용은 즉시 저장됩니다.

이제 실제 코드를 볼 차례입니다.

VBA 창을 닫습니다.
Excel의 개발자 탭 으로 이동합니다 .
코드 섹션에서 매크로를 선택합니다 .
방금 만든 매크로를 강조 표시합니다.
실행 을 클릭합니다 .

이제 삽입하려는 이미지 파일을 찾으라는 메시지가 열립니다. 사진을 선택한 다음 열기를 클릭합니다. 이제 A1 셀에 이미지가 표시됩니다.

Excel에서는 A1 셀에 맞도록 이미지가 축소됩니다. 이를 변경하고 코드를 변경하여 다른 셀, 심지어 셀 범위에도 이미지를 삽입할 수 있습니다. 다음 섹션에서는 코드를 분리하고 매개변수에 대해 설명하겠습니다.

3. 분할 코드

VBA 코드가 원하는 방식으로 작동하려면 코드를 이해해야 합니다. 이렇게 하면 코드를 변경하여 모든 크기의 모든 셀에 이미지를 삽입할 수 있습니다.

Sub insertPhotoMacro()
Dim photoNameAndPath As Variant
Dim photo As Picture
photoNameAndPath = Application.GetOpenFilename(Title:="Select Photo to Insert")
If photoNameAndPath = False Then Exit Sub
Set photo = ActiveSheet.Pictures.Insert(photoNameAndPath)
With photo
.Left = ActiveSheet.Range("A1").Left
.Top = ActiveSheet.Range("A1").Top
.Width = ActiveSheet.Range("A1").Width
.Height = ActiveSheet.Range("A1").Height
.Placement = 1
End With
End Sub

코드가 시작되면 Dim 문을 사용하여 변수 유형을 결정합니다. photoNameAndPath 와 photo 의 두 가지 변수 유형이 있습니다 . 먼저 변수와 이미지입니다.

여기에서 photoNameAndPath 변수가 실행되고 사진 파일의 위치를 가져오는 응용 프로그램이 열립니다. 이는 Application.GetOpenFileName을 통해 수행됩니다 . Title 매개변수는 선택사항입니다. 그 안의 내용은 창 이름으로 표시됩니다.

If photoNameAndPath = False Then Exit Sub 를 사용하면 유효하지 않거나 빈 주소가 제공되면 프로세스가 종료됩니다. 그러나 적합한 파일이 제공되는 경우 Set photo = ActiveSheet.Pictures.Insert(photoNameAndPath)는 그림이 원래 정의된 대로 변수로 설정되어야 함을 나타냅니다. 활성 워크시트에 삽입됩니다.

마지막으로 With photo와 그 뒤의 5줄을 사용하여 사진의 위치를 결정합니다. .Left 및 .Top은 시작 위치를 나타내고 .Width 및 .Height 는 끝 위치를 나타냅니다. 다른 셀이나 범위에 이미지를 삽입하려는 경우 다음 줄을 변경해야 합니다.

.배치란 셀이나 삽입된 자유형에 맞게 그림의 크기를 조정해야 함을 나타냅니다. 1 로 설정하면 셀에 따라 크기가 조정됩니다.

마지막으로 위 코드는 End With 를 사용한 다음 End Sub 를 사용하여 매크로를 닫습니다. 이제 변수 photoNameAndPath 및 photo를 원하는 다른 이름으로 변경할 수 있습니다. 코드 전체에서 이름을 일관되게 유지하는 것을 잊지 마세요.

위는 VBA를 사용하여 Excel의 셀에 이미지를 삽입하는 방법 입니다 . 이 기사가 당신에게 도움이 되기를 바랍니다.