AutoCAD VB :: Layer Creation Code Not Working In 2013 VBA

I have been using a dialog box with checkboxes for creating layers for the past 5 years now with minimal problems.  I don't know much about VBA code, but when there is a problem, I can usually figure out what is going on, which is generally a typo the causes it to error.  The code was created by an employee that left the company about 3 months after I started.

After installing acad 2013 and the VBA enabler this code only partially works.  It will create the layer in the drawings, but will not set the color, linetype or the description.  When I click on the checkbox for any of the layer checkboxes I get a "Run-time error '13':  Type mismatch" error.  I click on the "Debug" button which opens VBA, the "This Drawing.Layers.Add" line in the below code is highlighted.

As a troubleshooting effort, I tried retyping the ".Color" line, when I had typed out "m_refg_pipe_n." a drop-down box appears, but "Color" is not an option anymore.  The only color option in the list is TrueColor, which we do not use.  In the next line of the below code, "Description" is an option.  So I am guessing that the ".Color" line of code is the problem.

Private Sub CheckBox101_Click()
Dim m_refg_pipe_n As AcadLayer
Set m_refg_pipe_n = ThisDrawing.Layers.Add("m-refg-pipe-n")
m_refg_pipe_n.Color = acGreen
m_refg_pipe_n.Linetype = "Hidden"
m_refg_pipe_n.Description = "MN - Refrigerant Piping"
End Sub