Excel用自定義函數(shù)倒讀單元格文本

互聯(lián)網(wǎng) 發(fā)布時間：2008-10-06 15:21:54 作者：佚名

　　前些天收到朋友一個短信，將一段祝福的話倒序發(fā)了過來。雖然讀起來挺費勁，但是卻十分個性化。在這個短信的啟發(fā)下，咱也想個性化一把，把寫好的郵件也給“倒”過來，想來發(fā)出去必也有好的效果。不過，如果是倒序錄入漢字的話，估計咱無論使用哪種輸入法都不會

　　前些天收到朋友一個短信，將一段祝福的話倒序發(fā)了過來。雖然讀起來挺費勁，但是卻十分個性化。在這個短信的啟發(fā)下，咱也想個性化一把，把寫好的郵件也給“倒”過來，想來發(fā)出去必也有好的效果。不過，如果是倒序錄入漢字的話，估計咱無論使用哪種輸入法都不會有太高的效率，咱還是先按正常的順序錄入，再把它的次序給顛倒過來吧。

一、使用開發(fā)工具
　　原以為這事兒會挺簡單，但忙活了半天也沒什么結(jié)果，最后，還是在Excel中借助于自定義函數(shù)才使這個問題最終得到解決。解決的辦法如下：
　　先在A1、A2單元格中按正常的順序錄入短信內(nèi)容。點擊功能區(qū)“開發(fā)工具”選項卡的“代碼”功能組中的“Visual Basic”按鈕，打開VBA代碼編輯窗口。如果您的Excel功能區(qū)中沒有“開發(fā)工具”選項卡，那么可以點擊左上角“Office”按鈕，點擊打開的對話框右下角的“Excel選項”按鈕，在打開的對話框中，點擊左側(cè)的“常用”項目，并選中右側(cè)“在功能區(qū)顯示“開發(fā)工具”選項卡”復選項，這樣就可以將“開發(fā)工具”選項卡添加到功能區(qū)中了。
　　在VBA代碼編輯窗口中，點擊菜單命令“插入→模塊”，得到“模塊1”編輯窗口，在其中輸入如下自定義函數(shù)的代碼，如圖1所示。
　　Function daodu(dy)
　　 a = Len(dy)
　　 For i = a To 1 Step -1
　　 b = Mid(dy, i, 1)
　　 daodu = daodu & b
　　 Next i
　　End Function

Excel用自定義函數(shù)倒讀單元格文本_腳本之家jb51.net整理