字符串中的右侧函数（Excel 2007 VBA）

Question

好的：我正在使用Excel '07中的宏来导入文件，删除数据，进行必要的格式更改，然后将具有指定文件名的文件保存到网络驱动器，只需单击一下。

一切正常但最后一部分。我正在尝试将文件保存为paystatusMMDD.xlsx，其中MMDD是单元格中的最后4个字符（L2）。但是，对于我的生活，我不能让正确的功能正常工作。那么我做错了什么？我确信这很明显，但我无法弄清楚。

以下是相关的代码部分：

Dim Path As String
Dim FileName1 As String
Dim FileName2 As String
Path = "G:\HRO\PSM\PAYSTATUS\"
FileName1 = "paystatus"
FileName2 = Right(L2, 4)
ActiveWorkbook.SaveAs Filename:=Path & FileName1 & FileName2 & ".xlsx", FileFormat:=xlNormal
End Sub

Answer 1

根据@simoco评论，您需要更正引用单元格L2的方式。

使用Range("L2")代替此L2：

FileName2 = Right(Range("L2"), 4)

---

由于您可能正在从另一张表中调用此宏，因此您应该完全符合L2的位置:(假设单元格位于sheet1上）

FileName2 =Right(Worksheets("Sheet1").Range("L2"), 4)

---

根据@Floris评论，您可以为[L2]

缩写Range("L2")

FileName2 = Right([L2], 4)