대화 상자에서 입력하는 사용자에게 범위를하는 방법을

Question

그래서 난 것이 가능 범위를 선택하는 사용자를 조회 할 수

dim x as range 
x = getrange("Select Range to Compare") 
msgbox "The range selected is " & x 

은 "같은 것입니다 방법, 사용자의 범위를 얻을 필요 이 할 수있는 방법?

Answer 1

당신은. 이런 식으로 뭔가를 시도 귀하의 요구 사항에 따라이를 조정할 수 있습니다.

Sub AskUserToSelectARangeToWorkWith() 
Dim Rng As Range 
On Error Resume Next 
Set Rng = Application.InputBox("Select a Range to compare.", "Select A Range!", Type:=8) 
If Rng Is Nothing Then 
    MsgBox "You didn't select a Range.", vbCritical, "No Range Selected!" 
    Exit Sub 
End If 
MsgBox "The Range selected is " & Rng.Address(0, 0) 
End Sub