从另一个子编译错误调用 sub

Question

我的主要子名为DXF()，由我的 excel 工作表中的按钮调用。 DXF()称另一个名叫reorganisation(FirstLine, LastLine)的子。现在我想reorganisation叫另一个名叫sens(LastLine)的子。 我在reorganisation(FirstLine, LastLine)年是这样做的：

Sub reorganisation(FirstLine, LastLine)
[...]
Dim iLine As Integer, Ligne As Integer
With ActiveSheet
Set Temp = Range(.Cells(1000, 1000), .Cells(1000, 1013))
For iLine = FirstLine To LastLine
    [...]
    Ligne = iLine + 1
            Do While Ligne <= LastLine      ''' Organisation par des segments suivant le point de base
                [...]
            Loop
    sens iLine            '''' The error is here
Next iLine
End With
End Sub

在这个潜艇中一切都运行良好，除了我称之为sens.

这是子sens.

Sub sens(LastLine)
Dim iLine, Ligne As Integer
With ActiveSheet
    For iLine = 3 To LastLine
        [...]
    Next iLine
End With
End Sub

所以这给了我错误"编译错误：需要子、函数或属性"。我真的不知道为什么会这样，因为没有变量类型问题，一切都是整数，所以......如果有人能提前知道问题出在哪里，谢谢！

Answer 1

这实际上是一个非常简单的错误。我有一个很久以前创建的变量(所以我忘记了它(，它的命名方式与我的 sub 相同。谢谢大家。

Answer 2

使Sub sens(LastLine)成为公共Sub。因此，它将从工作表中可见。喜欢这个：

Public Sub sens(LastLine)

作为模块化现场访问修改器，暗淡、全局、公共和私有之间有什么区别？

---

这是一个简单的代码：

Public Sub Reorganisation()    
    Dim iLine As Long
    iLine = 5
    Sens iLine        
End Sub
Public Sub Sens(LastLine As Long)    
    MsgBox "It works"        
End Sub