以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  怎么调用狐表的excel word报表设计器  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=139161)

--  作者:淡月斜阳
--  发布时间:2019/8/7 9:43:00
--  怎么调用狐表的excel word报表设计器
怎么调用狐表的excel报表设计器,
要能修改上半部分的字段列表项目
图片点击可在新窗口打开查看此主题相关图片如下:qq图片20190807094239.png
图片点击可在新窗口打开查看

--  作者:有点蓝
--  发布时间:2019/8/7 9:46:00
--  
这个设计器无法做任何修改,只能使用。也无法通过代码调用
--  作者:淡月斜阳
--  发布时间:2019/8/7 9:52:00
--  
那么,我自己做一个设计器,就是仿照做一个窗体,
目前加了两个按钮,按钮一是打开文件:
Vars("PrintExcelFileApp") = New MSExcel.Application
Vars("PrintExcelFileAppWorkBook") = Vars("PrintExcelFileApp").WorkBooks.Open("C:\\Users\\Administrator\\Desktop\\a.xlsx")
按钮二:
Dim app = Vars("PrintExcelFileApp")
app.visible=True
\'隐藏主界面
BaseMainForm.WindowState =1
Dim Ws As MSExcel.WorkSheet = Vars("PrintExcelFileAppWorkBook").WorkSheets(1)
Ws.activate
Dim Rg =app.ActiveCell 
Rg.Value="c"

现在的问题是: 怎么能像官方的设计器一下,让这个窗体始终在 这个excel文件上层漂着。
现在是一点按钮,这个excel就不见了,焦点就回到了窗体上。


--  作者:有点蓝
--  发布时间:2019/8/7 9:56:00
--  
这个在Foxtable里面做不到。

官方的execl辅助设计器是使用vs开发的一个office插件。并不是随便做个窗口都可以的

--  作者:有点蓝
--  发布时间:2019/8/7 10:01:00
--  
或者把这个窗口设置为独立窗口,设置一下e.Form.baseform.Topmost = True,这个窗口就可以在桌面的最顶层了