SIMAN错误与VBA

我将此代码用于Arena，这是罗克韦尔自动化公司的一个模拟软件。我试图获取从excel工作表读取一些数据的代码，并将其分配给进入vba模块的实体的属性。 当我运行模拟时，我得到以下SIMAN错误窗口：

“17035:EEVBA 实体：2

在以下块的时间0.0检测到运行时错误： *615$VBA:0，VBA:NEXT（2$）

事件编号0无效：必须为正。“

这个错误是什么意思？ 这是我的密码，有什么建议吗

Option Explicit
Public XL As Object
Public Wo As Integer
Public W_1 As Integer
Public NumContenedor As Integer

Public Sub ModelLogic_RunBeginSimulation()
    Dim m As Model
    Set m = ThisDocument.Model
    Dim FileToOpen As String
    Set XL = GetObject("", "Excel.Application")
    FileToOpen = "C:\Users\A\data.xlsx"
    XL.Workbooks.Open FileToOpen
End Sub

Public Sub VBA_Block_1_Fire()
    Dim s As SIMAN
    Set s = ThisDocument.Model.SIMAN
    NumContenedor = s.EntityAttribute(s.ActiveEntity, s.SymbolNumber("NumContenedor"))
    Wo = XL.Workbooks(1).Worksheets(1).Cells(NumContenedor, 4).value
    W_1 = XL.Workbooks(1).Worksheets(1).Cells(NumContenedor, 5).value
    s.EntityAttribute(s.ActiveEntity, s.SymbolNumber("deltaW")) = W_1 - Wo
End Sub

Public Sub ModelLogic_RunEnd()
    XL.Quit
End Sub

---

我的VBA块的cookie编号与过程名称VBA_block_1_Fire（）中的编号不匹配

---

duh

确保

numcontendor

不是0