投稿日 | : 2003/08/27(Wed) 18:06 |
投稿者 | : 相川 |
URL | : |
タイトル | : Re^2: データ構造の配列を引数で渡す方法 |
返信ありがとうございます。
ソースを抜粋して載せてみました。
引数を受け取ろうとすると落ちるんですよ...
標準モジュール内-------------------------------------------------
定義
Private Type EntaiData
KCode As String
KanaName As String
dtSiharai As String
Entaikin As String
Zante As String
Misyuukin As String
OkRisoku As String
NgRisoku As String
Gankin As String
End Type
Private Prig_EntaiData() As EntaiData
受渡し
Cas_ExcelEdit0750(Prig_EntaiData(LoopCnt)) = False Then
------------------------------------------------------------------------------
違う標準モジュール内-------------------------------------------------
受け取り 部分
ここに遷移した瞬間落ちます。
Public Function Cas_ExcelEdit0750(ByRef Test() As EntaiData) As Boolean
------------------------------------------------------------------------------