1. FAQ
  2. 엑셀(Excel)
  3. AfterEffects
  4. Premiere
  5. Photoshop
  6. ETC

이 게시판은 아별닷컴 회원만 질문을 올릴 수 있습니다. 회원에게 주어지는 특권인셈이지요. 회원이 아닌 분들은 열람만 가능합니다.

Excel에서 DLL Load

VBA 조회 수 1944 추천 수 0 2012.10.23 18:09:42

안녕하세요? 아별님

이틀내내 인터넷에 찾아보고 해도 문제를 풀지 못해 부탁 드립니다.

 

Excel에서 DLL을 실행시키기 위해 아래와 같은 아주 간단한 VC 2008로 MyDllAny.dll을 만들고 그 결과를 메세지창에 띄우려고 합니다.

그런데 계속 에러가 나서 염치 불구하고 어디가 잘못 되었는지 부탁드립니다.

이 사이트에 예제파일은 잘 작동이 되던데 제가 만든것은  DLL호출규정이 잘못되었다는 메세지가 나옵니다.

 

VB로 실행파일을 만들어 테스트하면 잘 되는데 Excel 파일에서 Load하면 안되는군요.

번거러우시겠지만 어디가 문제가 되는지 알려주시면 감사하겠습니다.

 

OS : Windows 7 64 Bit

Excel : Excel 2007 32 Bit

C Compiler : Visual C 2008 // DLL 파일 컴파일

 

VB : Visual Studio 2008 // 단지 Test용으로 실행파일 만든 용도며  실제 관련없음.

 

// C DLL 프로그램  내용

 

/* 직접 익스포트하기 */
extern "C" __declspec(dllexport) int AddInteger(int a, int b)
{
      return a+b;
}
//*/

//* 헤더 파일로 익스포트하기
#define DLLEXPORT
#include "MyDll.h"

extern "C" MYDLLTYPE int AddInteger(int a, int b)
{
     return a+b;
}
//*/

 

***** REM Excel module
#If Win64 Then
    Private Declare PtrSafe Function AddInteger Lib "D:\Test\MyDll64.dll" (ByVal a As integer, ByVal b As Integer) As IntPtr
#Else
    Public Declare Function AddInteger Lib "D:\Test\MyDllAny.dll" (ByVal A As Integer, ByVal B As Integer) As Integer
#End If

Sub ButtonClick()
    Dim A As Integer
    Dim B As Integer
    Dim Result As Integer
   
    Result = 100    
    Result = AddInteger(A, B)
    MsgBox Str(Result)    
End Sub

 

Visual Basic 부분

**** REM Visual Basic에서는 실행이 잘됩니다. 첨부파일 중 실행파일로 만든것

Public Class Form1
    REM Attribute VB_Name = "Module1"
    Declare Function AddInteger Lib "MyDllAny.dll" (ByVal A As Integer, ByVal B As Integer) As Integer

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim Result As Integer
        Result = AddInteger(3, 4)
        Me.Label1.Text = "3+4=" + Str(Result)
    End Sub
End Class


댓글 '2'

[레벨:1]와룡

2012.10.24 10:51:28
*.75.253.250

문제해결

1. Windows 7 64Bit Office 2010 64 Bit

 1). function return value 및 parameter가 integer로 되어 있는데 이것을 Long으로 바꿈(Excel에서).  //

#If Win64 Then
    Private Declare PtrSafe Function AddInteger Lib "D:/Test/MyDll32.dll" (ByVal a As Long, ByVal b As Long) As Long
#Else
    Private Declare Function AddInteger Lib "D:/Test/MyDll32.dll" (ByVal a As Long, ByVal b As Long) As Long
#End If

 

2. Windows 7 64Bit Office 2007 32 Bit

 1) C에서 DLL 파일을 만들때 def 파일을 이용해서 만들것

 Ex) MyDll32.def

LIBRARY "MyDll32"

EXPORTS

