Besoin d'aide Booléen / Binaire !

Bonjour,

J'ai trouvé un programme permettant de convertir un décimal en binaire. Ce programme doit retourner vrai si la conversion est possible (si le nombre de bits est suffisant) et faux sinon. Voici le programme :

Function decToBin(ByVal n As Long, ByVal nbB As Long) As Boolean
Dim i As Long, nb As Long, a As Integer
nb = n

For i = nbB To 1 Step -1
Cells(1, i).Value = nb Mod 2
nb = nb \ 2
Next i

decToBin = nb = 0

End Function

EDIT: Ajout de la coloration syntaxique.

Ce que je ne comprends pas, c'est cette ligne decToBin = nb = 0
Si quelqu'un pouvait m'expliquer ce serait vraiment sympa ! :)

Merci :)