사용자가 셀을 변경하면 매크로가 실행됩니다.

Question

범위의 셀이 변경되면 매크로가 자동으로 실행되도록하려고합니다 (C5에서 C25).

아래 코드에서 알 수 있듯이 계속할지 여부를 묻는 메시지 상자가 자동으로 나타납니다 (사용자가 예라고 표시 한 다음 매크로를 실행하는 경우).

셀 중 하나가 변경되면 코드를 실행할 수 없지만 (c5에서 c25로) 여기

코드 - 그것은 내 자신의 모든되지 않습니다 :

Private Sub Worksheet_Change(ByVal Target As Range) 
If Not Intersect(Target, Target.Worksheet.Range("C5:C25")) Is Nothing Then Reminder 
End Sub 
Sub Reminder() 
' 
' Reminder Macro 
' 
response = MsgBox("Do you want to set a reminder in Outlook for when the next update is required? If yes, make sure your Microsoft Outlook is open.", vbYesNo) 

If response = vbNo Then 
    MsgBox ("You selected 'No'") 
    Exit Sub 
End If 
'Rest of my macro code goes here... 

End sub 

감사합니다!

Answer 1

코드가 워크 시트의 코드 모듈에 있는지 확인하십시오. 위의 설명에서 모듈 3에 있음을 나타냅니다. 워크 시트의 코드 모듈로 이동해야합니다.

Answer 2

시도 :

Private Sub Worksheet_Change(ByVal Target As Range) 
    If Not Intersect(Range("C5:C25"), Target) Is Nothing Then 
     Call reminder 
    End If 
End Sub 

Answer 3

귀하의 코드가 잘 작동, 당신은 워크 시트 개체에 넣어 있는지 확인하십시오. 또한 xlsm으로 저장하고 닫은 다음 다시 열 때까지 코드가 활성화되지 않을 것이라고 생각합니다.