小编Can*_*biz的帖子

我正在研究一个别人写的宏,我很困惑,因为他们没有定义变量,但仍在使用它.1)这是可能的吗？2)excel/vba如何知道变量应该是什么？使用的变量是"theCell",并且在任何地方都没有定义.代码如下,谢谢:

Sub DoTheWork()

Sheets("All Data").Activate

ActiveSheet.Range("A2").Select
ActiveSheet.Range(Selection, Selection.End(xlDown)).Select

Set homebook = ActiveWorkbook
Set homeSheet = Sheets("All Data")
topRow = 2

Application.ScreenUpdating = False
'Application.ScreenUpdating = True

For Each theCell In Selection
    If (theCell.Value <> theCell.Offset(1, 0).Value) Then
        Range("A" & topRow & ":AS" & theCell.Row).Select
        Sheets("e-TAR").Select
        ActiveSheet.Copy
        Set copySheet = ActiveSheet
        Set copyBook = ActiveWorkbook

谢谢!