Sub delMbar()
Dim mxlb As String
mxlb = Environ("appdata") & "\microsoft\excel\*.xlb"
If Dir(mxlb) <> "" Then
Kill mxlb
End If
End Sub
Excel删除加载项内自定义工具菜单
猜你喜欢
转载自blog.csdn.net/yueliang2100/article/details/103237605
今日推荐
周排行