主题：[求助]请问这个菜单中不存在名为”功能区1“的功能区是什么原因造成的？

[求助]请问这个菜单中不存在名为”功能区1“的功能区是什么原因造成的？

Dim Val As String = RibbonTabs("功能区1").Groups("功能区1").Items("功能组1").Items("StringToFind").Text
Dim Index As Integer
With CurrentTable
    Index = .FindRow(.Cols(.ColSel).Name & " = '" & Val & "'", .Position + 1,True)
    If Index >= 0 Then
       .Position = Index
    End If
End With

这段是代码，有问题吗？

在系统菜单模式下是无法使用自己的菜单的