텍스트 상자에 그림을 삽입하는 방법은 무엇입니까?

기본적으로 삽입 기능을 사용하여 워크시트에 그림이나 이미지를 빠르게 삽입할 수 있지만, 이 기능은 텍스트 상자에 그림을 삽입하는 데는 적용되지 않습니다. 이 문서를 통해 필요에 따라 텍스트 상자에 그림을 삽입하는 방법을 도와드릴 수 있습니다.

VBA 코드를 사용하여 텍스트 상자에 그림 또는 이미지 삽입

VBA 코드를 사용하여 텍스트 상자에 그림 또는 이미지 삽입

텍스트 상자에 그림을 삽입하기 위해 다음 VBA 코드가 도움이 될 수 있습니다. 아래 단계를 따르세요:

1. 삽입 > 텍스트 상자를 클릭하여 텍스트 상자를 삽입하고, 텍스트 상자를 그립니다. 스크린샷을 참조하세요:

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

3. 삽입 > 모듈을 클릭하고, 모듈 창에 다음 코드를 붙여넣습니다.

VBA 코드: 텍스트 상자에 그림 삽입:

Sub ShapePicture()
    Dim xSh As Shape
    Dim xPic As IPictureDisp
    Dim xFileName As String
    xFileName = "C:\Users\DT168\Desktop\pictures\Apple.JPG"
    Set xPic = LoadPicture(xFileName)
    Set xSh = Sheets("Sheet4").Shapes(1)
    xSh.Height = xPic.Height / xPic.Width * xSh.Width
    Set xPic = LoadPicture("")
    Set xPic = Nothing
    xSh.Fill.UserPicture xFileName
End Sub

참고: 위의 코드에서 Sheet4는 그림을 삽입하려는 텍스트 상자가 포함된 시트 이름이며, C:\Users\DT168\Desktop\pictures\Apple.JPG는 삽입하려는 그림의 경로입니다. 필요에 따라 이를 변경해야 합니다.

4. 그런 다음 F5 키를 눌러 이 코드를 실행하면 특정 이미지가 즉시 텍스트 상자에 삽입되며, 필요에 따라 텍스트 상자를 편집할 수 있습니다. 스크린샷을 참조하세요:

Kutools AI로 엑셀의 마법을 풀다

• 스마트 실행: 셀 작업 수행, 데이터 분석 및 차트 생성 - 간단한 명령어로 모든 것을 처리합니다.
• 사용자 정의 수식: 작업을 간소화하기 위한 맞춤형 수식을 생성합니다.
• VBA 코딩: 손쉽게 VBA 코드를 작성하고 실행합니다.
• 수식 해석: 복잡한 수식도 쉽게 이해할 수 있습니다.
• 텍스트 번역: 스프레드시트 내 언어 장벽을 허물어 보세요.

AI 기반 도구로 엑셀 활용 능력을 강화하세요. 지금 다운로드하여 그 어느 때보다 높은 효율성을 경험해 보세요!

관련 기사:

텍스트 상자에 기본값을 설정하는 방법은 무엇입니까?

텍스트 상자에 숫자만 입력하도록 허용하려면 어떻게 해야 합니까?

텍스트 상자에서 맞춤법 검사를 적용하려면 어떻게 해야 합니까?

Excel에서 값에 따라 텍스트 상자 색상을 변경하려면 어떻게 해야 합니까?