在vba中如何在保存文件时更改扩展名,不知道确切的文件名

Bri*_*ian 0 excel file-extension vba replace

我的问题是这个.

我使用通配符读取了一系列文件名,因此文件名的末尾是未知的,扩展名是.xls或.xlsx.所以,通配符是这样的:

beginningOfFilename_ *.xls*

然后,我想要在操作它之后获取每个文件,并使用相同的名称保存它,但是以.csv(逗号分隔的值文件)保存.在vba for excel中,我可以只指定格式并且它将处理扩展,或者我必须以某种方式拉出(未知)扩展,并附加.csv

如果第二种情况是必要的,你会如何处理这个问题,我不知道从哪里开始,因为部分文件名是未知的,我不知道如何在vba中操作字符串.

我是VBA的初学者.

任何帮助将不胜感激,谢谢.

Fio*_*ala 6

你想要的是:

Mid(sFile, 1, InStrRev(sFile, ".")) & "csv"
Run Code Online (Sandbox Code Playgroud)

其中sFile是带有任何扩展名的文件名.