出库单怎么填写_出库单怎么填写记账凭证

出库单怎么填写1

出库单怎么填写_出库单怎么填写记账凭证

文章插图
1、正确填写入库产品的单位名称,注意这个单位名称是与本公司有合同关系或现金购买的销售方,而不是送货方如第三方物流公司或生产厂家;
2、正确填写入库单时间,一定与货物入库时间吻合;
3、据实填写货物的规格、型号、品名、单位、数量、单价、金额,与**金额一致;
4、合计金额为本页入库单的合计金额(大小写);
5、至少两人以上签名;
6、保证入库单号的连续性,如果不慎填错,需注明作废,但不要撕毁单据 。
熬了5天5夜,终于做好了全自动Excel进销存系统,带库存预警套用2熬了5天5夜,终于做好了全自动Excel进销存系统,带库存预警套用!马上月末要做库存盘点了,小企业的财务人员每到这个时候就有的忙了!要是加上月末的库存盘点工作,那不知道要加几天班了 。由于小企业业务少的原因,没有用专业的财务软件,自然做账库存盘点和对账就会有些困难!所以,我们财务总监熬了5天5夜,终于做好了全自动Excel进销存系统,自带库存预警!下面是详细的操作说明,有兴趣的瞅瞅~~
进销存软件(自动生成库存报表)上述进销存管理系统一共是12个表格做成的,包括供应商信息、产品信息、客户信息、进货明细、出库明细以及月库存报表统计等等,下面是详细的操作界面展示!
关于库存管理的供应商信息登记表
库存管理的客户信息管理表
库存管理相关的产品信息登记表(库存不足红色预警)
库存管理的入库单明细表填写
库存管理的出库单明细表填写
库存管理涉及的销售查询功能
库存管理涉及的月度统计分析报表(自动统计)
……今天整理的有关全自动excel进销存管理系统的操作说明,就到这里了 。
VBA代码、出库单模板3这是一个出库单模板,想要模板的可以去我公众号上下载 。
表1是用来开单
表2是用来保存数据的
实现功能:
我们点击开单按键就可以开单了,单号会根据当前时期加编号自动生成,如果今天开了一单再开一单编号就会是002这样累加上去 。
如果没有写内容就点击出库它是会有信息框提示,数据是不会被保存得 。同一个单号文件是不会被两次保存进数据库的 。
【出库单怎么填写_出库单怎么填写记账凭证】数据库里面会根据保存时间来显示日期 。
下面是代码分享
Sub 开单()
Dim sr As Range, sr2 As Range, shu%, sr3
Set sr = Union([p21], [p24:t28])
sr.ClearContents
Set sr2 = Sheets(数据).Cells(Rows.Count, h).End(xlUp)
sr3 = Format(Now, yyyymmdd)
If Left(sr2, 8) = sr3 Then
[p21] = Left(sr2, 8) & Format(Right(sr2, 3) + 1, -000)
Else
[p21] = Format(Now, yyyymmdd) & -001
End If
End Sub
Sub 出库()
Dim sr As Range, sr2 As Range, sr3 As Range, shu%
If Sheets(数据).Range(h:H).Find([p21]) Is Nothing Then
If [p24]Then
Set sr = Sheets(数据).Cells(Rows.Count, a).End(xlUp).Offset(1, 0)
Set sr2 = Sheets(开单).Range(p24, [t23].End(xlDown))
Set sr3 = sr2.Offset(0, -1).Resize(, 7)
sr3.Select
sr3.Copy sr
shu = sr3.Rows.Count
sr.Offset(0, 7).Resize(shu, 1) = [p21].Value
sr.Offset(0, 8).Resize(shu, 1) = [u21].Value
sr.Offset(0, 9).Resize(shu, 1) = Now
Else
MsgBox 请填写出库数据
End If
Else
MsgBox 你已保存、请重新开单
End If
End Sub
这个模板代码我就不每行来注解说明了,如果看不懂的可以留言 。如果你看完我前面分享的代码以上代码是可以看懂的 。因为我分享出来的代码都是一段段分享出来的,所做模板用的代码也是以前分享说明过的代码 。