一、使用開發工具 原以為這事兒會挺簡單,但忙活了半天也沒什么結果,最后,還是在Excel中借助于自定義函數才使這個問題最終得到解決。解決的辦法如下: 先在A1、A2單元格中按正常的順序錄入短信內容。點擊功能區“開發工具”選項卡的“代碼”功能組中的“Visual Basic”按鈕,打開VBA代碼編輯窗口。如果您的Excel功能區中沒有“開發工具”選項卡,那么可以點擊左上角“Office”按鈕,點擊打開的對話框右下角的“Excel選項”按鈕,在打開的對話框中,點擊左側的“常用”項目,并選中右側“在功能區顯示“開發工具”選項卡”復選項,這樣就可以將“開發工具”選項卡添加到功能區中了。 在VBA代碼編輯窗口中,點擊菜單命令“插入→模塊”,得到“模塊1”編輯窗口, 在其中輸入如下自定義函數的代碼,如圖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