로그인

Select the product you need help with

HOWTO: Excel 워크시트 함수 같은 COM 추가 기능 함수 사용

기술 자료: 256624 - 이 문서가 적용되는 제품 보기.

기계 번역 고지 사항 보기

기계 번역된 문서와 영문 원본 문서 나란히 보기

모두 확대 | 모두 축소

요약

Microsoft Excel 2000 함수를 직접 사용하여 COM 추가 기능에서 워크시트의 셀 수식에서 호출할 수 없습니다. 그러나 함수를 간접적으로 호출할 수 있도록 COM 추가 기능 함수에 대한 VBA 래퍼 VBA 만들 수 있습니다. 이 문서에서는 이 기술을 자세한 정보를 제공하고 예제를 보여 줍니다.

위로 가기 | 피드백 보내기

추가 정보

개체 속성 중 사용자의 COM 추가 기능의 설정하여 공용 함수 중 COM 추가 기능의 의해 방식을 중 응용 프로그램의 Addins 컬렉션에 액세스할 수 있는 Microsoft Office 응용 프로그램에서 VBA 코드를 사용할 수 있습니다. 다음 단계를 보여 주는 방법:

한 COM 추가 기능에 사용할 추가 기능의 개체 속성을 설정하고 공용 함수 노출하는 Microsoft Excel에서 빌드하십시오.
있는 Excel 추가 기능을 COM 추가 기능의 있는 공용 함수를 호출하는 (xla) 빌드하십시오.
COM 추가 기능의 함수는 워크시트의 셀에 있는 수식에 간접적으로 호출하는.

해당 COM 추가 기능 만드는 단계

Visual Basic 6.0 에서는 새 AddIn 프로젝트를 시작하십시오.
Microsoft Office 9.0 및 Microsoft Excel 9.0 개체 라이브러리 참조를 추가하십시오.
프로젝트 탐색기양식 폴더를 열고 frmAddin 프로젝트에서 제거하십시오.
프로젝트 탐색기, 디자이너 폴더를 열고 추가 기능 디자이너 연결 두 번 클릭하십시오.
디자이너의 일반 탭에서 Microsoft Excel응용 프로그램 변경하고 시작 위해 초기 로드 동작 변경하십시오.
보기 메뉴에서 코드 를 클릭하십시오.

모든 연결 코드 모듈에 코드를 사용하여 다음 바꾸기:

Option Explicit

Private Sub AddinInstance_OnConnection(ByVal Application As Object, _
  ByVal ConnectMode As AddInDesignerObjects.ext_ConnectMode, _
  ByVal AddInInst As Object, custom() As Variant)
   On Error Resume Next
   ' Set the object property for the instance of the add-in
   AddInInst.object = Me
End Sub

' Add your own public function:
Public Function MyFunction(nNum1 As Double, _
       nNum2 As Integer, nNum3 As Double) As Double
  ' Some Custom Calculation
  MyFunction = (nNum1 * (nNum2 / 12) * nNum3) / 100
End Function

파일 메뉴에서 COM 추가 기능의 빌드 MyAddIn.dll 만들기 클릭하십시오.

이를 빌드할 때 COM 추가 기능의 사용할 수 있는 Microsoft Excel이 등록됩니다. 시작에 대한 초기 로드 동작 지정한 이후 Microsoft Excel을 시작할 때 COM 추가 기능의 자동으로 로드합니다. 다음 단계에서는 있는 Excel 추가 기능 (xla) 에서 COM 추가 기능의 MyFunction 함수에 대한 VBA 래퍼를 만드는 방법을 보여 줍니다.

Microsoft Excel 추가 기능 만드는 단계

Microsoft Excel에서 새 통합 문서를 시작하십시오.
VBA 편집기를 열려면 Alt + F11 키를 누릅니다.
프로젝트 탐색기VBAProject 새 통합 문서 (기본적으로 Book1) 마우스 오른쪽 단추로, 모듈 을 클릭한 다음 새 코드 모듈을 추가하려면 삽입 을 선택하십시오.

코드 모듈에 다음 VBA 함수는 붙여넣기:

Public Function MyFunctionWrapper(nNum1 As Double, _
       nNum2 As Integer, nNum3 As Double) As Double
   Dim oAdd As Object
   Set oAdd = Application.COMAddIns.Item("MyAddin.Connect").Object
   MyFunctionWrapper = oAdd.MyFunction(nNum1, nNum2, nNum3)
End Function

Excel에 반환할 VBA 편집기를 닫습니다.
[파일] 메뉴에서 [다른 이름으로 저장 을 선택하십시오. Microsoft Excel 추가 기능 (*.xla)파일 형식 드롭다운 선택하십시오. 파일 이름 을 wrap.xla 를 입력한 다음 저장 을 클릭하십시오.
통합 문서를 닫습니다.
도구 메뉴에서 추가 클릭하십시오. 해당 줄 바꿈 추가 기능 목록에서 선택한 다음 확인 을 클릭하십시오.
Microsoft Excel을 종료하십시오.

다음에 Microsoft Excel에서 COM 추가 기능의 및 모두 Excel 추가 기능 (Wrap.xla) 로드 시작합니다. 모든 셀에 입력한 다음 수식을 사용하여 COM 추가 기능에서 함수를 호출하는 및 255 값을 반환합니다:

=MyFuncWrapper(2000, 18, 7.5)

위로 가기 | 피드백 보내기

참조

238228

(http://support.microsoft.com/kb/238228/EN-US/ )

HOWTO: 있는 Office 2000 COM 추가 기능 Visual Basic의 빌드

Microsoft Office 통합 및 확장성에 대한 자세한 내용은 다음 Microsoft 웹 사이트에서 고객기술지원부 (PSS) 페이지를 참조하십시오.

http://support.microsoft.com/ofd

(http://support.microsoft.com/?scid=http%3a%2f%2fsupport.microsoft.com%2fofd)

위로 가기 | 피드백 보내기

속성

기술 자료: 256624 - 마지막 검토: 2005년 8월 23일 화요일 - 수정: 3.3

본 문서의 정보는 다음의 제품에 적용됩니다.

Microsoft Excel 2000 Standard Edition
Microsoft Visual Basic 5.0 Professional Edition
Microsoft Visual Basic 6.0 Professional Edition

kbmt kbautomation kbhowto KB256624 KbMtko

기계 번역된 문서

중요: 본 문서는 전문 번역가가 번역한 것이 아니라 Microsoft 기계 번역 소프트웨어로 번역한 것입니다. Microsoft는 번역가가 번역한 문서 및 기계 번역된 문서를 모두 제공하므로 Microsoft 기술 자료에 있는 모든 문서를 한글로 접할 수 있습니다. 그러나 기계 번역 문서가 항상 완벽한 것은 아닙니다. 따라서 기계 번역 문서에는 마치 외국인이 한국어로 말할 때 실수를 하는 것처럼 어휘, 구문 또는 문법에 오류가 있을 수 있습니다. Microsoft는 내용상의 오역 또는 Microsoft 고객이 이러한 오역을 사용함으로써 발생하는 부 정확성, 오류 또는 손해에 대해 책임을 지지 않습니다. Microsoft는 이러한 문제를 해결하기 위해 기계 번역 소프트웨어를 자주 업데이트하고 있습니다.

이 문서의 영문 버전 보기.

위로 가기 | 피드백 보내기