时间戳

首页 > 解决方案 > 检查命名范围是否等于另一个命名范围

excel - 检查命名范围是否等于另一个命名范围

问题描述

如果命名范围“InventoryList”等于传递给子的命名范围，我正在尝试在 Excel 中调整命名范围的大小。我似乎无法为此获得正确的语法。“IF”语句是我得到错误的地方。希望有人可以帮助我。

提前致谢。

    Sub Resize_Inventory_Range(InventoryList As Excel.Range)

        Dim xlApp As Excel.Application
        Dim WB As Excel.Workbook
        Dim WS As Excel.Worksheet
        Dim FullInventory As Excel.Range

        xlApp = GetObject(, Constants.ExcelApp)
        WB = xlApp.Workbooks("Product")
        WS = WB.Sheets("Inventory")
        FullInventory = WS.Range("Full_Inventory")

        If InventoryList.Name.Name = "Hardware_Inventory" Then
            FullInventory.Resize(FullInventory.Rows.Count + 1, 4).Name = FullInventory.Name.Name
        End If

    End Sub

标签： excelvb.netif-statementnamed-ranges

解决方案

您可以通过比较它们的地址来检查两个范围是否相同。例如：

MsgBox InventoryList.Address = FullInventory.Address

推荐阅读