2013-12-21 30 views
-1

我開發宏其中我期待串如(存在於文本文件):Excel單元的大小限制,導致宏失敗

[email protected]@[email protected]@[email protected]@[email protected]~ 
[email protected]@[email protected]@[email protected]@[email protected]~ 

,其中每個場由@界定,並且每個記錄是由~分隔爲表格格式。

如每個字段將在連續的單元格中並且新的記錄在新的行中開始。 我有宏,它目前需要複製一個單元格中的數據。但隨着字符串大小增加超出一定限制,我無法粘貼它。所以,請提供其他簡單的選項。

+0

你能發佈你的文本文件閱讀代碼嗎?因爲即使字符串變大,我認爲20億字符的限制應該是足夠的。 –

+0

@Pankaj我沒有代碼問題 - 問題是當我從一個單元格中非常大的文本文件粘貼字符串 – Ganesh

+0

然後有什麼問題?從你的描述看來,你有一些粘貼相關的問題。 –

回答

0

如果字符串的大小超過單個單元格的容量,則一次讀取一個字符中的數據,並隨時將數據解析爲字段。

0

指定的字符串變量(姑且稱之爲「my_var」),然後

arr_1 = Split(my_var, "~", -1, vbTextCompare) 

For x = LBound(arr_1,1) to UBound(arr_1,1) 
    activecell = arr_1(x) 
    activecell.offset(1,0).select 
Next 

這將創建一個數組,每個元素都是您的記錄之一;然後它將每條記錄放在一個新的行中。然後,您可以返回並根據「@」分割每行,並將分割的數據放在相鄰的列中。