Excel在我们的日常办公中,用到非常多。因此,对于它的脚本VBA的使用,难免也比较频繁。在此总结、整理下之前写过的一段VBA读取MAP文件,统计ECU存储空间使用情况的部分代码。
该段程序,先使用Collection集合类装载读取的数据,最后统一写入将数据按照期望的格式,写入Excle表格中。这样一次性读取、写入,可以避免多次在读MAP文件和写Excel文件之间切换,增加系统资源开销。
Open ThisWorkbook.Path & "\XXX.MAP" For Input As #1
lineNum = 0
FundStrtLineNum = 0
bFoundStart = False
'读取TXT文件
Do While Not EOF(1)
lineNum = lineNum + 1
Line Input #1, txt
If txt = "Memory map:" Then
FundStrtLineNum = lineNum
bFoundStart = True
End If
If bFoundStart Then
If lineNum &g