엑셀 VBA MsgBox 함수
엑셀 VBA에서 MsgBox 함수는 결과를 반환 할 수있는 동안 간단한있는 MsgBox는 할 수 없습니다.
상황 :
워크 시트에 명령 단추를 놓고 다음 코드 줄을 추가
-
먼저, 우리는 형 정수의 대답라는 변수를 선언합니다.
Dim answer As Integer
-
우리는 사용자로부터의 입력에 응답 변수를 초기화 MsgBox 함수를 사용한다.
괄호를 사용하는 경우 MsgBox 함수는 세 개의 인수가 있습니다. 첫 번째 부분은 메시지 상자에 메시지에 사용됩니다. 메시지 상자에 표시 할 버튼 및 아이콘 지정하기 위해 두 번째 부분을 사용합니다. 세 번째 부분은 메시지 상자의 제목 표시 줄에 표시됩니다.
answer = MsgBox("Are you sure you want to empty the sheet?", vbYesNo + vbQuestion, "Empty Sheet")
참고 : Visual Basic 편집기에서 vbYesNo에 커서를 놓고 당신이 사용할 수있는 다른 버튼 및 아이콘보기 위해 F1을 클릭합니다. 대신 상수 vbYesNo 및 vbQuestion, 당신은 또한 해당 값 4 (32)를 사용할 수 있습니다
사용자가 예 버튼을 클릭 3. 경우 Excel VBA 시트를 비 웁니다. 사용자가 아니오 버튼을 클릭하면 아무 일도 발생하지 않습니다. 이를 달성하기 위해 다음 코드 줄을 추가합니다.
If answer = vbYes Then Cells.ClearContents Else 'do nothing End If
시트에 명령 단추를 클릭합니다.
-
예를 클릭합니다.
결과 :