Convert CSV Unicode Text type to CSV MS-DOS type

[Enna]

I have multiple large CSV files. I would like to change the file type from Unicode text to MS-DOS without opening all the files. Is there a way to do that? Thank you

 

[Marc L]

As guessing can't be coding …​

 

[Enna]

​

As guessing can't be coding …​

So I have to open the file and save as “csv Ms-dos”? Those are huge files. Maybe use R or python to do that?

 

[rlv01]

I do not have an access via cmd.

Really? That's pretty unusual on a windows box. What happens if you run this bit of code?

Sub ShellToCMD()
'Open command window
 Shell "cmd.exe", vbNormalFocus
End Sub

 

[Enna]

Really? That's pretty unusual on a windows box. What happens if you run this bit of code?

Sub ShellToCMD()
'Open command window
 Shell "cmd.exe", vbNormalFocus
End Sub[/CODE
[/QUOTE]

Really? That's pretty unusual on a windows box. What happens if you run this bit of code?

Sub ShellToCMD()
'Open command window
 Shell "cmd.exe", vbNormalFocus
End Sub

Then it pops up the cmd window but not the onedrive cloud directory where are my csv files

 

[rlv01]

Then it pops up the cmd window but not the onedrive cloud directory where are my csv files

That is an easily solvable problem -> Use Windows explorer to Move or Copy the files you want to convert from the OneDrive folder to a temporary folder on your hard drive. Then try the recommendation I made back in post #8.

Sub ShellToCMD()
   Dim LocalFolderPath As String
   'Open a command window
   
   LocalFolderPath = "C:\DOS\FileToConvert\" 'edit. Where the files are.

   ChDrive Left(LocalFolderPath, 1)
   ChDir LocalFolderPath
   
   VBA.Shell "cmd.exe", vbNormalFocus
End Sub

 

[rlv01]

What a batch file might look like

:: Windows CMD.EXE batch file
:: Process all .CSV files in the directory
@echo off
SETLOCAL EnableDelayedExpansion
del /Q dos*.csv
Date /T > ConversionLog.txt
Time /T >> ConversionLog.txt
SET count=1
for  %%x in (*.csv) DO (
echo %%x   to   DosFile%count%.csv >> ConversionLog.txt
echo %%x   to   DosFile%count%.csv
type %%x > DosFile%count%.csv
set /A count+=1
)
:: end batch file

 

[Enna]

That is an easily solvable problem -> Use Windows explorer to Move or Copy the files you want to convert from the OneDrive folder to a temporary folder on your hard drive. Then try the recommendation I made back in post #8.

Sub ShellToCMD()
   Dim LocalFolderPath As String
   'Open a command window
  
   LocalFolderPath = "C:\DOS\FileToConvert\" 'edit. Where the files are.

   ChDrive Left(LocalFolderPath, 1)
   ChDir LocalFolderPath
  
   VBA.Shell "cmd.exe", vbNormalFocus
End Sub

The files are too large to move around or open and close. So, I would like to change to the CSV MS-DOS without opening and moving. Is this possible? Thank you

 

[rlv01]

The files are too large to move around or open and close. So, I would like to change to the CSV MS-DOS without opening and moving. Is this possible? Thank you

It is not possible to do it without opening the file. You don't necessarily have to open the CSV file with Excel, but you have to open it with something (a text editor, a batch file, vba) to do the conversion.

 

[Enna]

It is not possible to do it without opening the file. You don't necessarily have to open the CSV file with Excel, but you have to open it with something (a text editor, a batch file, vba) to do the conversion.

How can I use a vba code? I can open one of the files and run the vba code, but I don’t know how to write the vba code. Thank you

 

[rlv01]

How can I use a vba code? I can open one of the files and run the vba code, but I don’t know how to write the vba code. Thank you

If you don't know how to write VBA code, then I do not think that VBA is a viable solution for you unless someone volunteers to create the code for you. I wish you well, but unfortunately I do not have the time to spend on that effort.