文章/答案/技术大牛

发布

社区首页 >问答首页 >VLookUp公式中的先验工作日动态引用

问VLookUp公式中的先验工作日动态引用
EN

Stack Overflow用户

提问于 2020-07-31 11:49:30

回答 2查看 28关注 0票数 0

谈到VBA编程，我有点像个菜鸟。我每天运行一个宏脚本在每天不同的标签标题MM-DD-YY上。我想使用前一个工作日的查找范围对今天的日期做一个vlookup。例如，如果今天是07/31/20，我希望vlookup是VLOOKUP(Q7, '07-30-20'!$P$1:$Q$29, 2, FALSE)。如何使用前一个工作日来自动填充vlookup？下面是我在这一点上的菜鸟代码。

Range("Q2").Select

ActiveCell.FormulaR1C1 = "=VLOOKUP(Q7, '07-29-20'!$P$1:$Q$29, 2, FALSE)"
    Selection.AutoFill Destination:=Range("Q2:Q" & Range("E" & Rows.Count).End(xlUp).Row)

excel

vba

vlookup

回答 2

Stack Overflow用户

发布于 2020-07-31 11:59:56

尝试：

ActiveCell.FormulaR1C1 = "=VLOOKUP(Q7,'" & Right("0" & Month(Date), 2) & "-" & Right("0" & Day(Date), 2) - 1 & "-" & Right(Year(Date), 2) & "'!$P$1:$Q$29, 2, FALSE)"

票数 0

Stack Overflow用户

发布于 2020-07-31 17:12:18

你可以这样做：

Dim dprevDate As Date, sprevDate As String
  dprevDate = WorksheetFunction.WorkDay(Date, -1)
  sprevDate = Format(dprevDate, "mm-dd-yy")

ActiveCell.Formula = "=VLOOKUP(Q7, '" & sprevDate & "'!$P$1:$Q$29, 2, FALSE)"

票数 0

页面原文内容由Stack Overflow提供。腾讯云小微IT领域专用引擎提供翻译支持

原文链接：

https://stackoverflow.com/questions/63191314

复制

相似问题

问VLookUp公式中的先验工作日动态引用
EN

回答 2

Stack Overflow用户

Stack Overflow用户

社区

活动

圈层

关于

腾讯云开发者

热门产品

热门推荐

更多推荐

问VLookUp公式中的先验工作日动态引用EN

回答 2

Stack Overflow用户

Stack Overflow用户

社区

活动

圈层

关于

腾讯云开发者

热门产品

热门推荐

更多推荐

问VLookUp公式中的先验工作日动态引用
EN