重命名变量(对象,函数,过程等)

时间:2018-06-01 20:40:43

标签: vba rename

据我所知,我必须重命名我的VBA代码中使用的变量"手动"在VBA编辑器中使用搜索/替换功能(至少如果我不使用V-Tools,Speed Ferret,Rubberduck等附加组件)。 "替换所有",这会很快,在某些情况下可能会给你带来不必要的结果。因此,您必须手动完成每个实例,并始终重新定位搜索功能跳转到的位置等。

所以我的问题是:还有另外一种耗时的方式吗?也许没有搜索和替换?或者也许有一个易于记忆的模式如何命名变量(对象,函数,过程等),因此您确定"替换所有"选项不会给你带来不必要的结果吗?

谢谢,干杯!

1 个答案:

答案 0 :(得分:1)

首先,请确保使用Option Explicit。当你这样做时,你可以在重命名时稍微小心 - 编译你的代码将确保你没有错过任何变量名。

第二 - 使用一个好的文本编辑器来替换并创建好的正则表达式来识别你的名字。表达式,确保您没有将该名称作为另一个名称的一部分。

评论后更新
这里有一个小片段可以帮助您导出(和/或直接在VBE中进行代码分析):

Sub AllCode()
    Dim Component As Object
    For Each Component In Application.VBE.ActiveVBProject.VBComponents
        With Component.CodeModule
            For i = 1 To .CountOfDeclarationLines
                Debug.Print .Lines(i, 1)
            Next i
            For i = .CountOfDeclarationLines + 1 To .CountOfLines
                Debug.Print .Lines(i, 1)
            Next i
        End With
    Next
End Sub