勸善紙 或 作業紙

excel 加上vba 寫的小小作品 ，希望對各位老師有一點點助益 。

現在要讓學生慢慢培養好的習慣，除了獎勵之外，也會配合處罰措施，罰寫是其中之一。這裡提供一個罰寫新選擇─勸善紙。寫法就像是初學寫字的人一樣，要一筆一劃照著寫，字數雖不多，但一樣可達到效果。

左圖是一個範例，內容是橫式排列，總字數一百五十個，內容可自行設計，用印表機印出後，將是淺灰色字體，以供學生描寫。

字型可依需要調整，目前的設定是「華康雅風體w3」，如果系統內沒有這個字型，就要另外選擇了。

檔案分成二個工作表，「設定」及「罰寫紙」〈勸善紙〉二個部分。「設定」工作表可以輸入自己設計的內容，而「罰寫紙」部分就是要列印的部份〈如上圖〉。

左圖是設定區概覽

紅色線框為內容設定區，為直式輸入，每個儲存格一個字，自行決定要不要標點符號。

淺綠色線框為內容編號，目前限定在一至五十之間，不可增刪。

藍色線框為內容編號輸入區，請選填已自行輸入內容的編號。

好了之後，就可以按下橘色線框的按鈕以便製作罰寫紙〈勸善紙〉〈即最上圖所示〉。

要列印請到「罰寫紙」工作表，按列印即可，成品為A4紙張大小！。
對了，直接用印表機列印效果比較好，只是有點小傷荷包 (>////<) 
除了罰寫之外，也可製作成作業紙。

如果有更好用的版本記得通知喔。

檔案下載