懶人計劃 2 - 自動製作文件進化版 PART 04 - 尋找條件 if then else ~

~ 上傳‧分享‧網賺 ~

~ 免費上傳空間‧請即申請 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 一樣 , 不廢話 ( 又是小一點吧 ~ 哈哈 ~ ) , 直接來寫程式 , 然後 , 就再一次把你每天都在重複中步驟一次過消滅 ~ 讚美吧 ~~~~~~~~

哈 ~~~ 利路亞 ~~~ 哈 ~~~ 利路亞 ~~~ 哈利路亞 ~~~ 哈利路亞 ~~~ 哈利 ~~~~ 路亞 ~~~