经KCFONG用VBA修改7次的EXCEL(仓库进销存系统）

fanchl8109 · 发表于 2010-6-13 14:29

好东东顶一下

KCFONG · 发表于 2010-6-13 14:32

SEE IF FIT YOUR REQUEST

handsomcao · 发表于 2010-6-13 16:00

刘佳佳的密码szmicrolys，真正的无私共享

[ 本帖最后由 handsomcao 于 2010-6-13 16:03 编辑 ]

handsomcao · 发表于 2010-6-13 16:02

Private Sub CommandButton1_Click() '''''''系统登陆确定按钮
Application.ScreenUpdating = False
If Me.ComboBox1.Text = "" Then GoTo LINE10:
Sheet9.Range("A2").Value = Me.ComboBox1.Text
If Me.TextBox1.Text = Sheets("系统设置").Cells(2, 2).Value Then
   MsgBox Me.ComboBox1 & " ，欢迎你使用本系统！", vbInformation, "系统提示"
      Unload Login
      Unload frmFace
      Application.Visible = True
Else
LINE10:
      MsgBox "密码错误,你无权使用本系统!", vbExclamation, "系统提示"
      ThisWorkbook.Close savechanges:=False
  End If
  Application.ScreenUpdating = True
End Sub

gsxxjd · 发表于 2010-6-13 16:23

学习了，我正学习vba

yixiaochong · 发表于 2010-6-13 16:30

学习了，多指导

可爱76 · 发表于 2010-6-13 20:21

收藏学习

hyd1205 · 发表于 2010-6-19 18:34

那个汇总表很不错啊，可以任意选择日期。
但在做出入库单据录入时，是不是有些费劲啊？我想只有对材料编码非常熟悉的人才能应用自如吧？要是在材料编码单元格双击后能出来材料编码相关明细信息的话就方便多了,只要用鼠标点击就OK了。

我在论坛搜索到一个这样的材料编码录入方法：可看附件的图片。
http://club.excelhome.net/viewth ... =%BD%F8%CF%FA%B4%E6

KCFONG · 发表于 2010-6-19 22:05

Thanks to 38/F

hyd1205 · 发表于 2010-6-20 09:11

期待你做好后的结果啊。

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

[分享] 经KCFONG用VBA修改7次的EXCEL(仓库进销存系统）

第三版不错

代码是

回复 32楼 KCFONG 的帖子

回复 39楼 KCFONG 的帖子