Выделите выбранный диапазон с помощью MsgBox VBA в 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