View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
Wombat[_2_] Wombat[_2_] is offline
external usenet poster
 
Posts: 1
Default PASSING an array to a sub in VBA

I want to pass an array to a subroutine: I tried some
variants such as
Call Output(K()) or
Call Output(K(*)) (used in some forms of HP BASIC),
but could not find one that worked. Any ideas anyone?

This is what I want to do
For t = 1 To NT 'put data in array
For w = 1 To NW
K(t, w) = t * w
Next w
Next t
Call Output_dat(Sheet1, K()) 'pass sheetname & array to sub
'this syntax is not accepted by VBA
End Sub
'
Sub Output_data(Sheet_name, K_temp())
'this sub would allow various versions of K to be output
to various sheets
For t = 1 To NT
For w = 1 To NW
Sheet_name.Cells(1 + w, 1 + t) = K_temp(t, w)
Next w
Next t
End Sub