产品成本表模板

tonthen · 发表于 2013-1-22 21:37

一直在本网站取用资料，今天也上传一个本人几年前做的一个产品成本表，是个未完工版，公式很多没设，也没有数据，不泄密，呵呵。当然这个只是最终的成本核算结果表，计算过程应该还需要其他表格支持。

aliens · 发表于 2013-1-23 16:46

看了下,设计得不错,能不能把密保说一下啊

zjwww · 发表于 2013-1-23 19:21

下载看了一下，楼主制作得不错。赞！

lijian60 · 发表于 2013-1-24 11:38

不错，谢谢共享

tonthen · 发表于 2013-1-24 19:04

aliens 发表于 2013-1-23 16:46
看了下,设计得不错,能不能把密保说一下啊

首页E27单元格密码：2010，回车后点右边解除密码按钮，所有工作表解密码。

SEVENLEMON · 发表于 2013-1-28 21:48

你们的成本好复杂，是手工帐。

TOBO · 发表于 2013-1-28 15:46

不错，谢谢共享

scv · 发表于 2013-1-29 12:33

没有公式不好看懂。

zhufang622 · 发表于 2013-1-29 11:23

谢谢分享，好详细啊

mcy318 · 发表于 2013-1-29 12:39

本帖最后由 mcy318 于 2013-1-29 12:41 编辑

aliens 发表于 2013-1-23 16:46
看了下,设计得不错,能不能把密保说一下啊

Sub 加密()

Dim X As Integer
For X = 1 To Sheets.Count
Sheets(X).Protect Password:=1209
Next X
End Sub
Sub 解密()

If Range("E27") = "2010" Then
Dim X As Integer
For X = 1 To Sheets.Count
Sheets(X).Unprotect Password:=1209
Next X
Range("E27").Select
Selection.ClearContents
Range("M5").Select
Else
      Msg = "请输入正确的解密密码" ' Define message.
      Style = vbCritical + vbDefaultButton2 ' Define buttons.
      Response = MsgBox(Msg, Style, Title)
End If
End Sub

上面红字就是密码

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

[分享] 产品成本表模板