~ 上傳‧分享‧網賺 ~
~ 免費上傳空間‧請即申請 Freak Share ~
~ 進入後請點選左上角 注冊 ! ~
~ 声明事项 ~
如各位想把以下本文章转贴 , 请记得要注明出处.
本文章之内容为本人之经验所写, 绝无抄袭成份, 特此声明.
由于图片制作需时, 所以更新会比较慢.
存放图片的 SHARE A PIC SERVER 可能读取速度较慢, 请耐心等待.
大家好吗 ~ 这一回要开始写程序啰 ~~~
如果大家有想过上一次我给你的提示 , 那这一章在开始之前 , 你应该也尝试过自己动手做了 ~
最初学习的时候 , 我有给你说过 , 其实计算机也很笨的 , 你不叫它做 , 它就什么也不做 , 你要它做 , 它就什么也会做 , 只是你要先告诉它怎样做 . 所以 , 我们第一件要做的事情 , 就是要利用程序代码 , 告诉计算机要怎样做 .
第一 , 上次我们增加了 " 已打印 " 和 " 打印日期 " 这两个东西 , 这两个东西的数据 , 理论上来说是计算机加上去的 , 看的也只是计算机 , 不是使用者 .
 |
( Pic4_1 )
按照上一回所说的条件 , 和之前的准备功夫 , 第一件要做好的事 , 就是要告诉计算机 , 条件在那里 .
看一看上面的图 , " 已打印 " 和 " 打印日期 " 分别是 "H" 和 "I" , 条件的位置已经知道了 , 之后我们来想一想上次给的提示 : 如果 xxx 成立 , 就进行 xxx , 否则就进行 xxx . 英文是 if ~ then ~ else . 也就是说 : 如果 " 已打印 " 的值出现 "Y" , " 打印日期 " 有记录 , 那就不用打印 . 两个都没有记录的话就要打印 .
条件有了 , 寻找的方法都有了 , 那么 , 现在就开始动手把 VBA 程序做出来吧 ~
在懒人计划 1 的时候 , 大家应该明白到如何让计算机分辨出条件是否成立吧 , 今次 , 我们的第一个任务 , 就是教计算机怎样才是条件成立 . 上面有说过 , 今次的衡量条件是 , 只要记录 " 已打印 " 和 " 打印日期 " 都没有数据 , 就给我把文件打印出来 . 就是这么简单 , 如果我们要告诉计算机 , 请你记得一件事情 : 计算机是很笨的 !
对 , 就是要你抓住它的手 , 一步一步的教它向前走 . 有没有发觉 , 你用几千块买了一台高频低能回来 ?? 哈 ~ 当然 , 程序完成后 , 它就不是高频低能 , 而是终于有点实用价值 ~
好吧 ~ 废话又太多了 ~ 来 , 开始吧 ~
确定条件成立的方法 :
if Worksheets("Summary").Range("H??").value ="Y" and worksheets("Summary").Range("I??").value <>""
简单地解释一下这句是什么东西 , 如果 SUMMARY 页面的 H?? 的值是 Y 和 SUMMARY 页面的 I?? 不是空白 .
开始明白了吧 ~ 配合一下之前说过的 , IF 之后是 THEN 之后是 ELSE ( IF ~ THEN ~ ELSE ~ ) , 这次 , 我们只需要用到 IF ~ THEN ~ 就可以了 . 不过 , 由于条件多于一个 , 所以 , 中间多了一个 AND , 目的就是要告诉计算机 , 要多条件成立的情况下才做 .
等等 ! 上面说的是不是有问题 ?? H 是记录 " 是否已打印 " , I 是记录 " 打印日期 " , 那么 , 上面的程序代码不就是废话了吗 ?
呵呵呵 ~ 当然啰 ~ 我可不会便宜你的 ~ 你要懒嘛 ~ 就要自己学会技术哦 ~ 哈哈哈哈哈 ~
习题 !!!!
上面的是例子 , 你要做的 , 就是写一句当 " 已打印 " 没有记录 , " 打印日期 " 又没有记录的程序代码 . ( 只要你细心地想一下就会想到了 , 其实是很简单的 XD )
下一回 , 我们就跟上次的懒人计划 1 一样 , 不废话 ( 又是小一点吧 ~ 哈哈 ~ ) , 直接来写程序 , 然后 , 就再一次把你每天都在重复中步骤一次过消灭 ~ 赞美吧 ~~~~~~~~
哈 ~~~ 利路亚 ~~~ 哈 ~~~ 利路亚 ~~~ 哈利路亚 ~~~ 哈利路亚 ~~~ 哈利 ~~~~ 路亚 ~~~
文章
0 留言:
發佈留言