国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁 > 辦公 > Excel > 正文

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

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

一、使用開發(fā)工具
  原以為這事兒會(huì)挺簡(jiǎn)單,但忙活了半天也沒什么結(jié)果,最后,還是在Excel中借助于自定義函數(shù)才使這個(gè)問題最終得到解決。解決的辦法如下:
  先在A1、A2單元格中按正常的順序錄入短信內(nèi)容。點(diǎn)擊功能區(qū)“開發(fā)工具”選項(xiàng)卡的“代碼”功能組中的“Visual Basic”按鈕,打開VBA代碼編輯窗口。如果您的Excel功能區(qū)中沒有“開發(fā)工具”選項(xiàng)卡,那么可以點(diǎn)擊左上角“Office”按鈕,點(diǎn)擊打開的對(duì)話框右下角的“Excel選項(xiàng)”按鈕,在打開的對(duì)話框中,點(diǎn)擊左側(cè)的“常用”項(xiàng)目,并選中右側(cè)“在功能區(qū)顯示“開發(fā)工具”選項(xiàng)卡”復(fù)選項(xiàng),這樣就可以將“開發(fā)工具”選項(xiàng)卡添加到功能區(qū)中了。
  在VBA代碼編輯窗口中,點(diǎn)擊菜單命令“插入→模塊”,得到“模塊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ù)倒讀單元格文本_武林網(wǎng)VeVB.COm整理

圖1 VBA代碼編輯窗口
  完成后,選擇菜單“文件→關(guān)閉并返回到Microsoft Excel”命令,返回到Excel工作表窗口。

  現(xiàn)在,在B1單元格輸入公式“=daodu(A1)”,回車后就可以看到結(jié)果了。拖動(dòng)B1單元格的填充句柄向下復(fù)制公式,則可以輕松地得到所需要的結(jié)果,如圖2所示。

Excel用自定義函數(shù)倒讀單元格文本_武林網(wǎng)VeVB.COm整理

圖2

發(fā)表評(píng)論 共有條評(píng)論
用戶名: 密碼:
驗(yàn)證碼: 匿名發(fā)表
主站蜘蛛池模板: 汾西县| 仙桃市| 嵊州市| 襄樊市| 山西省| 南皮县| 磐石市| 碌曲县| 昭觉县| 芦山县| 平山县| 寿光市| 聂荣县| 康马县| 广河县| 桐庐县| 仁化县| 双流县| 博乐市| 凤山市| 迁西县| 德昌县| 德安县| 大田县| 定陶县| 灵宝市| 逊克县| 阿克陶县| 紫阳县| 舞钢市| 礼泉县| 彭水| 无棣县| 普安县| 静宁县| 乌兰浩特市| 邹平县| 舞阳县| 灵丘县| 巩留县| 临澧县|