| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 2298 人关注过本帖
标题:请求解决用VFP代码在excel中使用ExecuteExcel4Macro方法出错的问题
只看楼主 加入收藏
yangmz
Rank: 2
等 级:论坛游民
帖 子:95
专家分:20
注 册:2013-4-2
结帖率:52%
收藏
已结贴  问题点数:20 回复次数:4 
请求解决用VFP代码在excel中使用ExecuteExcel4Macro方法出错的问题
我想隐藏excel2010的所有界面,只保留表格,百度了一下,以下这句在excel2010的VBA中可以实现,
Application.ExecuteExcel4Macro "SHOW.TOOLBAR(""Ribbon"",False)"

我改为VFP代码,均运行出错,请高手帮忙改一下代码。下面这句虽然没有出错,但没有产生效果
excelobj = Createobject("Excel.Application")

代码:
WITH excelobj
    .Visible =.T.
    .WORKBOOKS.add
    .ExecuteExcel4Macro('"SHOW.TOOLBAR(""Ribbon"",.f.)"')    &&没反应,没效果
endwith
搜索更多相关主题的帖子: 请求 VFP 代码 excel 出错 
2019-03-13 11:31
sdta
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:江苏省连云港市
等 级:版主
威 望:335
帖 子:9796
专家分:26886
注 册:2012-2-5
收藏
得分:10 
VFP 控制 EXCEL2003 之 003、真正的全屏显示数据
https://blog.bccn.net/sdta/65830
是否有帮助

坚守VFP最后的阵地
2019-03-13 11:59
yangmz
Rank: 2
等 级:论坛游民
帖 子:95
专家分:20
注 册:2013-4-2
收藏
得分:0 
这个可能对2003有用,经测试,在2010中没有用。
2019-03-13 12:39
antony521
Rank: 3Rank: 3
等 级:论坛游侠
威 望:1
帖 子:170
专家分:175
注 册:2009-8-20
收藏
得分:10 
EXCEL2016有用.改一下就能看到效果了.
oExcel=Createobject("Excel.Application")
With oExcel
    .WorkBooks.Add
    .DisplayFullScreen = .T.
    .CommandBars(1).Enabled = .F.
    .CommandBars("Full Screen").Controls(1).Onaction = "RestoreWindow"
    With .ActiveWindow
        .DisplayHeadings = .F.
        .DisplayHorizontalScrollBar = .F.
        .DisplayVerticalScrollBar = .F.
        .DisplayWorkbookTabs = .F.
    Endwith
    .Visible = .T.
Endwith
2019-03-13 13:09
yangmz
Rank: 2
等 级:论坛游民
帖 子:95
专家分:20
注 册:2013-4-2
收藏
得分:0 
有用,但是,一按“ESC”键就恢复原形了。
我试着去除这句后    .CommandBars("Full Screen").Controls(1).Onaction = "RestoreWindow"
还是一按“ESC”键就恢复原形了。

希望EXCEL一直能保持这种“干净”的状态,或者能在下次打开EXCEL时再恢复原形也行。
2019-03-13 13:24
快速回复:请求解决用VFP代码在excel中使用ExecuteExcel4Macro方法出错的问题
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.022263 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved