Microsoft ExcelでVBAを使用してメッセージボックスで選択した範囲をハイライト
以下のコードを標準モジュールに配置します
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