首页 > 解决方案 > 在 vlookup 中更改文件名

问题描述

我通过录制创建了一个宏,它将使用当前工作表名称查找部门代码。我需要帮助找到将文件名更改为当前活动工作表的方法。我是新人,所以请耐心等待。

ActiveSheet.Next.Select
    Range("K9").Select
    ActiveSheet.Paste
    Application.CutCopyMode = False
    ActiveCell.FormulaR1C1 = _
        "=IFERROR(VLOOKUP(RC[-10],'S:\ Accounting\Inventory\2018 Inv\Physical Inventory\Year End\PIVR Adjustments\[October 2018 PIVR Adjustment Form 9418.xlsx]Pivot'!C1:C2,2,FALSE),0)"
    Range("K9").Select
    Selection.Copy
    Range("K9:K71").Select
    ActiveSheet.Paste
ActiveSheet.Next.Select
    Range("K9").Select
    ActiveSheet.Paste
    Application.CutCopyMode = False
    ActiveCell.FormulaR1C1 = _
        "=IFERROR(VLOOKUP(RC[-10],'S:\ Accounting\Inventory\2018 Inv\Physical Inventory\Year End\PIVR Adjustments\[October 2018 PIVR Adjustment Form 9996.xlsx]Pivot'!C1:C2,2,FALSE),0)"
    Range("K9").Select
    Selection.Copy
    Range("K9:K71").Select
    ActiveSheet.Paste

标签: excelvba

解决方案


推荐阅读