08/01/16 14:21:54
>>389
Dim i, j As Integer
Dim AKey(30), AValue(30), BKey(100), BValue(100)
For i = 0 To 29
For j = 0 To 99
if AKey(i) = BKey(j) Then AValue(i) = BValue(j)
Next j
Next i
こういう事かな？
この程度の個数ならワークシートでやってもほぼ一瞬だと思うけど。
08/01/16 14:21:54
>>389
Dim i, j As Integer
Dim AKey(30), AValue(30), BKey(100), BValue(100)
For i = 0 To 29
For j = 0 To 99
if AKey(i) = BKey(j) Then AValue(i) = BValue(j)
Next j
Next i
こういう事かな？
この程度の個数ならワークシートでやってもほぼ一瞬だと思うけど。