|    | 
     初めまして。 
 
こちらにはお世話になっています。 
早速質問なのですが、配列を引数としてFunctionに渡す処理で、 
「配列には割り当てられません」のエラーとなります。 
 
おそらくday()のカッコ内に何か必要と思って、色々試したのですがうまくいきません。 
また、Varient型を使えばできるのかもしれませんが、 
あまり使わない方が良いというHPをいくつか見かけましたので、 
使わないやり方を教えて頂きたいです。 
済みませんが、よろしくお願いします。 
 
Public Sub  
 
  'Date型配列宣言 
  Dim day(3) As Date 
 
  '初期化 
  day(0)="2001/1/1" 
  day(1)="2001/1/1" 
  day(2)="2001/1/1" 
  day(3)="2001/1/1" 
 
  'Data型配列を引数として処理B呼び出し 
  Call 処理A(day) 
 
End Sub 
 
 
Public Sub 処理B(day() As Date) 
 
  For i = 0 To 3 
  'Data型配列を引数として処理C呼び出し 
    temp = 処理C(day())  ←ここで「配列には割り当てられません」のエラー 
  Next 
 
End Sub 
 
Function 処理C(day() As Date) As Date 
 
    色々な処理 
 
End Function 
 | 
     
    
   |