以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]请问这个菜单中不存在名为”功能区1“的功能区是什么原因造成的?  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=165240)

--  作者:gihilli
--  发布时间:2021/5/11 16:07:00
--  [求助]请问这个菜单中不存在名为”功能区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


这段是代码,有问题吗?

--  作者:有点蓝
--  发布时间:2021/5/11 16:22:00
--  
使用这个代码的时候先切换回自定义菜单:http://www.foxtable.com/webhelp/topics/1466.htm

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