View Single Post
 
Old 03-28-2013, 03:58 PM
gmaxey gmaxey is offline Windows 7 32bit Office 2010 (Version 14.0)
Expert
 
Join Date: May 2010
Location: Brasstown, NC
Posts: 1,617
gmaxey is just really nicegmaxey is just really nicegmaxey is just really nicegmaxey is just really nicegmaxey is just really nice
Default

Use a modeless form:
Sub CallForm
Userform1.Show vbModeless
End Sub


and place the following code in the form activate event:

Private Sub UserForm_Activate()
Selection.Range.Select
Application.Activate
End Sub
__________________
Greg Maxey
Please visit my web site at http://www.gregmaxey.com/
Reply With Quote