成人精品一区二区三区中文字幕-成人精品一区二区三区-成人精品一级毛片-成人精品亚洲-日本在线视频一区二区-日本在线视频免费

導航首頁 ? 技術教程 ? excel數字變大寫金額后的恢復方法
全站頭部文字 我要出現在這里
excel數字變大寫金額后的恢復方法 974 2023-11-18   

excel數字變大寫金額后的恢復方法,綠夏技術導航根據你的問題回答如下:

excel數字變大寫金額后的恢復方法

在Excel中對數字進行金額大小寫轉換(即人民幣大寫轉換)是一件很常見的操作,但有些時候你可能需要把這些轉換后的大寫金額表示恢復到數字形式。幸運的是,這很容易完成。下面提供兩種方法來恢復大寫金額為數字。

方法一:使用Mathematical Expression公式

1. 在Excel中選中用于表示大寫金額的單元格

2. 將其格式更改為“常規”:右鍵單擊選擇“數字格式”-“常規”。

3. 在任何一個空單元格中鍵入以下公式,以加入一個輸入將大寫金額轉義回數字形式的函數中:

=VALUE(SUBSTITUTE(SUBSTITUTE(B2,"人民幣",""),"(大寫)",""))

4. 回車鍵,從而獲得大寫金額對應的數值。

方法二:使用自定義VBA腳本

1. 按下“ALT +F11”,從打開視圖菜單,進入Microsoft Visual Basic for Applications程序的代碼編輯器界面。

2. 點擊左邊的"插入"菜單,選擇“模塊”

3. 在新建的模塊中,輸入以下VBA腳本代碼

Function GetUpcaseStringToNumber(ByVal s As String)

if InStr(s,("人民幣")) > 0 then

s = Trim(Replace(s,"人民幣",""))

s = Trim(Replace(s,"(大寫)",""))

GetUpcaseStringToNumber = Application.WorksheetFunction.Substitute( _

Application.WorksheetFunction.Substitute( _

Application.WorksheetFunction.Substitute( _

Application.WorksheetFunction.Substitute( _

Application.WorksheetFunction.Substitute( _

Application.WorksheetFunction.Substitute( _

Application.WorksheetFunction.Substitute( _

Application.WorksheetFunction.Substitute( _

Application.WorksheetFunction.Substitute( _

Application.WorksheetFunction.Substitute( _

Application.WorksheetFunction.Substitute( _

Application.WorksheetFunction.Substitute(s,"零元","元"),"零拾",""), _

"零佰",""),"\零千",""),"_0萬_","萬"), _

"_0億_","億"),"零零","零"),"_零百", "百"),"_零十", "十") )

else

MsgBox("請輸入正確RMB大寫數字","提示",16)

End If

End Function

4. 返回Excel工作表,在任何一個空單元格中輸入以下公式,其中B2是您希望轉換回數值的單元格值,

=GetChinese(B2)

5. 按下回車鍵,從而獲得大寫金額對應的數值。

無論選用哪種方法,它們都很容易并且高效。請嘗試使用這些步驟,將大寫金額自由轉換為數字。

上面就是關于excel數字變大寫金額后的恢復方法的回答,別忘了點贊評論哦!


主站蜘蛛池模板: 瑞贝卡·德·莫妮| 丁莹| 毕业生在线观看| 火舞俪人 电影| 浙江卫视是几台| 髋关节置换术后护理ppt| 《欲望中的女人》| 杰深斯坦森全部电影| 郭碧婷是哪里人| 非你不可西班牙正版| 卓别林电影全集免费观看| 河西走廊纪录片观后感| 在线黄色免费网站| 钱串子图片| 韩国电影《致命的诱惑》| 名剑风流 电视剧| 山下大辉| 檀健次壁纸| 抗击 电影| 182tv福利视频| 贼王之王| 所求皆所愿| 中华英雄何润东| 短篇500篇 合集大结局| 久久日韩成人影院绝色| 影库影片| 南海姑娘简谱| 叶芳华| 视频欧美| 都市频道节目表今天| 猿球崛起| 十三刺客| 胃疼呕吐视频实拍| 赫伯曼电影免费观看| 安息2| 菲律宾电影泡沫| 新闻联播台词| 赖小子| 小林凉子| 韶山研学心得体会800高中| 寡妇一级毛片|

!!!站長長期在線接!!!

網站、小程序:定制開發/二次開發/仿制開發等

各種疑難雜癥解決/定制接口/定制采集等

站長微信:lxwl520520

站長QQ:1737366103