作者:电脑信息网日期:
返回目录:设置问题
1、按住快捷键win+R,打开运行命令,输入“regedit”,然后点击“确抄定”。
2、点击左边名为“HKEY_CLASSES_ROOT”文件。
3、展开后找到.docx的子目录,并点击它。
4、然后在右侧可以看到有个名为“默认”的文件,用鼠标右键点击它,然百后选择“修改”选项。
5、在数值数据度中,输入“Word.Document.12”,然后确定,这样就可以看到右键新建出现word了。
6、用同种方法添加excel,先找到文件子夹.xlsx,用鼠标右键点击名称为“默认”的文件,然后选择“修改”选项,在数值数据一栏,输入“Excel.Sheet.12”。
7、然后添加ppt的,同样,找到文件子夹.pptx,用鼠标右键点击名为“默认”的文件,选择“修改”选项,在数值数据一栏,输入“PowerPoint.Show.12”。
1、打开电脑的“控制面板”抄,点击“卸载程序”,找到”office软件袭“
3、鼠标右击”office软件“,点击“知更改”
4、选择”修复“,点击”继续“
5、修复中,需等待几分钟
6、修复完成后,点击”关闭“提示电脑重启才能生效,点击“是”,重启电脑
7、最后,刷新下电脑,等待10分钟左右,道excel和word就添加到新建菜单栏了
在宏编辑器下。选中ThisWorkbook,输入如下代码。
Private Sub Workbook_Open()
删除右键菜单
添加右键菜单
End Sub
新建一个模块,输入如下代码:
'------------------------------------------------------------------------分割线
Sub 添加右键菜单()
With Application.CommandBars("cell").Controls _
.Add(Type:=msoControlButton, _
temporary:=True)
.Caption = "功能1"
.FaceId = 986
.OnAction = "MyMacro1"
End With
'------------------------------------------------------------------------分割线
With Application.CommandBars("cell").Controls _
.Add(Type:=msoControlButton, _
temporary:=True)
.Caption = "功能2"
.FaceId = 931
.OnAction = "MyMacro2"
End With
'------------------------------------------------------------------------分割线
End Sub
'------------------------------------------------------------------------分割线
Sub 删除右键菜单()
'删除右键菜单,重置
Application.CommandBars("cell").Reset
End Sub
Sub mymacro1()
Application.Run "PERSONAL.xls!功能1"
End Sub
Sub mymacro2()
Application.Run "PERSONAL.xls!功能2"
End Sub
Public Sub 功能1()
'输入功能1的代码
End Sub
Public Sub 功能1()
'输入功能2的代码
End Sub
保存excel以后,关闭重新打开,右键即可看到效e68a84e799bee5baa6333果。