Microsoft Excel에서 VBA를 사용하여있는 MsgBox와 선택 범위를 강조

Sub GetRange()

Dim Rng As Range

On Error Resume Next

Set Rng = Application.InputBox(prompt:="Enter range",Type:=8)

If Rng Is Nothing Then

MsgBox "Operation Cancelled"

Else

Rng.Select

End If

End Sub