대부분의 Excel 워크 시트 함수는 WorksheetFunction 개체를 사용하여 VBA에서 액세스 할 수 있습니다. 그러나 일부 기능은 사용할 수없는 것처럼 보일 수 있습니다. 이러한 함수 중 하나는 이진 값을 10 진수 값으로 변환하는 BIN2DEC입니다. 사용할 수없는 이유는 BIN2DEC가 실제로 Excel 워크 시트 함수가 아니기 때문이며 분석 도구 추가 기능의 일부입니다.

이 경우 두 가지 옵션이 있습니다. Analysis ToolPak에 해당하는 VBA를로드하거나 VBA에서 고유 한 BIN2DEC 함수를 만들 수 있습니다. 먼저 Excel에서 분석 도구 — VBA 추가 기능을 설치해야합니다. 사용 가능한 추가 기능에 나열되지 않은 경우 Windows를 사용하여 ATPVBAEN.XLA 파일을 검색합니다. (영어 이외의 언어 버전의 Excel을 사용하는 경우 파일의 “EN”

부분이 다릅니다.) 이것은 활성화하려는 실제 추가 기능입니다.

추가 기능을 활성화했으면 VBA 편집기를 표시하고 도구 | 참조 대화 상자를 표시하기위한 참조. atpvbaen.xla 참조가 선택되어 있는지 확인하십시오. 대화 상자를 닫은 다음 다른 워크 시트 함수처럼 BIN2DEC를 사용할 수 있습니다.

다른 옵션은 자신 만의 BIN2DEC 함수를 만드는 것입니다. 다음은 이진수를 포함하는 문자열을 받아들이고 해당 문자열의 10 진수 값을 나타내는 숫자 값을 반환하는 함수의 예입니다.

Function Bin2Dec(sMyBin As String) As Long     Dim x As Integer     Dim iLen As Integer

iLen = Len(sMyBin) - 1     For x = 0 To iLen         Bin2Dec = Bin2Dec + _           Mid(sMyBin, iLen - x + 1, 1) * 2 ^ x     Next End Function

이 함수는 실제로 BIN2DEC 워크 시트 함수와 동일한 제한이 없습니다. 10 자리 이상의 이진수로 작동합니다.

_ 참고 : _

이 페이지 (또는 ExcelTips 사이트의 다른 페이지)에 설명 된 매크로를 사용하는 방법을 알고 싶으면 유용한 정보가 포함 된 특별 페이지를 준비했습니다.

link : / excelribbon-ExcelTipsMacros [새 브라우저 탭에서 특별 페이지를 열려면 여기를 클릭하세요].

_ExcelTips_는 비용 효율적인 Microsoft Excel 교육을위한 소스입니다.

이 팁 (3063)은 Microsoft Excel 97, 2000, 2002 및 2003에 적용됩니다.