엑셀 사진 삽입 매크로 질문입니다.

Question

안녕하세요

엑셀 매크로 오류 때문에 문의 드립니다.

일단 매크로 코드는

'

' 매크로1 매크로

'

' 바로 가기 키: Ctrl+q

'

    Dim myPic   As Variant

    Dim rng     As Range

    Set rng = Selection

    myPic = Application.GetOpenFilename _

                    (filefilter:="Picture Files,*.jpg;*.bmp;*.tif;*.gif")

    If myPic = False Then

        Exit Sub

    End If

     With ActiveSheet.Pictures.Insert(myPic).ShapeRange

        .LockAspectRatio = msoFalse

        .Height = rng.Height - 0

        .Width = rng.Width - 0

        .Left = rng.Left + 0

        .Top = rng.Top + 0

    End With

    pic.Select

    Selection.Copy

    ActiveSheet.Pictures.Paste.Select

    pic.Delete

End Sub

이게 지금 코드인데요

다른 컴퓨터들에서는 다 정상적으로 작동하는데

제 노트북에서는 연결된 이미지를 표시할 수 없습니다...생략

이 메세지가 계속 뜨는데요, 엑셀 버전은 2013버전이구요 어떻게 해야할까요?

Answer 1

안녕하십니까? 인선김 님

Microsoft Community 사이트를 방문해 주셔서 감사합니다.

문의 하신 Excel의 VBA 매크로 오류에 대해 안내를 드리겠습니다.

말씀해 주신 VBA 매크로의 경우 해당 포럼에서는 지원이 되지 않습니다.

MSDN 개발자 포럼에 문의하여 도움을 받으시기 바랍니다.

http://msdn.microsoft.com/ko-kr/office/ 

http://social.msdn.microsoft.com/Forums/vstudio/ko-KR/home?forum=visualbasicko

추가적인 내용이 있다면 하단의 [응답] 버튼을 눌러 회신해주시기 바랍니다.

제시해 드린 답변이 도움이 되었기를 바랍니다.

응답이 문제 해결에 도움이 되었다면, 아래에 있는 답변으로 [표시] 버튼을 눌러 주시기 바랍니다. 이는 유사한 증상을 겪는 다른 사용자들에게 도움이 될 수 있습니다.

감사합니다.