两个问题VBA问题求助

wjp023

我有两个问题求助各位老师:1、下面的代码在03版的excel中可以运行，请问在16版里如何修改？         With Application
        '屏蔽常用工具栏剪切、复制、粘贴
        .CommandBars(3).Controls("剪切(&T)").Enabled = False
        .CommandBars(3).Controls("复制(&C)").Enabled = False
        .CommandBars(3).Controls("粘贴(&P)").Enabled = False

        '屏蔽单元格右键菜单中的剪切、复制、粘贴命令
        .CommandBars("Cell").Controls("剪切(&T)").Enabled = False
        .CommandBars("Cell").Controls("复制(&C)").Enabled = False
        .CommandBars("Cell").Controls("粘贴(&P)").Enabled = False

        '屏蔽编辑菜单中的剪切、复制、粘贴命令
        .CommandBars(1).Controls("编辑(&E)").Controls("剪切(&T)").Enabled = False
        .CommandBars(1).Controls("编辑(&E)").Controls("复制(&C)").Enabled = False
        .CommandBars(1).Controls("编辑(&E)").Controls("粘贴(&P)").Enabled = False

        '屏蔽键盘剪切、复制、粘贴键
        .OnKey "^x", ""
        .OnKey "^c", ""
        .OnKey "^v", ""
    End With

2、我电脑里03版和16版的都安装了，可是发现03版不能插入控件了，显示“不能插入对象”。请问如何解决？
求助各位老师了。

wjp023

我一直在等答案呢。求助各位高人了！

wjp023

老师们，拜求了！！！