以文本方式查看主题 -  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp) --  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2) ----  打印当前行  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=152875)

--  作者：15666282205 --  发布时间：2020/7/24 10:47:00 --  打印当前行 老师，我设计的打印，以前是根据逻辑列选中的就打印，现在想改为不按逻辑列，按光标所在的当前行，只打印当前行，请指教。 Dim Filter As String Filter = Filter & "打印 = True" If Filter > "" Then     Tables("打印现金日记账_table1").Filter = Filter End If

--  作者：有点蓝 --  发布时间：2020/7/24 11:23:00 --   去掉execl模板里的<ALL>即可

--  作者：15666282205 --  发布时间：2020/7/24 12:04:00 --   老师，我没用模板，只是选其中的一行打印。以前是根据逻辑列，选中的就打印，现在想改为不按逻辑列，光标在哪一行就打印哪一行，也就是当前行。

--  作者：有点蓝 --  发布时间：2020/7/24 12:20:00 --   什么方式的打印？ Tables("打印现金日记账_table1").Filter = "_Identify =" & Tables("打印现金日记账_table1").current("_Identify")

--  作者：15666282205 --  发布时间：2020/7/24 14:10:00 --   老师，这个代码不大行。我设计的方法是：在新窗口建立一个副本，只显示主表的当前行，然后打印这一行。现在的问题是，怎么让副本只显示主表里的当前行。

--  作者：15666282205 --  发布时间：2020/7/24 14:17:00 --   我想起来了，也可以只用文本框关联来实现，我试试

--  作者：有点蓝 --  发布时间：2020/7/24 14:20:00 --   Tables("打印现金日记账_table1").Filter = "_Identify =" & Tables("某主表").current("_Identify")

--  作者：15666282205 --  发布时间：2020/7/24 14:34:00 --   可以解决，一个缺点就是，关联到金额时，打印出来不默认两位小数，稍微不大规范。如果您有好方法请指教。

--  作者：有点蓝 --  发布时间：2020/7/24 14:39:00 --   怎么做的打印？