이 통합 문서에서 사용할 수 없는 매크로이거나 모든 매크로를 사용하지 못할 수 있습니다.

Question

'테스트용

Private Sub test_Click()

If test.Caption = "test" Then

    Dim text As String

    text = Left(ThisWorkbook.FullName, InStrRev(ThisWorkbook.FullName, "\") - 1)

    test.Caption = text

    log_write (Time)

    

    Dim targetTime As Date

    targetTime = Now + TimeValue("00:00:03") ' 현재 시간에서 3초 뒤

    Application.OnTime targetTime, "TestProcedure"

    MsgBox "3초 뒤 메세지가 뜨게 설정했습니다."

Else

    test.Caption = "test"

End If

End Sub

Private Sub TestProcedure()

MsgBox "3초가 경과했습니다."

End Sub

---

이렇게 작성 후 test 버튼을 클릭하면 "3초 뒤 메세지가 뜨게 설정했습니다" 라는 메세지 박스는 뜹니다. 이후 3초뒤에 TestProcedure() 이 동작해야 하는데, "\c://~~생략, 이 통합 문서에서 사용할 수 없는 매크로이거나 모든 매크로를 사용하지 못할 수 있습니다." 라는 문구가 나옵니다.

검색해보니 콘텐츠사용이나 보안설정을 해보라고 해서 콘텐츠 사용 설정도 완료하고, 보안설정도 모든매크로사용, 개발자매크로사용 설정했는데도 안되네요. 현재 32bit 엑셀 사용하고 있습니다. 다른 해결방법이 있을까요?