以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 界面切换 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=39109) |
-- 作者:CRM2013 -- 发布时间:2013/8/15 16:48:00 -- 界面切换 请教一个问题:
在窗口的一个按钮调用excel模版并进入打印预览。但执行完代码后,foxtable窗口还是悬于桌面的最上层,需要到任务栏去点击excel图标才能切换到EXCEL打印预览界面,是否可以直接切换到excel打印预览界面?
|
-- 作者:狐狸爸爸 -- 发布时间:2013/8/15 16:57:00 -- 看看这个有没有帮助:
http://www.foxtable.com/help/topics/2713.htm
|
-- 作者:CRM2013 -- 发布时间:2013/8/15 17:43:00 -- 谢谢指点,试过了但无效,改用了foxtable窗口最小化
另外请教2个问题:教材2081页中pagesetup,
1:我想页眉锤子靠上 ,自己编了个.TopVertically = True 直接报错了 2:我不想打印excel网络线,但希望答应最外层边框线,该如何设置?谢谢!
.CenterVertically = True \'页面垂直居中 .PrintGridlines = True \'打印网格线 |
-- 作者:有点甜 -- 发布时间:2013/8/15 20:17:00 -- 楼主,我测试正常,是否可以有简单的例子可以测试? 参考下 设置边框颜色:sheet.Cells(1, 2).Borders.Color = color.red \'这个是红色,x后前两个0是蓝色,中间两个0是绿色,最后两个是红色~~ 设置制定边框:sheet.Range(sheet.Cells(1, 2), sheet.Cells(1 ,30)).Borders(4).LineStyle = 1 Border(4)是指下边框,3是指上边框,1是左,2是右~~填成0会报错.不加中括号是全部的边框~~~ 指定边框线宽度: xlSheet.Range("B3:D4").Borders(2).Weight = 3 \'1-左 2-右 3-顶 4-底 5-斜( / ) 6-斜( / ) [此贴子已经被作者于2013-8-15 20:17:07编辑过]
|