Chuck-

What are you having trouble with? Did you create the clsMonthCal,
modCalendar, and modAddrOf modules in your project and copy the code into
them? You don't need the others, just those 3. There might be a better way
to get the modules into the project, but with access97, I couldn't find a
way.

I created a new project copied the modules in and added the necessary bits
of code and it works fine. Try it. I stripped it down to it's rawest form.
Once you understand that part, you can get the other bits to format it how
you want and everything.

'Get the 3 modules into the new file first.. however you can

Add a command button and a textbox

open the form code window and copy this in

--- code start --

Option Compare Database
Option Explicit
Private mc As clsMonthCal

Private Sub Command0_Click()

txtDate = ShowMonthCalendar(mc, Date, , , , True)

End Sub

Private Sub Form_Load()

Set mc = New clsMonthCal

End Sub

Private Sub Form_Unload(Cancel As Integer)
' This is required in case user Closes Form with the
' Calendar still open. It also handles when the
' user closes the application with the Calendar
' still open.
If Not mc Is Nothing Then
   If mc.IsCalendar Then
       Cancel = 1
       Exit Sub
   End If
Set mc = Nothing
End If
End Sub

-- End Code --

HTH

Matt

Thanks much Tony

BR
Myron