Maybe you could use a worksheet_selectionchange event.

Option Explicit
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
With Target
If .Cells.Count 1 Then Exit Sub
If Intersect(.Cells, Me.Range("a:a")) Is Nothing Then
Exit Sub
Else
UserForm1.Show
End If
End With
End Sub

Or you could tie into a rightclick or doubleclick event.

You can read more about events at:
Chip Pearson's site:
http://www.cpearson.com/excel/events.htm

David McRitchie's site:
http://www.mvps.org/dmcritchie/excel/event.htm

Pasty wrote:

I have recently started teaching myself VBA and am still getting to grips
with it. I have created a calendar and its all working fine but how do I get
it to only pop up if they select a certain column or cell.

Regards

--

Dave Peterson