HEX bestaat, OCT bestaat maar ik wil graag BIN hebben

[sylvester-ponte]

hallo

HEX bestaat, OCT bestaat maar ik wil graag BIN hebben
dus een functie die een string terug geeft met alleen enen en nullen

groet sylvester

 

[vanschagen]

berkenen ,heb je hier wat aan? http://www.xs4all.nl/~erikl/baseconv.html

 

[Thoralf]

Via Analysis Toolpak heb je de beschikking over de functie DEC.N.BIN

 

[sylvester-ponte]

hallo Thoralf de functie DEC.N.BIN gaat maar tot 511 (1111111111)

Bertus ik zoek een mooie exel functie

anders moet ik zelf een function maken

 

[Warme bakkertje]

Test deze eens

Function DecToBin(ByVal DecimalIn As Variant, Optional NumberOfBits As Variant = 0) As Variant
  If DecimalIn < 0 Then
    '  Negative values cannot be converted
   DecToBin = CVErr(xlErrValue)
    Exit Function
  Else
    DecimalIn = Int(CDec(DecimalIn))
    Do While DecimalIn <> 0
      DecToBin = Trim$(Str$(DecimalIn - 2 * Int(DecimalIn / 2))) & DecToBin
      DecimalIn = Int(DecimalIn / 2)
    Loop
    If NumberOfBits > 0 Then
      If Len(DecToBin) > NumberOfBits Then
        '  Calculated value exceeds specified bit size
       DecToBin = CVErr(xlErrValue)
      Else
        DecToBin = Right$(String$(NumberOfBits, "0") & DecToBin, NumberOfBits)
      End If
    End If
  End If
End Function

 

[sylvester-ponte]

Warme bakkertje perfect
die Function DecToBin:thumb:

ik kan hem gelijk gebruiken

groet sylvester