1

VBA でファイルに書き込みたい 3 次元データがあります。データには、時間軸、空間軸、マグニチュード軸があります。したがって、マグニチュード データは A(空間、時間) の形式になります。それをvbaコードのテキストファイルに「書き込む」方法を知っている人はいますか? 2 つのインデックスを使用して "Write #1" をループする方法がわかりません。助けてくれてありがとう！

私が期待している出力は次のとおりです。

         space1  space2  space3
time1    A(1,1)  A(1,2)  A(1,3)
time2    A(2,1)  A(2,2)  A(2,3)
time3    A(3,1)  A(3,2)  A(3,3)
4

1 に答える 1

0

私ならScripting Runtime図書館を利用します。単純なタブ区切りファイルを作成できます。Scripting必要に応じて、VBE エディターでライブラリを直接参照できます: [ツール] -> [参照] -> [Microsoft Scripting Runtime]

以下は、テストされていないコードの一部です。

Dim fso As FileSystemObject
Dim oFile As TextStream
Dim iTime As Integer, iSpace As Integer

Set oFile = fso.CreateTextFile(stringPath)

For iTime = 1 To UBound(A)
    For iSpace = 1 To UBound(A, 2)
        oFile.WriteLine (iTime & vbTab & iSpace & vbTab & A(iTime, iSpace))
    Next iSpace
Next iTime

oFile.Close
Set oFile = Nothing

ライブラリへのレイト バインド参照については、次を参照してください: VBA を使用して txt ファイルを作成して書き込む方法

于 2012-11-13T03:34:33.247 に答える