UsedRange.Clear '配列を繰り返し処理する For N = 0 To UBound(MyArray) '配列の各要素と改行文字を文字列に配置する Temp = Temp & MyArray(N) & vbLf Next N '文字列をワークシートに配置 Range("A1") = Temp End Sub この例は、配列のすべての要素から一時的な文字列を作成する以外は、...