一个相当成熟的多用户不同权限登录系统

secowu · 发表于 2005-8-29 11:24

能多用户进行同时打开文件，进行操作，并且监视能在同一表里进行数据输入吗？

1353313808 · 发表于 2005-11-25 08:15

我也有类似的疑问,共享了会怎样呢,好象不支持啊,...老问题

又谁能解决这问题

我常常要做一个工作簿挂在校园网上供网上邻居各用户登陆输入资料,所以这共享尤其重要.....

source · 发表于 2005-11-25 10:59

全是些高手！！！

zhenxzha · 发表于 2005-11-25 11:47

将登录用户改成不用下拉的.把用户和密码放在另一表,

用户信息表放在C:\users\

附

67IHr5oR.zip (14.12 KB, 下载次数: 924)

[此贴子已经被作者于2005-11-25 11:48:06编辑过]

qqboy1 · 发表于 2005-11-30 11:30

以下是引用[I]ztj1967[/I]在2005-8-15 23:43:13的发言：[BR]
楼主：谢谢你传递的妙方！
不过，一打开就显示您的资料，这.....
能改吗？怎么改？
谢谢哦

当然可以了，将文件先运行一次，在“E:\作品\多用户权限登录”路径下找到“多用户登录.xls”，直接用这个Excel 文件就可以了。

qqboy1 · 发表于 2005-11-30 12:04

以下是引用[I]fokus[/I]在2005-8-29 11:19:47的发言：[BR]
不必封装，更方便
如何改进？？才能实现：
1。打开excel时自动显示登陆窗口。不显示其他界面。
2。输入密码后，“确定”后，直接进入到权限范围内的所有表的第一个。
这对我非常重要，请各位帮忙！！谢谢！！！！

第一个问题可以参考我上一个贴。第二个问题可以用这段功能代码实现： Sub 统计隐藏工作表个数vba代码() '本代码有QQBOY1提供，请试用。 Dim i, k As Byte For i = 1 To Sheets.Count If Sheets(i).Visible <> True Then k = k + 1 End If Next i MsgBox "本工作薄中隐藏工作表总数为 " & "个！" End Sub 给个思路，通过统计出隐藏的工作表数和总的工作表数（sheets.count），即可知道不同用户登陆后的第一个工作表的序号代码，用这条语句可以实现自动跳转：sheets(sheets.count-k+1).select 。请你自己完善一下。将代码放到 Private Sub CommandButton1_Click() 注册系统 Unload Me End Sub 里即可。

qqboy1 · 发表于 2005-11-30 12:05

以下是引用[I]ztj1967[/I]在2005-8-15 23:43:13的发言：[BR]
楼主：谢谢你传递的妙方！

不过，一打开就显示您的资料，这.....

能改吗？怎么改？

谢谢哦

当然可以了，将文件先运行一次，在“E:\作品\多用户权限登录”路径下找到“多用户登录.xls”，直接用这个Excel 文件就可以了。

liutqj · 发表于 2005-11-30 15:56

如何设置用户窗体属性

SWFWIND · 发表于 2005-11-30 17:12

非常感谢楼主！~~~

雨中过客 · 发表于 2005-11-30 18:42

有办法对工作表中的单列、行或多数列、行进行隐藏，如果要恢复隐藏要输入密码？

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

[分享] 一个相当成熟的多用户不同权限登录系统

浏览过的版块