如何从文件名（VBA）中删除文件扩展名

问题描述：

我有一个文件名变量，其中包含："Filename.csv"。从我使用的路径中提取文件名：Filename=Dir([fStr])其中fStr从我选择的文件中检索。如何从文件名（VBA）中删除文件扩展名

我只需要没有".csv"的文件名。如何删除".csv"扩展？

也许'Filename = left（Filename，len（Filename） - 4）'。 – Jeeped

答

可以使用替换功能：

Filename = replace(Dir([fStr]),".csv","")

谢谢你的作品！ – F1990

答

这是最好用的功能像GetBaseName()，而不是依靠功能来替换文本。 Windows允许周期以基本文件名内出现如此类似，这是合法的：

My .csv for Bob.csv

使用Replace()会导致：

My for Bob

不是您要寻找的。更好的方法是：

Filename = CreateObject("Scripting.FileSystemObject").GetBaseName(fStr)

您的解决方案比我的更清洁。 –