提取文件名的部分" MM-YYYY"在VBA?

时间:2016-08-08 22:02:04

标签: excel vba excel-vba

所有文件名都是" OhioSalesRevenueData1-2015"对于俄亥俄州的2015年1月数据或" AlabamaSalesRevenueData12-2015"对于阿拉巴马州2015年12月的数据。我将相应的月份数放在宏中的大量电子表格的列中。现在我的宏是:

<script src="https://ajax.googleapis.com/ajax/libs/jquery/2.1.1/jquery.min.js"></script>
<div id="message">
</div>

但这仅适用于1月的电子表格。我需要更换&#34; 1&#34;获得所有月份的月份&#39;电子表格。有没有办法做到这一点?谢谢。

2 个答案:

答案 0 :(得分:0)

我假设您正在尝试从特定文件名中确定月份。

如果是这样,假设您的文件名位于变量f中,并且您的所有文件名都包含RevenueData字样(并且您的路径包含{{1} }),以下应该有效:

RevenueData

答案 1 :(得分:0)

如果您的数据与您展示的完全一致,则可以替换&#34; 1&#34;以下内容:

IIf(Mid(FileName, Len(FileName) - 6, 2) Like "##", _
    Mid(FileName, Len(FileName) - 6, 2), _
    Mid(FileName, Len(FileName) - 5, 1))

当然,您也可以使用简单的工作表公式。您的文件名位于A1

=IF(ISNUMBER(-MID(A1,LEN(A1)-6,2)),MID(A1,LEN(A1)-6,2),MID(A1,LEN(A1)-5,1))