標題: [發問] 用 Numberformat 在數字後加上文字(文字由變數取得) [打印本頁]

---

作者: swatt    時間: 2014-10-9 18:30     標題: 用 Numberformat 在數字後加上文字(文字由變數取得)

請問大大們:
我的目的是在數字後加上文字說明，但不要影響儲存格的數字:
例如:   數字值是567，希望儲存格顯示567 (20%)   ，這(20%)是利用其他變數取得的值。
目前是利用numberformat 來做，寫個小程式驗證一下，卻發現問題如下:
若變數a="123" or a="---"時，程式可正確執行，但若 a="abc"就有錯誤無法執行，
大大可以幫忙看一下問題出在哪裡嗎?

1. Sub Macro3()
   
2. 
   
3. a = "abc"  'a變數就是用來取得放在數字後面的文字
   
4. Selection.NumberFormat = "0.0" & a
   
5.    
   
6. End Sub

複製代碼

---

作者: 蝕光迴狼    時間: 2014-10-9 19:38

回復 1# swatt


　NumberFormat：為時間日期格式，故無法使用以下字母

　B、D、E、G、H、M、N、R、S、Y

---

作者: GBKEE    時間: 2014-10-9 19:56

本帖最後由 GBKEE 於 2014-10-10 05:31 編輯

回復 1# swatt

1. Option Explicit
   
2. Sub Ex()
   
3.     Dim a
   
4.     'a = """abc"""  'a變數就是用來取得放在數字後面的文字
   
5.     a = """GBK"""  '字串加上"
   
6.     Selection.NumberFormat = "0.0" & a
   
7. End Sub

複製代碼

---

作者: swatt    時間: 2014-10-13 16:21     標題: RE: [已解決]用 Numberformat 在數字後加上文字(文字由變數取得)

回復 3# GBKEE


感謝 GBKEE  大大, 原來是要再加一組引號.
另外也學到要在字串裡加上"的話，需要用兩個""，修改code如下:

1. Sub Macro3()
   
2. a = "abc"   'a變數就是用來取得放在數字後面的文字
   
3. 
   
4. Selection.NumberFormat = "general" & """" & a & """"
   
5. 
   
6. End Sub

複製代碼

---

歡迎光臨 麻辣家族討論版版 (http://forum.twbts.com/)