許多系統下載下來的報表,裡面的數字都是文本型(即使複制後,選粘貼為值也改變不了),不能直接用于運算。雖然有用“分列”來處理此問題,但“分列”功能一次隻能處理一列。
這裡介紹用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”,這個運算規則還真是奇特。 号運算變成了字符相連,合并字符串就可用數組相 來完成了。
,
更多精彩资讯请关注tft每日頭條,我们将持续为您更新最新资讯!