以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]在预览窗口中只显示选定行的内容  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=99089)

--  作者:jumping
--  发布时间:2017/4/12 15:35:00
--  [求助]在预览窗口中只显示选定行的内容

向专家求助:

在下图中的窗口的表中(位置1),选定行,然后点击打印预览按钮,希望在弹出的预览窗口中(位置2)只显示选定的行的内容,而不是表中的全部,请教如何实现?多谢了!


图片点击可在新窗口打开查看此主题相关图片如下:图1.jpg
图片点击可在新窗口打开查看


--  作者:有点色
--  发布时间:2017/4/12 15:41:00
--  

 你可以先对表格进行筛选,然后再生成打印窗口。

 

1、表格显示复选框勾选数据

 

http://www.foxtable.com/webhelp/scr/1635.htm

 

2、点击打印前,筛选数据

 

Dim t As Table = Tables("表A")
Dim idxs As String = "-1,"
For Each r As Row In t.GetCheckedRows
    idxs &= r("_Identify") & ","
Next
t.Filter = "_Identify in (" & idxs.trim(",") & ")"