[已解决]请高手帮忙解决引用公式问题

yzg44 · 发表于 2012-3-13 22:40

提示: 作者被禁止或删除内容自动屏蔽

zjdh · 发表于 2012-3-14 07:50

Sub 打印()
Sheet1.PrintOut
Range("H5") = Format(Date, "yyyymmdd") & Format(Right(Range("H5"), 4) + 1, "0000")
MsgBox "已打印！"
End Sub

复制代码

yzg44 · 发表于 2012-3-14 09:18

提示: 作者被禁止或删除内容自动屏蔽

zjdh · 发表于 2012-3-14 10:14

每次打开文件自动判断单号中日期内容，非当日则序号自动调整为0001

记录2.rar (19.82 KB, 下载次数: 15)

yzg44 · 发表于 2012-3-14 10:32

提示: 作者被禁止或删除内容自动屏蔽

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

yzg44 yzg44 当前离线积分 0 IP卡狗仔卡	楼主\| 发表于 2012-3-13 22:40 \| 显示全部楼层工作中常用的Excel函数公式，全印在一张超大鼠标垫上提示: 作者被禁止或删除内容自动屏蔽
yzg44 yzg44 当前离线积分 0 IP卡狗仔卡
	回复使用道具举报显身卡
	工作中最常用的函数公式，全印在一张超大的鼠标垫上

yzg44 yzg44 当前离线积分 0 IP卡狗仔卡	楼主\| 发表于 2012-3-14 09:18 \| 显示全部楼层工作中最常用的Excel函数公式，全印在一张鼠标垫上提示: 作者被禁止或删除内容自动屏蔽
yzg44 yzg44 当前离线积分 0 IP卡狗仔卡
	回复使用道具举报显身卡

yzg44 yzg44 当前离线积分 0 IP卡狗仔卡	楼主\| 发表于 2012-3-14 10:32 \| 显示全部楼层提示: 作者被禁止或删除内容自动屏蔽
yzg44 yzg44 当前离线积分 0 IP卡狗仔卡
	回复使用道具举报显身卡