If the only purpose of importing to Excel is to perform rounding, you could just manipulate the text file directly using vbscript.
Assuming the data is delimited by a space:
Copy to Notepad and save as filename.vbs
dim fso, myFile,myLine, FinalText, v1,v2, myPath
myPath = "C:\Temp\New Text Document.txt"
set fso = createobject("Scripting.filesystemobject")
set myFile = fso.opentextfile(myPath,1) 'read from file
do while not myFile.atendofstream
myLine = myfile.readline()
v1 = mid(myLine,instrrev(myLine," ")+1)
if isnumeric(v1) then
v2 = round(v1,2)
myLine = replace(myLine,v1,v2)
end if
finaltext = finaltext & myLine & vbCrlf
loop
myfile.close
set myfile = fso.opentextfile(myPath,2) 'write to file
myfile.write finaltext
myfile.close
Bookmarks