Microsoft Q&A
이 태그를 사용하여 제안, 기능 요청 및 버그를 Microsoft Q&A 팀과 공유합니다. Microsoft Q&A 팀은 정기적으로 피드백을 평가하고 그 과정에서 업데이트를 제공합니다.
질문 330개
이 브라우저는 더 이상 지원되지 않습니다.
최신 기능, 보안 업데이트, 기술 지원을 이용하려면 Microsoft Edge로 업그레이드하세요.
'테스트용
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 엑셀 사용하고 있습니다. 다른 해결방법이 있을까요?