国产探花免费观看_亚洲丰满少妇自慰呻吟_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ā)表
主站蜘蛛池模板: 新沂市| 南丰县| 郯城县| 罗定市| 宜春市| 旺苍县| 台南市| 惠来县| 台南县| 洛南县| 黔江区| 体育| 罗城| 正蓝旗| 色达县| 那曲县| 富川| 轮台县| 都安| 洪洞县| 贵州省| 桑日县| 乌鲁木齐市| 鹤庆县| 象州县| 民丰县| 如皋市| 句容市| 奇台县| 龙州县| 原平市| 九寨沟县| 江源县| 通榆县| 建昌县| 类乌齐县| 定安县| 闸北区| 灵寿县| 海丰县| 商都县|