VBA userform fejlmelding på checkboxes

Hej..
Jeg er ny til VBA programmering, og sidder simpelthen fast ved en userform med chechboxes som giver mig fejlmeddelelsen:

Public Sub bon_Click()

Dim bi As Boolean
Dim bo As Boolean
Dim bu As Boolean

If bi.Checked = True Then
    bi = True
End If

If bo.Checked = True Then
    bo = True
End If

If bu.Checked = True Then
    bu = True
End If

if bi= true then msgbox("nico er nice")

' den sidste linje her er selvfølgelig bare for at få userformen til at fungere, før jeg begynder at forsøge på at få boolean variablerne skal henvise til en anden sub..
Hvilket leder mig til andet spørgsmål:
Når jeg skal have boolean variablen til at køre i en anden sub, (uden at den gemmes efter denne sub har kørt) hvordan henviser jeg så til denne? Er det bare at sub'en (som jeg har skrevet ovenfor) skal være public, bliver bo bi og bu variablerne så også public?