English Deutsch Français Italiano Español Português 繁體中文 Bahasa Indonesia Tiếng Việt ภาษาไทย
所有分類

例如: $12.3 price1245 1452kr ,我如何讓文字跟數字分開,因為我要做數字上的運算,文字的部分我不要。但是文字有時候會在前面,有時會在後面,且數字不問也不一定長度、有時會有小數點,有請高手解答?

2006-07-28 18:59:37 · 2 個解答 · 發問者 Y9546557701 2 in 電腦與網際網路 軟體

只要是數字部份都要,英文字都不要

2006-07-29 14:53:59 · update #1

2 個解答

在工作表按alt+F11,至VBA視窗,插入模組,貼上程式碼:Sub numtest()Set mR = Application.InputBox(prompt:="選擇目標儲存格", Type:=8)Set sr = Application.InputBox(prompt:="選擇開始貼上資料的單一儲存格", Type:=8)k = -1For Each T In mRnmt = ""k = k + 1vt = Len(T)For i = 1 To vt    nm = Mid(T, i, 1)    If IsNumeric(nm) = True Or nm = "." Then        nmt = nmt & nm    End IfNext isr.Offset(0, k) = nmtNext TEnd Sub設計不取代原來儲存格,留下原始資料做比對.結果如下:$12.30price12451452kr12.312451452

2006-07-29 20:05:44 · answer #1 · answered by 牛仔褲1431 6 · 0 0

例子中是要取成什麼樣的數字呢?12.3?1245?1452?

2006-07-28 22:04:44 · answer #2 · answered by 光精靈 5 · 0 0

fedest.com, questions and answers