2

我有一个程序可以打开许多 Excel 工作簿并将所有这些工作簿中的数据合并到目标工作簿中。合并后,它对数据进行一些转换(使用自定义逻辑将列转置为行),然后使用查找数据添加更多列。

我有以下代码

Sub consolidateFiles()
    On Error GoTO ErrorHandler

    processFiles
    transform
    addLookupData

    Exit Sub
    ErrorHandler:
    Debug.Print Err.Number & " = " & Err.Description & ", Source = " & Err.Source 
End Sub

Sub processFiles()
 'Here I open all the files in the directory and copy and paste into the target workbook. 
 'If there is an error here, I would like to know the file that caused the error 
 'and I would like to proceed to the next file after logging the error
End Sub

Sub transform()
 'Here I transform some of the data from column to year.
End Sub

Sub addLookupData()
 'Here I add some new columns by looking up the data in another sheet in the target  workbook. Here the lookups can return error
End Sub

我想知道在我的代码中添加错误处理的良好编程实践是什么。现在,我有一个全局错误处理程序,它记录错误并继续执行程序。为我从主过程调用的 3 个子过程中的每一个添加错误处理是否是个好主意?

我阅读了有关使用未记录的 ERL 来获取错误行的信息。我们如何在 VBA 编辑器中添加行号?

这是我在 VBA 中的第一个程序。我做过很多 Java 编程,但是错误处理范式非常不同。因此,我想向有经验的 VBA 程序员学习我可以遵循的良好实践。

我已经阅读了这篇优秀的文章,该文章链接到与 SO 中的 VBA 错误处理相关的问题之一:

http://www.cpearson.com/excel/errorhandling.htm

4

1 回答 1

1

由于我没有得到任何答案,因此我试图进行更多研究。以下是一些我发现有用的文章:

http://www.techrepublic.com/blog/five-apps/five-tips-for-handling-errors-in-vba/339

http://www.jpsoftwaretech.com/vba-tips-tricks-and-best-practices-part-four/

http://www.fmsinc.com/tpapers/vbacode/debug.asp#BasicErrorHandling

此外,我发现在每个过程中遵循 SingleExitPoint(有错误或没有错误)是一种很好的做法。

Siddharth 提供的链接中说明/暗示了许多想法。但在我阅读这些文章之前,它们对我来说并不是很清楚。

于 2012-10-04T13:41:59.997 回答