Sub TestIfTrue() Dim blnIsTrue As Boolean blnIsTrue = True If blnIsTrue = True Then MsgBox "True" End If End Sub