配列

バブルソート隣同士の値を比較、必要があれば入れ替えを繰り返して整列するSub zsBubbleSort1(ByRef dataAry() As Variant) Dim temp As Variant Dim i As Long, j As...

Sub 配列test() Dim i As Long, j As Long Dim arr1 As Variant Dim arr2 As Variant Dim arrAll(2) As Variant arr1 = Range("A1:...

Function zf配列を戻り値(ByVal dataStr As String) As Variant() Dim returnArr() As Variant Select Case dataStr Case "あ" returnAr...

'*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-'★2次元配列の1次元目の要素数を増やす'*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-Pu...