0
我想從文本文件中獲取公式到單元格中以通過命名範圍來標識行。 我有這個宏:Excel公式從文本文件到單元格
Dim objStream
Dim strData As String
Set objStream = CreateObject("ADODB.Stream")
objStream.Charset = "utf-8"
objStream.Open
objStream.LoadFromFile ("path_of_txt_file")
strData = objStream.ReadText()
strData = Trim(Application.Clean(strData))
Columns("A:A").Select
Selection.Insert Shift:=xlToRight, CopyOrigin:=xlFormatFromLeftOrAbove
Range("A1").Select
ActiveCell.Value = "Name"
Range("A2").Select
Range("A2").FormulaR1C1 = strData
文本文件包含這樣的:
=IF(
OR(
named range="this";
named range="that";
named range="something"
);
"True";
"False"
)
...
其嵌套的IF公式。
沒有它的工作平等標誌,但我需要把它手動。 就這樣,我得到這個錯誤
Runtime error '1004':
Application-defined or object-defined error
我怎樣才能解決這個問題?我試着用價值而不是FormulaR1C1,但結果相同。
感謝您的所有答案!
什麼是您在Excel中的公式分隔符?逗號或分號? –
分號。它的工作,如果我把自己的平等標誌。 –
你的代碼工作正常,如果我只是用','替換txt文件中的';' –