Compile errer: "Else without If" in second line

[trolleri]

I get the above error when an AfterUpdate-event is executing this code:

If Me.MedicalTreatmentType = 1 Then Me.MedicalTreatmentFrequence.Enabled = True & Me.MedicalTreatmentAntiarrhythmics.Enabled = False & Me.MedicalTreatmentOther.Enabled = False
ElseIf Me.MedicalTreatmentType = 2 Then Me.MedicalTreatmentFrequence.Enabled = False & Me.MedicalTreatmentAntiarrhythmics.Enabled = True & Me.MedicalTreatmentOther.Enabled = False
Else: Me.MedicalTreatmentFrequence.Enabled = False & Me.MedicalTreatmentAntiarrhythmics.Enabled = False & Me.MedicalTreatmentOther.Enabled = True
End If

The error is in the second line.
What am I doing wrong?

[orange]

I think your internal & (which is a concatenation symbol) is in error

Try (untested)

If Me.MedicalTreatmentType = 1 Then
    Me.MedicalTreatmentFrequence.Enabled = True _
    Me.MedicalTreatmentAntiarrhythmics.Enabled = False  
    Me.MedicalTreatmentOther.Enabled = False
ElseIf Me.MedicalTreatmentType = 2 Then 
    Me.MedicalTreatmentFrequence.Enabled = False _
    Me.MedicalTreatmentAntiarrhythmics.Enabled = True  
    Me.MedicalTreatmentOther.Enabled = False
Else
    Me.MedicalTreatmentFrequence.Enabled = False 
    Me.MedicalTreatmentAntiarrhythmics.Enabled = False 
    Me.MedicalTreatmentOther.Enabled = True
End If

[trolleri]

Hm, that simple - thanks