怎样将入库单打印完成后对应到数据表中？

晨风99 · 发表于 2009-4-6 08:33

请帮忙看一下，感激！！

zez · 发表于 2009-4-6 09:21

不懂什么是“对应到数据表中”

晨风99 · 发表于 2009-4-6 09:33

帮忙看一下，就是把入库单的数据记录到数据表中。

zez · 发表于 2009-4-6 10:02

将入库单打印完成后对应到数据表中

晨风99 · 发表于 2009-4-6 13:36

十分谢谢！

jygzcj · 发表于 2009-4-6 15:09

意思就是打印完了就自动扣减相关的参数就像发贴完毕自动加钱一样吧，是这个意思吧

songzongg · 发表于 2009-4-11 20:01

怎么做到的?能详细介绍一下方法吗?有相关的教程吗?谢谢

zez · 发表于 2009-4-11 20:57

原帖由 songzongg 于 2009-4-11 20:01 发表
怎么做到的?能详细介绍一下方法吗?有相关的教程吗?谢谢

写了一段代码：
Sub 按钮1_单击()
Dim Na As Integer, Nb As Integer, Nc As Integer
ActiveWindow.SelectedSheets.PrintPreview
Na = Sheet2.[A65536].End(xlUp).Row + 1
For Nb = 5 To 17
      If Cells(Nb, 1) = "" Then Exit For
      Sheet2.Cells(Na, 1) = [D3]
      For Nc = 1 To 3
         Sheet2.Cells(Na, Nc + 1) = Cells(Nb, Nc)
      Next
      Na = Na + 1
Next
Range("A5:D17").ClearContents
End Sub

songzongg · 发表于 2009-4-12 00:34

我是新手,看不大懂.手上正好有一个文件也类似.就是要把"记帐凭证"的内容加到"总表"并可以反向查询、打印，不知可否帮忙看一下怎么做？谢谢

ggjj.rar (8.48 KB, 下载次数: 66)

zez · 发表于 2009-4-12 09:08

原帖由 songzongg 于 2009-4-12 00:34 发表
我是新手,看不大懂.手上正好有一个文件也类似.就是要把"记帐凭证"的内容加到"总表"并可以反向查询、打印，不知可否帮忙看一下怎么做？谢谢
492494

没有找到你的"总表"。如果是“记帐凭证总表”的话。你的数据不相对应，记帐凭证总表里没有附件张数；记帐凭证里没有单位编号和所属单位。这样要反向查询、打印就做不到

		自动登录	找回密码
密码			免费注册

[求助] 怎样将入库单打印完成后对应到数据表中？

感谢！

回复 4楼 zez 的帖子

回复 8楼 zez 的帖子