av8tordude
07-28-2010, 10:34 AM
I created a form that has a few merged cells. The merged cells are used to enter a date. I'm using the code below to call the calendar...
If Not (Nothing Is Application.Intersect(Target, Range("M12,Q18,J20,Q22,P33,L39,P55"))) Then
Cancel = True
frmCalendar.show
End If
The range of cells in the code each have 3 cells merged (i.e. M12=(M12:O12)). I need to unmerge the cell, enter the date in one cell only, then merged the cell again without getting any messages.
can someone assist.
If Not (Nothing Is Application.Intersect(Target, Range("M12,Q18,J20,Q22,P33,L39,P55"))) Then
Cancel = True
frmCalendar.show
End If
The range of cells in the code each have 3 cells merged (i.e. M12=(M12:O12)). I need to unmerge the cell, enter the date in one cell only, then merged the cell again without getting any messages.
can someone assist.