ExecuteMso-사진 변경> 파일에서 클릭하여 필요할 때 그림을 변경할 수

그림 변경 기능을 Excel로 가져올 수있는 버튼을 만들고 싶습니다. 사용자가 그림 위의 버튼을 클릭하여 필요할 때 그림을 변경할 수 있기를 원합니다.

이 매크로가 작동하지 않는 이유를 누군가에게 알려줄 수 있습니까?

Sub ChangePicture()
ActiveSheet.Shapes.Range(Array("PIC_RENTCOMP1A")).Select
CommandBars.ExecuteMso ("PictureChange")
End Sub

마우스 오른쪽 버튼 클릭> 그림 변경> 파일에서와 같은 기능을 원합니다.

미리 감사드립니다.

답변