1

我有我想在 VBA 中写入文件的三维数据。数据将具有时间轴、空间轴和幅度轴。因此，幅度数据将采用 A（空间，时间）的形式。有谁知道如何将其“写入”到 vba 代码中的文本文件中？我不确定如何用两个索引循环“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 回答