Tuesday, November 14, 2006
Excel/엑셀] MsgBox, Yes No Cancel 버튼 대화상자 만든 후, 결과 값 처리
예(Yes), 아니오(No), 취소(Cancel)
위의 3가지 버튼을 가진, "메시지 박스(MsgBox)"를 만든 후, 사용자가 버튼 중 하나를 클릭하면, 어떤 버튼을 클릭했는지 판단하는 방법입니다.
VBA뿐 아니라 VBS 에서도 똑같이 작동합니다.
MsgBox 에서 특정 버튼이 클릭되면 vbYes, vbNo, vbCancel 등의 비베 상수가 반환됩니다. 그 반환값을 IF문으로 판단하면 됩니다.
파일명: 0.vbs
▶▶ VBScript/비베] MsgBox 줄바꿈(행갈이) 방법, 멀티라인 메시지: Visual Basic, VBA
위의 3가지 버튼을 가진, "메시지 박스(MsgBox)"를 만든 후, 사용자가 버튼 중 하나를 클릭하면, 어떤 버튼을 클릭했는지 판단하는 방법입니다.
VBA뿐 아니라 VBS 에서도 똑같이 작동합니다.
MsgBox 에서 특정 버튼이 클릭되면 vbYes, vbNo, vbCancel 등의 비베 상수가 반환됩니다. 그 반환값을 IF문으로 판단하면 됩니다.
VBA MsgBox: 예, 아니오, 취소 버튼 판단 예제
Sub Example()
ync = MsgBox("할까요(Yes), 말까요(No), 아예 취소할까요(Cancel)?", vbYesNoCancel, "여기는 제목표시줄")
If ync = vbYes Then
MsgBox "'예'를 선택하셨군요"
ElseIf ync = vbNo Then
MsgBox "'아니오'를 선택하셨군요"
ElseIf ync = vbCancel Then
MsgBox "'취소'하셨군요"
End If
End Sub
ync = MsgBox("할까요(Yes), 말까요(No), 아예 취소할까요(Cancel)?", vbYesNoCancel, "여기는 제목표시줄")
If ync = vbYes Then
MsgBox "'예'를 선택하셨군요"
ElseIf ync = vbNo Then
MsgBox "'아니오'를 선택하셨군요"
ElseIf ync = vbCancel Then
MsgBox "'취소'하셨군요"
End If
End Sub
VBScript(VBS) 에서는 다음과 같이
파일명: 0.vbs
ync = MsgBox("할까요(Yes), 말까요(No), 아예 취소할까요(Cancel)?", vbYesNoCancel, "여기는 제목표시줄")
If ync = vbYes Then
MsgBox "'예'를 선택하셨군요"
ElseIf ync = vbNo Then
MsgBox "'아니오'를 선택하셨군요"
ElseIf ync = vbCancel Then
MsgBox "'취소'하셨군요"
End If
If ync = vbYes Then
MsgBox "'예'를 선택하셨군요"
ElseIf ync = vbNo Then
MsgBox "'아니오'를 선택하셨군요"
ElseIf ync = vbCancel Then
MsgBox "'취소'하셨군요"
End If
▶▶ VBScript/비베] MsgBox 줄바꿈(행갈이) 방법, 멀티라인 메시지: Visual Basic, VBA
tag: office
엑셀 Excel | 워드 Word | VBA 매크로 | 오피스
tag: batch
배치파일 | DOS CMD BATCH .BAT
<< Home