Comments on: How to accept user input and display the value in Excel 2007 macros http://itknowledgeexchange.techtarget.com/itanswers/how-to-accept-user-input-and-display-the-value-entered-back-on-the-screen/ Wed, 19 Jun 2013 01:14:38 +0000 hourly 1 By: carlosdl http://itknowledgeexchange.techtarget.com/itanswers/how-to-accept-user-input-and-display-the-value-entered-back-on-the-screen/#comment-87236 carlosdl Fri, 28 Jan 2011 20:54:55 +0000 #comment-87236 Try changing this:

MsgBox ” Starting at ” & vbCrLf _
& VStartRange.Select & ” to ” & VEndRange.Select _
, vbInformation + vbOKOnly, “Data Range Selected”

To this:

MsgBox " Starting at " & vbCrLf _
& VStartRange.Address & " to " & VEndRange.Address _
, vbInformation + vbOKOnly, "Data Range Selected"
]]> By: jkeri http://itknowledgeexchange.techtarget.com/itanswers/how-to-accept-user-input-and-display-the-value-entered-back-on-the-screen/#comment-87231 jkeri Fri, 28 Jan 2011 19:15:08 +0000 #comment-87231 Sub FormatData()
Dim VStartRange As Range
Dim VEndRange As Range
Dim VMsg As String

‘
‘ FormatData Macro
‘
‘ Keyboard Shortcut: Ctrl+Shift+F
‘ ‘ new code starts here
‘ prompt user for data ranges
Set VStartRange = Application.InputBox _
(Prompt:=” Enter Starting cell: “, _
Title:=”Identify starting Cell ($x$999)”, _
Default:=Selection.Address, _
Type:=8)
VStartRange.Select

Set VEndRange = Application.InputBox _
(Prompt:=” Enter Last cell:”, _
Title:=”Identify Ending Cell ($x$999)”, _
Default:=Selection.Address, _
Type:=8)
VEndRange.Select

MsgBox ” Starting at ” & vbCrLf _
& VStartRange.Select & ” to ” & VEndRange.Select _
, vbInformation + vbOKOnly, “Data Range Selected”

End Sub

]]> By: carlosdl http://itknowledgeexchange.techtarget.com/itanswers/how-to-accept-user-input-and-display-the-value-entered-back-on-the-screen/#comment-87225 carlosdl Fri, 28 Jan 2011 16:49:45 +0000 #comment-87225 Can you post your code, please ?

]]>