Đánh dấu một dải ô đã chọn bằng MsgBox sử dụng VBA trong Microsoft Excel

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