以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]这个VBA查找录入代码怎么写?有例子附件  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=40427)

--  作者:jyh7081
--  发布时间:2013/9/18 18:58:00
--  [求助]这个VBA查找录入代码怎么写?有例子附件

要求:
        在“收案月份”列的非空单元格录入;
                                     如果"立案日期"列的日期<15日,则录入当月月份数(如2013-3-6,则录入3);
                                     如果"立案日期"列的日期>15日,则录入下月月份数(如2013-3-16,则录入4);
       在“案件分类”列的非空单元格录入;
                                    如果"案号"列含有字符串“初”,则录入“一审”;
                                    如果"案号"列含有字符串“终”,则录入“二审”; 

                                    如果"案号"列含有字符串“执”,则录入“非诉”;
                                    如果"案号"列含有字符串“赔”,则录入“国培”;

 

 下载信息  [文件大小:   下载次数: ]
点击浏览该文件:录入.table

[此贴子已经被作者于2013-9-18 20:53:38编辑过]

--  作者:有点甜
--  发布时间:2013/9/18 19:13:00
--  
 用vba不太会,楼主最好去Excel Home问一问,不太难的。

 这里是foxtable论坛,如果用狐表做,我就会。

--  作者:逛逛
--  发布时间:2013/9/18 19:47:00
--  
vba 最简单的方法,就是在Excel上使用录制宏,按你的想法做一遍,然后修改代码。
--  作者:jyh7081
--  发布时间:2013/9/18 21:17:00
--  

此帖在Excel Home网站挂了三天,没人解答,感到还是这里的老师答复的及时,现在已经把原电子表格导入狐表,并重新上传了附件。

由于刚接触狐表不久,对学习代码也没有老师指点,看到狐表的代码同execl的VBA代码十分接近,网上VBA教学视频也较多,感到能否从execl的VBA代码开始,做到先了解,再深入,逐渐达到对狐表的操控,以上思路不知可不可行?


--  作者:有点甜
--  发布时间:2013/9/18 21:27:00
--  
 如下例子。代码写在 表属性->事件->datacolchanged

 
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:录入.table


--  作者:jyh7081
--  发布时间:2013/9/18 21:48:00
--  
谢谢啦,有点甜 老师。同时感到狐表在很多方面确实超过execl,狐表是一定要学好的,并希望尽快向 有点甜 看齐。
--  作者:lsy
--  发布时间:2013/9/19 7:38:00
--  
以下是引用jyh7081在2013-9-18 21:48:00的发言:
谢谢啦,有点甜 老师。同时感到狐表在很多方面确实超过execl,狐表是一定要学好的,并希望尽快向 有点甜 看齐。

可以看,但看有难度。