AddInteger @1

 

VC, VB로 만든 실행파일과 Excel2010으로서 동일한 dll 파일을 loading하는것은 전혀 문제가 없었으나 Excel 2007에서는 문제가 발생,

따라서 dll 파일을 만들때 함수 export부분을 구 방식으로 만들어야 합니다.

profile

[레벨:30]아별

2012.10.29 15:50:14
*.104.126.21

헐.. 해보진 않았지만.. 님 좀 짱이신듯..? ㅎㅎ

처음에 언뜻 보고서.. CAS(Code Access Security)문제가 아닐까했었는데..


저도 요즘 VSTO 개발을 공부하고 있기는 한데.. 배포가 가장 어려운것 같습니다.

자동 업데이트도 안되고.. 원클릭으로 MSI가 아닌 설치파일(.exe)로 만들어서 배포하는걸 해보고 싶은데..

쉽지 않네요.. +_+;;


VSTO 강좌 게시판 하나 만들어드릴까요? ^_^;;


문서 첨부 제한 : 0Byte/ 2.00MB
파일 제한 크기 : 2.00MB (허용 확장자 : *.*)
List of Articles
번호 제목 글쓴이 날짜 조회 수
공지 공지 [공지] 아별닷컴의 엑셀 질문방 폐쇄합니다. 카페 질문방 이용하세요.. imagefile [레벨:30]아별 2015-04-23 14999
520 피벗테이블 피벗 통합 문의 드려요~~ file [11] [레벨:1]예진 2012-10-27 1670
519 추가기능(AddIns) 아별툴 추가기능 실행시 에러 imagefile [1] [레벨:2]성현아방 2012-10-25 1499
518 SUMPRODUCT SUMPRODUCT file [2] [레벨:0]아민 2012-10-24 1203
» VBA Excel에서 DLL Load file [2] [레벨:1]와룡 2012-10-23 1944
516 엑셀수식 중복된 행을 묶으면서 값은 합치는 내용 file [1] [레벨:1]여엉 2012-10-19 3008
515 VBA 셀병합 효과 file [2] [레벨:4]고수가되고파 2012-10-19 1297
514 VBA 특정폴더 내 숨기지 않은 파일 모두 열기 [2] [레벨:4]고수가되고파 2012-10-18 2252
513 VBA 인위적 계산 셀 찾기 file [2] [레벨:4]고수가되고파 2012-10-18 1818
512 VBA 사용자 정의 폼 관련 file [2] [레벨:4]고수가되고파 2012-10-16 1551
511 VBA 셀 병합 관련 file [2] [레벨:4]고수가되고파 2012-10-11 1335
510 셀서식(표시형식) 아별님 복사관련해서 문의 사항이 있습니다 [7] [레벨:3]월전천넘 2012-10-10 1134
509 VBA vba 메세지 창 제어 file [4] [레벨:4]고수가되고파 2012-10-10 1304
508 VBA vba 행 삽입 file [2] [레벨:4]고수가되고파 2012-10-10 2125
507 엑셀일반 아별님! 컨트롤 서식 조언 부탁합니다 file [1] [레벨:2]북곰 2012-10-08 1043
506 VBA 액셀 아르바이트 좀 해주세요 [2] [레벨:1]구삼이 2012-10-08 1112
505 엑셀수식 추석은 잘 지내셨는지요 file [1] [레벨:0]아민 2012-10-03 797
504 VBA 파일&폴더 엑셀파일명으로 검색하여 링크걸기 file [1] [레벨:2]광택입니다 2012-09-29 2815
503 엑셀일반 안녕하세요 아별님~ [1] [레벨:4]나카타 2012-09-27 871
502 날짜/시간 수식 답변 너무 감사하구요 재문의 드립니다. file [5] [레벨:0]아민 2012-09-27 947
501 VBA 개체와 컬렉션 [2] [레벨:4]고수가되고파 2012-09-26 998