如何从文件名(VBA)中删除文件扩展名

Question

我有一个包含的文件名变量:"Filename.csv".要从我使用的路径中提取文件名:从我选择的文件中检索Filename=Dir([fStr])where fStr.

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

Answer 1

最好使用类似函数GetBaseName()而不是依赖函数来替换文本.Windows允许句点出现在基本文件名中,因此这样的内容是合法的:

My .csv for Bob.csv

使用Replace()会导致:

My  for Bob

不是你想要的.更好的方法是:

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

Answer 2

您可以使用替换功能:

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