許多系統下載下來的報表，裡面的數字都是文本型（即使複制後，選粘貼為值也改變不了），不能直接用于運算。雖然有用“分列”來處理此問題，但“分列”功能一次隻能處理一列。
這裡介紹用VBA的數組來解決：僅僅隻需要了解數組賦值語句就行。先給數組賦值，例：arr=[A1:E14]（arr就是一個變量名，可以随便取）。然後再将數組的數據輸出即可：[A1:E14]=arr。輸出來的數字就變為了數值型數字，直接進行加減乘除運算。如果想輸出在其它位置，語句：Range("B5").Resize(ubound(arr),ubound(arr,2))=arr，将B5 改成你想放置的位置的單元格地址即可。
不過今天在運用這個方法時，發現在數組中，這些數字卻都是文本字符，不是數值型。也就是不能在數組中直接進行運算。如：arr(2,1) arr(2,2) 得到“73”，這個運算規則還真是奇特。 号運算變成了字符相連，合并字符串就可用數組相 來完成了。
zpostcode 
Recruit 
weather 
mreligion 
Yellowpages 
sport 
constellation 
shopping 
name 
game 
directory 
literature 
Word 
tour 
furnish 
Lottery 
tftnews 
lyrics 
News 
digital 
car 
dir 
Edu 
Finance 
