0

我需要从文本文件中读取数据并将读取的数据保存到 Excel 中。

文本文件包含 111111111122222222223333333333Taaaaaaaassssssss。所以在这里我已经阅读了前 10 个字符并将它们保存到 Excel 中的一列中,以此类推,用于文本文件中的整个 1 行。

尝试在 QTP 中执行此操作,请求您对此提供帮助。

4

1 回答 1

0

您可以使用的策略:

  1. 通过自动化将 COM 实例创建到 Excel 文件。用于CreateObject("Excel.Application")在 QTP 中实现。将第一个单元格设为 ActiveCell

  2. 打开文本文件并执行 a.readall以将结果存储在字符串中

  3. 对所有行执行for each line in split(readAllString, vbNewLine)to 循环

  4. 在 For 循环的主体中:

    • line循环like:的长度for characterPosition = 1 to len(line) step 10,并在此循环内:
      • 做 amid(line, characterPosition, 10)得到一组 10 个字符
      • 将结果写入 ActiveCell 并将 ActiveCell 移动一列
    • 将 ActiveCell 移动到第一列和下一行
  5. 清理,关闭excel文件等。

第 1 步和第 2 步可以很容易地在 Internet 上查找,其他步骤是非常简单的 VBScript 功能。试一试,当您遇到问题时,将它们添加到您的帖子中,我们会看看在哪里可以解决它。

于 2012-08-10T08:10:34.573 回答