Question

我有一个巨大的文本文件，其中许多数字被分成不同的部分，我想只提取某些值。它是这样的

step 1
787268 4.29430E-01
787269 4.05248E-01
787270 3.99742E-01
787271 3.99136E-01
787272 3.98422E-01
787273 3.97019E-01
787274 3.95237E-01
step 2
787268 4.29430E-01
787269 4.05248E-01
787270 3.99742E-01
787271 3.99136E-01
787272 3.98422E-01
787273 3.97019E-01
787274 3.95237E-01

我想只将第2步中的两列复制到我的Excel文件中。所以我需要一个VBA代码，允许我搜索一个特定的字符串，然后发现它复制并粘贴所有的原始字符串直到下一步。

任何代码？

由于斯特凡诺

Answer 1

您可以使用此website来帮助您找到所需内容，只需简单的Google搜索即可。

我建议使用if found部分找到你需要复制的地方。

实施例

If (Range("A1").Value = "YOUR TEXT HERE") Then
    '''' COPY OVER DATA
End If

使用VBA从excel读取格式化的文本文件

1 个答案: