Jeg kan ikke finde en levende vba gruppe, så jeg håber at én her kan 
 kommentere, hvorfor jeg ikke kan passere arrays (som paramarray) mellem 
 procedurer. Det har jeg da ellers gjort en del gange før ...?
 
 Carsten
 
 '''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
 Option Explicit
 Private dbArray()
 
 Sub SkrivFilTest()
     ReDim dbArray( 29 ) As Variant
     Dim i As Integer
         For i  =  0 To 29
             Randomize
                 dbArray( i )  =  Rnd * 10000
             'MsgBox dbArray(i)  ... arrayet bliver fyldt op!
         Next i
     SkrivFil "Karlo", "D:\Sharp\Proj10", dbArray()
 End Sub
 
 ..................
 
 
 Sub SkrivFil( FilForNavn As String ,  Adresse As String ,  ParamArray 
 PArray() As Variant )
 
 Dim dbl As Double
 Dim num, ant As Integer
     num = FreeFile
     ant = UBound( PArray )
 
                                     ........................... ant viser = 
 0     .... ?  Jeg har prøvet alle måder at passere et array mellem 
 SkrivFilTest og SkrivFil, men det vil ikke! Kan det passe? UBound( PArray, 
 1 ) er det samme  ......................
 
 
 ..
 ..
 ..
 end sub
 
 
  
            
             |