_ExcelTips_的其他问题中的其他一些技巧讨论了如何从宏内打开,读取,编写,附加和关闭文本文件。

与顺序文本文件关联的另一个命令是“查找”命令。如果在打开的文件上使用,则Seek将内部文件指针定位在文件中的特定字符编号上。以下代码片段是如何使用它的示例:

Open "DOSTEXT.DAT" for Input as #1 iFileLen = LOF(1)

Seek 1, iFileLen / 2

这些程序行使用LOF函数来确定文件的长度。然后,最后一行将内部文件指针定位在文件中间。随后所有对该文件的读取或写入都将从该位置开始。

您也可以使用Seek作为确定文本文件中当前位置的功能。这是这段代码的作用:

iCurPos = Seek(1)

该命令将内部文件指针保留在原处,但将iCurPos设置为一个值,该值表示指针在文件中有多少个字符。 iCurPos值是随后所有对该文件进行读写的位置。

注意:

如果您想知道如何使用此页面(或_ExcelTips_网站上的任何其他页面)中描述的宏,我准备了一个特殊页面,其中包含有用的信息。

_ExcelTips_是您进行经济高效的Microsoft Excel培训的来源。

本技巧(9367)适用于Microsoft Excel 2007、2010、2013、2016、2019和Office 365中的Excel。您可以在此处为Excel的较早菜单界面找到此技巧的版本: