wie Benutzer zur Eingabe eines Bereich von einem Dialogfeld bekommen

Question

so brauche ich eine Reihe von dem Benutzer zu erhalten, wie ist es möglich, den Benutzer abzufragen, um einen Bereich auszuwählen, so etwas wie“

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

ist es eine Möglichkeit, dies zu tun?

Answer 1

Sie können so etwas wie dies versuchen. Tweak es wie pro Ihre Anforderung.

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