- Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2)
---- [求助]打开窗口，报错 (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=131552)
-- 发布时间：2019/3/1 9:21:00
-- [求助]打开窗口，报错
打开窗口，报错原因？怎么处理？
此主题相关图片如下：打开窗口，报错原因？怎么处理？.jpg
-- 发布时间：2019/3/1 9:26:00
--
贴出你afterLoad事件的代码
-- 发布时间：2019/3/1 10:28:00
--
先按照灾难恢复的处理方法：首先按住Ctrl键，然后打开出现错误的项目文件，直到项目文件被完全打开，再松开Ctrl键即可。
如果打开的过程中出现了登录窗口，先松开Ctrl键，选择以开发者身份登录，输入密码，然后重新按住Ctrl键，单击登录窗口的确定按钮，直到项目文件被完全打开，再松开Ctrl键。
再按有点钱说的做
-- 发布时间：2019/3/1 14:35:00
-- 回复：（有点甜）贴出你afterLoad事件的代码
窗口afterload代码如下：
Tables("左侧导航窗口_Table1").ExtendLastCol = True
Dim r As Row = Tables("室内设计项目").Current
Tables("左侧导航窗口_Table1").Filter = "[项目编号] = \'" & r("项目编号") & "\'"
\'行高自动调节
Tables("左侧导航窗口_Table1").AutoSizeRows()
\'隐藏或禁用当前用户无权使用的按钮
If _UserGroup <> "项目管理办公室" Then
e.Form.Controls("有空").Visible = False
e.Form.Controls("没空").Visible = False
e.Form.Controls("下个任务").Visible = False
End If
Tables("左侧导航窗口_Table1").Sort = "日期 DESC,创建时间 DESC,创建者"
Tables("左侧导航窗口_Table1").Position = 0
Tables("左侧导航窗口_Table1").Select(0,0)
好像也是这个问题报错如下：
此主题相关图片如下：31.jpg
[此贴子已经被作者于2019/3/1 14:36:30编辑过]
-- 发布时间：2019/3/1 15:09:00
--
Tables("左侧导航窗口_Table1").Select(0,0)
改成
Tables("表A").Select(-1,0)