0

我使用 LOOP 发送了两次请求,在输出中我得到了一个唯一的值。我想将这些唯一值存储在 Excel 工作表列中,以便进一步参数化所有值。

我已成功将值保存到 TEXT 文件中。但我需要将它们存储在 EXCEL 文件中的单独行(在一列中)中,这是我无法做到的。

4

1 回答 1

0

直接,我不知道。但你总是可以作弊。例如,EXCEL 有一种称为 .CSV 的辅助格式,它是普通的 test...with ";" 作为分隔符。

因此,使用以下结构编写您的“output.csv”文件:

Name;Income;Status
Martin;25000;OK
Johnson;32500;KO

它应该可以在 EXCEL 中直接打开。作为 CSV。进入 EXCEL 后,将其另存为 XLS 或 XLSX,您就完成了,您将获得一个完全可用的 EXCEL 文件。

如果您需要某种自动化来将此 .csv 转换为 .xlsx,这是我快速制作的示例宏,但适用于 EXCEL 2013:

Sub ConvertFile()
    On Error Resume Next
    Kill "C:\MyPath\output.xlsx"
    On Error GoTo 0
    Workbooks.Open Filename:= _
        "C:\MyPath\output.csv"
    ActiveWorkbook.SaveAs Filename:= _
        "C:\MyPath\output.xlsx", FileFormat:= _
        xlOpenXMLWorkbook, CreateBackup:=False
    ActiveWindow.Close
End Sub

注意:这是一个 EXCEL 宏,不是 vbscript。

于 2015-12-06T09:17:55.173 回答