下标超出范围,单元格值包含图纸参考

时间:2018-09-18 13:57:55

标签: excel vba excel-vba

我收到带有以下代码块的消息。我知道我没有正确定义我的范围,但我有点迷茫。谢谢!

// MyMenu component
const getMatchedKey = (location) =>
    (
        Object.values(ROUTES).find((route) =>
            matchPath(location.pathname, route)
        ) || {}
    ).path;

const MyMenu = ({ location }) => {
    return (
        <Layout.Sider>
            <AntMenu mode="inline" selectedKeys={[getMatchedKey(location)]}>
                <AntMenu.SubMenu
                    title={
                        <React.Fragment>
                            <Icon type="appstore" />
                            Home
                        </React.Fragment>
                    }
                >
                    <AntMenu.Item key={ROUTE_KEYS.ROOT}>
                        <Icon type="appstore" />
                        <span className="nav-text">
                            Some subitem
                        </span>
                    </AntMenu.Item>
                </AntMenu.SubMenu>
                <AntMenu.SubMenu
                    title={
                        <React.Fragment>
                            <Icon type="user" />
                            Users
                        </React.Fragment>
                    }
                >
                    <AntMenu.Item key={ROUTE_KEYS.USER_DETAIL}>
                        <Icon type="user" />
                        <span className="nav-text">
                            User detail
                        </span>
                    </AntMenu.Item>
                </AntMenu.SubMenu>
            </AntMenu>
        </Layout.Sider>
    );
};

export default withRouter(MyMenu);

1 个答案:

答案 0 :(得分:1)

基于您的评论,单元格“ E17”的内容正好是Worksheets("Preliminary MTM Q1"),那么您将必须有一个名为“ Worksheets(“ Preliminary MTM Q1”)“的工作表(即您将在Excel文件中的“工作表”标签),我想您还没有一个使用该名称的工作表标签。实际上,您不能拥有一个名称如此长的工作表,因为它太长了:

enter image description here

在E17中您想要的只是Preliminary MTM Q1,以便在此代码中引用它时:

Set Preliminary_MTM = Worksheets(Worksheets("Input for model").Range("E17").Value2)

它访问该单元格的内容并查找在那里命名的工作表。

注意:我已将.Value更改为.Value2.Value2为您提供单元格中完全未格式化的文本,而.Value将返回格式化信息-这可能会导致问题。

注意:我已经将代码缩减为一行,因为这就是所有必要。如果您实际上在其他地方使用了变量sheetlink,则需要将其包括在内。