Highlight a selected range with a MsgBox using VBA in Microsoft Excel

Place the code below into the standard module

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

Ron
August 23, 2013 at 5:03 am

I've been searching for a way to prompt for the user to seletc a range (to set a print area) & this did the trick. Thanks!

Reply ↓

Leave a Reply Cancel reply

Terms and Conditions of use

The applications/code on this site are distributed as is and without warranties or liability. In no event shall the owner of the copyrights, or the authors of the applications/code be liable for any loss of profit, any problems or any damage resulting from the use or evaluation of the applications/code.