Option Explicit Dim aryAll Dim aryString Dim aryInt Dim aryMix Dim ary Dim val aryString = Array( "acha" , "porute" , "piipo" ) aryInt = Array( 0 , 42 , 666 ) aryMix = Array( "boo" , 999 , "foo" , 000 , "woo" ) aryAll = Array( aryString , aryInt , aryMix ) For Each ary In aryAll For Each val In ary WScript.Echo val Next Next ' acha ' purute ' piipo ' 0 ' 42 ' 666 ' boo ' 999 ' foo ' 000 ' woo