0
我使用」text to columns「嚮導的宏代碼並將其放入我的代碼中。但它並不一致。Text to Columns正在獲取對象的「方法」範圍'_global'失敗「
我得到「方法‘範圍’的對象_global失敗」(有時) 我看着它,和應用解決方案,要麼改變什麼(它的錯誤後來幾次執行)
目前嘗試指定它更好的給我留下了
With Shipping
.ActiveSheet.Columns(letter & ":" & letter).TextToColumns Destination:=Range(letter & "1"), DataType:=xlDelimited, _
TextQualifier:=xlDoubleQuote, ConsecutiveDelimiter:=True, Tab:=False, _
Semicolon:=False, Comma:=False, Space:=True, Other:=False, FieldInfo _
:=Array(Array(1, 1), Array(2, 9), Array(3, 9), Array(4, 9)), TrailingMinusNumbers:= _
True
End With
我不知道,如果它想我指定上半年或目標,我不能找到一個更好的解決方案。
我該如何做這項工作?
'letter'如何設置? – 2012-07-06 15:21:52
是'航運'參考表單?另外,當宏失敗時,檢查「letter」傳遞的內容。不足之處在於,您能否發佈一些樣本數據供我們使用? – 2012-07-06 15:21:59
將Range(letter&「1」)更改爲'.ActiveSheet.Range(letter&「1」)'時會發生什麼?我假設'Shipping'是一本工作手冊? – 2012-07-06 15:25:46