Write a VBA code to convert an arbitrary binary INTEGER number to equivalent dec

Question

Write a VBA code to convert an arbitrary binary INTEGER number to equivalent decimal number. Specific requirements: Use Input Box function to request the input for an arbitrary binary number: Convert the binary number to equivalent decimal integer number: Return the decimal number in a message box. Submit your Excel file via Moodle. Below functions may be useful in your VBA code if you input binary number as string: Cstr(): can convert a number in () to a string Len(): count the length of the string in () b Val(): can convert a string number in () to numerical number Mid(xxx, x, x): can pick up one or more characters from the string variable in () starting from the left end of the string.

Explanation / Answer

Sub CalculateAverage() Dim contents As String Dim cell As Range Dim NumbersArray() As String Set cell = ActiveCell.Select() contents = Range(cell).value NumbersArray = Split(contents, ",") Dim count As Integer Dim lengthOfArray As Integer Dim first As Integer Dim last As Integer first = LBound(NumbersArray) last = UBound(NumbersArray) lengthOfArray = last - first Dim total As Integer Dim value As Integer count = 0 While count

Related Questions

Navigate

• Browse (All)
• Browse W
• Subjects

---

---

Integrity-first tutoring: explanations and feedback only — we do not complete graded work. Learn more.