Re: [算表] 把很多excel檔案文字改成數字
※ 引述《ljuber (給你吃膨餅)》之銘言:
: 軟體:excel
: 版本:任何版本
: 我從某系統下載了好多excel檔
: 想要用裡面的數字
: 但是發現
: 他裡面的數字都是文字格式
: 害我用連結時候都無法計算
: (用sumif)
: 不知道有什麼方法可以很快的把很多excel檔內的文字改成數字?
自問自答
剛剛上網去找了一些巨集範本
自己編了一個:
只要改裡面的範圍跟路徑 就可以改一堆excel檔了
p = "D:\實驗\"
f = Dir(p & "*.xls")
Do While f <> ""
Workbooks.Open p & f
For Each sh In Worksheets
Dim n As Range
For Each n In Range("B7:G22")
n.FormulaR1C1 = n.Text
Next n
Next
ActiveWorkbook.Close True
f = Dir
Loop
End Sub
--
機殼:Silverstone Sg01-E CPU: C2D E6750 主機板:GA-G33M-DS2R
記憶體:A-DATA DDR2 800 2GB x2(鐵殼版) power:海韻380W SII
顯示卡:Gigabyte 9600GSO 384MB 電視卡:compro T300 燒錄機:Benq DW2000
硬碟:Segate 750G +日立 750G +Segate企業320G 錄音介面:M-Audio Fireware Solo
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 210.65.186.253
討論串 (同標題文章)
本文引述了以下文章的的內容:
完整討論串 (本文為第 2 之 2 篇):
Office 近期熱門文章
PTT數位生活區 即時熱門文章