optionbutton error 91

Hej, jeg kan simpelthen ikke se hvad der er galt:


Option Explicit
Public Sub determine_indication_lst()

'Purpose
    'To determine the value picked in the option buttons
    'to be able to make a dynamic drop down box
   
    Dim opt_hans As OptionButton
    Dim opt_bent As OptionButton
    Dim opt_per As OptionButton
    Dim opt_inge As OptionButton
   
    If opt_hans = True Then
    Range("code_lst").Value = "h"
   
    ElseIf opt_per = True Then
    Range("code_lst").Value = "p"
   
    ElseIf opt_bent = True Then
    Range("code_lst").Value = "b"
   
    ElseIf opt_inge = True Then
    Range("code_lst").Value = "i"

    End If

End Sub