Tag: 命令栏

Excel VBA删除右键单击“粘贴选项”菜单组在单元格中编辑

我需要使用VBA从Excel 2010中右键单击菜单中删除“粘贴选项”。 我可以删除所有不需要的“正常”控制项目(例如“Cu&t”,“&Copy”,“Paste&Special …”等),但不能删除“Paste Options”图标的孩子。 我也从Excel文件 – >选项 – >高级 – >剪切复制粘贴中删除了“粘贴选项”,但是这对右键点击“粘贴选项”没有影响。 我已经search了很高的解决scheme,但在networking上的任何地方都找不到这个地方。 我还检查了VBA“本地”窗口中的CommandBar对象,并查看了所有的属性,并且看不到“粘贴选项”所在的位置。 先谢谢你

VBA – 对象'_CommandBarComboBox'的方法'列表'失败

我有一个VBA中的子调用另一个子来执行一些数据分析,如果用户粘贴在下面的错误代码为: 运行时错误'2147467259(80004005)':对象'_CommandBarComboBox'的方法'列表'失败 Private Sub Worksheet_Change(ByVal Target As Range) Dim UndoList As String UndoList = Application.CommandBars("Standard").Controls("&Undo").List(1) 'Errors Here! If Left(UndoList, 5) = "Paste" Then Dim Annotations() As String FindAnnots End If End Sub 任何想法,为什么对象的列表不存在?

如何获得“数据validation”CommandBarButton对象?

我需要隐藏数据validationbutton,当用户切换到特定的工作表,但我无法在Application.CommandBarsfind此button。 我试图循环出所有的CommandBar对象及其控制名称,但仍然没有find,有没有人试过这个?

Excel 2013 VBA CommandBar下拉列表空

我有一个旧的Excel加载项使用带有一些VBA代码和用户界面的xla文件,通过窗体,以及处理与服务器的通信的DLL的问题。 加载项下载数据并将其插入到活动的Excel工作表中。 此应用程序是为Office 97编写的,并且在所有版本的Excel上运行良好,除了(某些安装的)Excel 2013以外。实际上,应用程序也可以在Excel 2013中正常工作,除了一点细节。 有几个下拉列表(CommandBarComboBox)应该在工作表加载数据时加载一些信息,但这在所有Excel 2013安装中都不起作用。 例如在我自己的Excel 2013(32位)中,会发生这种情况: 案例1:我在C:\ Windows中安装了dll,在Office 2013的XLStart文件夹中安装了xla文件。下拉列表为空。 案例2:我在C:\ Windows中安装了dll,XLStart中没有xla文件。 相反,我从开始菜单(我正在运行64位Windows 7)启动Excel后打开xla文件。 打开后,我被问到是否要在我已经加载的文件中启用macros。 回答是和下载的数据后,我有下拉列表中的信息。 任何想法的人?

为什么我不能使用VBA在Excel 2013中编辑命令行控件?

我正在试图通过VBA来为数据透视表做我自己的钻取操作。 该操作将从其他操作的数据透视表的上下文菜单中调用。 我想把我的button下数据透视表上下文菜单命令栏的附加操作控制。 重点是默认附加操作已经包含(没有操作定义)项目。 所以,我想删除这个(没有行动定义)后添加我的button,但没有任何工作。 我甚至无法更改(无操作定义)控件的任何属性,如Caption,Visible等。可能是什么原因,以及解决方法是什么? 这里是我的代码到目前为止(例如,你可以把它放在Workbook_SheetBeforeRightClick,然后testing该工作簿中的任何数据透视表): Dim PCell As PivotCell Dim PComBar As CommandBar Dim PControl As CommandBarControl Dim DControl As CommandBarControl Dim BControl As CommandBarControl Dim IsFromPivotTable As Boolean IsFromPivotTable = False On Error GoTo NotFromPivot Set PCell = Target.PivotCell IsFromPivotTable = True NotFromPivot: On Error GoTo 0 If IsFromPivotTable Then Set PComBar […]

禁用或删除右键菜单VBA

每当我右键单击Excel工作表时,会出现两个菜单:一个是剪切,复制,粘贴等,另一个是字体大小,粗体,斜体等。 我可以自定义第一个有我想要的任何命令。 我遇到的问题是我想禁用或删除第二个(字体大小,粗体,斜体等) 我尝试通过整个CommandBars集合,但无法find我需要删除的那个。 任何想法如何实现这一目标?