Compile Error: Procedure too large

While attempting to run a macro I am receiving the following error message:
Compile Error: Procedure too large. Apparently the code for a procedure can't exceed 64K. The code that has been written is currently 99K. Is there a way around this? I don't think it is possible for me to break this into 2 different codes.

Cheers,

C

The code is running based on answers from Sheet1. I can't split it into multiple code because it is assigned to 1 push button. Is there a way to assign multiple macros to one push button?

Hi,

I'm basically new with Excel Vba and Userforms and I have a problem too with compile error because the procedure is too large. I have basically 9 checkboxes and it will display on a textbox together with other inputs. This is basically the code:

If GHR And Not MIDAS And Not CRM And Not CON And Not Henk And Not HAD And Not IOM And Not MYJOB And Not LEARN Then
ws.Cells(newRow, 4).Value = "GHR - P07"
GHR.Value = False
MIDAS.Value = False
CRM.Value = False
CON.Value = False
Henkel.Value = False
HAD.Value = False
IOM.Value = False
MYJOB.Value = False
LEARN.Value = False
ElseIf MIDAS And Not GHR And Not CRM And Not CON And Not Henkel And Not IOM And Not MYJOB And Not HAD And Not LEARN Then
ws.Cells(newRow, 4).Value = "MIDAS - P26"
GHR.Value = False
MIDAS.Value = False
CRM.Value = False
CON.Value = False
Henkel.Value = False
HAD.Value = False
IOM.Value = False
MYJOB.Value = False
LEARN.Value = False
ElseIf CRM And Not GHR And Not MIDAS And Not CON And Not Henkel And Not HAD And Not IOM And Not MYJOB And Not LEARN Then
ws.Cells(newRow, 4).Value = "CRM - P39"
GHR.Value = False
MIDAS.Value = False
CRM.Value = False
CON.Value = False
Henkel.Value = False
HAD.Value = False
IOM.Value = False
MYJOB.Value = False
LEARN.Value = False
ElseIf CON And Not GHR And Not MIDAS And Not CRM And Not Henkel And Not HAD And Not IOM And Not MYJOB And Not LEARN Then
ws.Cells(newRow, 4).Value = "CON - C07"
GHR.Value = False
MIDAS.Value = False
CRM.Value = False
CON.Value = False
Henkel.Value = False
HAD.Value = False
IOM.Value = False
MYJOB.Value = False
LEARN.Value = False

and so on until all possible combinations on the below checkboxes are satisfied:

sample_checkbox.jpg

My question is, can my code be coded to a more simpler code to avoid the "procedure too large" error? Thanks guys in advance!

Andy