excel中如何将一个工作簿的内容保存到另一个工作簿上
这个问题真不太好描述,上图吧:如上图,这是我自制的一个销售单.我想要把销售单里输入的数据:如客户、日期、品名、颜色、数量、单价、金额、物流这些信息保存在下面这张出货明细上...
这个问题真不太好描述,上图吧:
如上图,这是我自制的一个销售单.我想要把销售单里输入的数据:如客户、日期、品名、颜色、数量、单价、金额、物流这些信息保存在下面这张出货明细上面。我需要怎么做？
一定要认清，销售单因为要打印，所以数据输入后并不会直接保存在此簿上！但由于公司还要做电子账，所以出货明细那儿必须永久保存每一天的出货情况！
请高手指点，事后追加高分，因为现在只能最悬赏100分。谢谢了！ 展开
如上图,这是我自制的一个销售单.我想要把销售单里输入的数据:如客户、日期、品名、颜色、数量、单价、金额、物流这些信息保存在下面这张出货明细上面。我需要怎么做？
一定要认清，销售单因为要打印，所以数据输入后并不会直接保存在此簿上！但由于公司还要做电子账，所以出货明细那儿必须永久保存每一天的出货情况！
请高手指点，事后追加高分，因为现在只能最悬赏100分。谢谢了！ 展开
展开全部
用宏。在打印前触发程序运行。将各项信息复制进汇总（出货明细）表中。
Private Sub Workbook_BeforePrint(Cancel As Boolean)
dim sh1 as worksheet,sh2 as worksheet
set sh1=sheets("打印销售单")
set sh2=sheets("出货明细")
with sh2
i=.[a65536].end(3).row+1 '获取明细表的最后一行，再加1,赋值给变量i
j=worksheetfunction.counta(sh1.range("A7:a17") '计算 打印表的A7:A17有多少个品名
.range("A"&i &":A"&i+j-1)=sh1.[I5] '将打印表的I5赋值给明细表的i行，A列，以下类似
.range("B"&i &":b"&i+j-1)=sh1.[B4]
.range("C"&i &":c"&i+j-1)=sh1.[I4]
sh1.range("A7:A"&i+j-1).copy .range("D"&i) '将所有品名复制到明细表的D列,以下类似
sh1.range("E7:E"&i+j-1).copy .range("E"&i)
sh1.range("G7:G"&i+j-1).copy .range("F"&i)
sh1.range("I7:I"&i+j-1).copy .range("G"&i)
end with
End Sub
更多追问追答
追问
不好意思，我试了下还是不知道怎么操作。
这个宏怎么新建？新建后是不是直接复制你的代码就可以了？谢谢啊
追答
ALT+F11.双击thisworkbook。粘贴上面的代码。
打印试试。无有不对，我再看看提示什么问题。
因为代码纯手打，未经过表格测试。
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
展开全部
1、同时打开两份工作簿
2、在sheet栏位右键，选择移动和复制
3、选择待接受的工作簿，勾选建立副本
4、确定
2、在sheet栏位右键，选择移动和复制
3、选择待接受的工作簿，勾选建立副本
4、确定
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
展开全部
你很有诚意。我可以告诉你。这个是可以做到的。不过有两点提请注意：
第一、如果把这两个表坐在两个工作表，而不是工作簿，是否可以？
第二、如果是录入出货明细，自动生成销售单，并可以打印，是否可以？
如果以上两个问题，都是肯定回答。那么我就可以接受这个任务了。
第一、如果把这两个表坐在两个工作表，而不是工作簿，是否可以？
第二、如果是录入出货明细，自动生成销售单，并可以打印，是否可以？
如果以上两个问题，都是肯定回答。那么我就可以接受这个任务了。
更多追问追答
追问
可以，完全可以，这个一样达到我的目的，谢谢！怎么搞，劳烦，事后再加100分
追答
我是打算使用输入公式的办法。将销售单中的单号和出货明细中的数据关联起来，只要输入单号，就可以带出对应出货明细中的数据，自动填充在相应的表格中。
只是如何取得你的文件。我输入公式，做完发给你。
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
更多回答（1）
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
