ExcelBanter - display a user form

Your Original Code Works! Thank You!

"WBTKbeezy" wrote:

That didnm't do any thing....

I have this code to use with the calendar control that pops up the calendar
when cell a1 is selected, but i can't edit it for my sure from (which is
named SqFt)

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Cells.Count 1 Then Exit Sub
If Not Application.Intersect(Range("A1"), Target) Is Nothing Then
Calendar1.Visible = True
' select Today's date in the Calendar
Calendar1.Value = Date
ElseIf Calendar1.Visible Then Calendar1.Visible = False
End If
End Sub

"Jim Thomlinson" wrote:

Place this code in the sheet where you want to initaite the user form
from...You may need to change the name of the form depending what your form
is named...

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Address = "$A$2" Then UserForm1.Show
End Sub
--
HTH...

Jim Thomlinson

"WBTKbeezy" wrote:

I have created a user form in Excel, but I do not know an easy way to display
it. Ideally I would like it to just pop up when someone clicks in cell A2.
Any thoughts?