请教大神Exce表格怎么自动生成送货单?

kuaidi.ping-jia.net  作者:佚名   更新日期:2024-06-25
大神,您好,我想用exce打出送货单,自动生成对账单的操作,希望能给我个具体点的教程学习下,万分感谢!

这个涉及要用vba。
第一步:要熟悉vba语言
第二步:可以着手自己写代码

很难用几句话说清楚啊,可以加我好友电话沟通一下

设置一个商品销售价格数据库,该数据库含有商品名称型号及对应销售价格(可以是含税或不含税),这里假设数据库中输入的是不含税单价。
然后,送货单假设品名在A3单元格,数量在B3单元格,将N9设置为不含税单价栏,在N9输入:=VLOOKUP(A3,SHEET1!$A:$B,2,0),在M9输入适用税率,在不含税总价栏C3输入:=B3*N9,在含税总金额输入:=ROUND(C3*M9,2)

其中,N9,M9单元格可以用送货单区域外任何空白单元格替代。

sheet1

sheet2

A1=LOOKUP(MOD(ROW(),4),{0,1,2,3},{"赠送数量:";"2016年送货单";"客户名称:";"赠送品种:"})

B1=INDEX(Sheet1!$A$2:$C$26,INT(ROW(A4)/4),MOD(ROW(A4),4))

两公式向下复制。

筛选出A列为2016年送货单"的行。选中A1:B1合并居中,把这个合并单元格向下复制,取消筛选,结果如下




用VBA代码最合适,建议使用。

送货单表是事先有?还是没有?

可用WORD的邮件合并功能或请高手用EXCEL VBA来解决

  • 请教如何实现Excel中自动复制、自动编号?
    答:(1)复制单元格A8(选取此单元格,鼠标右击--复制,不是复制单元格中的公式!);(2)将光标放在整个表格左上角的地址栏中,将A8改为B1200,回车(Enter键);(3)再按住Ctrl键+Shift键+左方向键←,继续再按一下上方向键↑,这时候表格出现了一部分阴影;(4)将光标箭头移动到此阴影中,右击---选择...
  • 请教大神Exce表格怎么自动生成送货单?
    答:筛选出A列为2016年送货单"的行。选中A1:B1合并居中,把这个合并单元格向下复制,取消筛选,结果如下
  • 请教一下各位大神关于Excel自动生成数据的两个问题
    答:按比例生成,可以使用RAND函数,根据其值小于0.2,大于等于0.2小于0.7,以及大于等于0.7来生成三种结果,当然这只是概率,数据量越大越接近,另外要注意的是随机数是不定的,只要有刷新,值就会变化。1000按比例分成三份,也要用随机函数,由于每份都有上下限,所以用公式法也比较复杂。
  • 合并单元格后,excel怎么自动生成文字序号
    答:1。A1空,然后选中除A1外所有A列你需要操作的区域,输入公式=COUNT($A$1:A1)+1,再按CTRL+ENTER,便可实现如下效果==此步骤可以实现合并单元格行数不一样时的数据自动填充 2。在B2输入公式="ZJ-2014-永久-"&""&A2,公式下拉,得到如下结果 3。用格式刷将A列格式刷到B列,即可实现你所要的结...
  • 关于Excel表格自动拾取数据的问题!向大神请教~~~
    答:1、打开带有带有数据的那张表格,在另外一个表格上的上打开你要自动对应结果的数据.2、打开你要对应的内容,如图,我要通过人名自动同步对应的绩效考核结果,确定了思路就可以进行下一步的操作了.3、在excel表格的上方找到 公式 菜单,打开公式菜单:在接下来找到 插入函数,通过这种方式找到的函数引用比较容易...
  • 在EXCEL表格里如何生成随机文字(字数3-5个字)
    答:二个办法:1、找网上字典,在一个列中粘贴N个不同的汉子,用VLOOKUP、OFFSET配合DANDBETWEEN随机函数即可 2、直接用CHAR配合DANDBETWEEN随机函数即可,但是前提是你要知道一部分汉子的代码区域
  • 请教各位大神,EXCEL收据明细数据记录,如何把这些明细记录自动生成一张一...
    答:1.对原数据表构建唯一代码。在原表前插入两列,如图在A2输入1 在A3输入公式=IF(C3=C2,"",LOOKUP(999^10,$A$2:A2)+1) 往下复制公式 ;在B2输入1#1 在B3输入公式=IF(C3=C2,MID(B2,1,FIND("#",B2,1))&MID(B2,FIND("#",B2,1)+1,2)+1,A3&"#"&ROW(A1)) 往下复制...
  • 请教EXCEL 大神,想做一个智能表格。
    答:通过窗体在sheet1添加一个按钮,新建,将以下代码复制粘贴,然后回到sheet1,点击按钮,将会自动在sheet2形成你所要的汇总表格。Sub 按钮1_单击()Sheet2.Range("a:e").ClearContents Sheet1.Range("a1:e1").Copy Sheet2.Range("a1:e1").PasteSpecial Paste:=xlPasteValues Application.CutCopyMode =...
  • 关于Excel表格中自动录入对应工作表中
    答:每个人的表如果手工建的话,用公式很好解决。在每个人分表中用VLOOKUP就可以获取主表中的数据。(如果是要自动生成每个的表,就要用VBA了。)例如:总表如下:每个人的表如下:B1~B3都是公式生成的 获得表名(也就是人名):B1 =MID(CELL("filename",$B$1),FIND("]",CELL("filename",$B$1...
  • 请教Excel大神如何实现横向拖动时自动递增计算纵向数据?
    答:=INDIRECT("B"&COLUMN(A1)+99)+INDIRECT("F"&COLUMN(A1)+99)