以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  传统编辑方式  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=14573)

--  作者:姗姗来迟
--  发布时间:2011/11/24 10:41:00
--  传统编辑方式

条件:一个表里面有10列

        分成二个窗口每个窗口里面各分担5列的录入  窗口1  窗口2

        建立二个传统编辑方式录入窗口  传统编辑方式录入窗口1  传统编辑方式录入窗口2

问题:当打开窗口1时双击单元格会弹出传统编辑方式录入窗口1对前5列进行录入

        当打开窗口2时双击单元格会弹出传统编辑方式录入窗口2对后5列进行录入

 

 

 

    这是双击单元格代码  Forms("").Open()  如何更改代码可以实现上面的要求请求帮助 亲亲


--  作者:涛声依旧5666
--  发布时间:2011/11/24 11:18:00
--  

加判断,大致如下:

If Forms("窗口1").Opened Then
    Forms("录入窗口1").Open() 

End If

If Forms("窗口2").Opened Then
    Forms("录入窗口2").Open() 

End If


--  作者:狐狸爸爸
--  发布时间:2011/11/24 11:23:00
--  

Select Case e.col.name
    Case "第一列","第二列","第三列","第四列","第五列"
        forms("窗口1").Open()
    Case "第六列","第七列","第八列","第九列","第十列"
        forms("窗口1").Open()
End Select

 


--  作者:姗姗来迟
--  发布时间:2011/11/24 11:26:00
--  

谢谢


--  作者:小猪鑫鑫
--  发布时间:2011/11/24 22:27:00
--  
楼主的好问题,狐爸的好答案,学习