打开工作簿后如何只显示用户明细？

问：如何一个用户输入数据，但我不想让任何人看到整个Excel工作簿。简单来说，打开一个Excel文件后，只看到一个用户的权限，然后我通过这个用户合并输入数据。保存后，输入的数据存储在E xcel文件中。

答：以下是详细的实施过程。

首先，准确一个用户约定。

在VBE中，插入用户细分，并在其中添加控件，如下图所示。

编写代码：

子命令按钮1 _单击()。

米蒂阿朗

i=工作表(“工作表1”).范围(“A”&行。计数)。结束(xlUp)。排

Ifrange ("a1")="然后。

范围(“A1”)=文本框1。文本

其他的

我=我1。

范围(“A”& I)=文本框1。文本

以防万一

文本框1。Text=" "

文本框1。SetFocus

结束子级

描述：

将文本按顺序输入代码表1的a列。

然后，在Workbook_Open事件中编写代码。这样，当工作簿打开时，Workbook_Open事件中的代码会自动执行。

事实1:打开工作簿后，最小化工作簿界面，只显示用户细分。

子工作簿_打开()

最小化窗口。

申请。windowstate=xlminimize。

显示用户常量。

UserForm1。显示

结束子级

如果要在关闭用户基线后关闭工作簿，请在用户细分的关闭事件中添加以下代码：

子用户表单_查询关闭(取消为整数，关闭模式为整数)。

此工作簿。关闭

结束子级

当用户分段关闭时，Excel会提示用户是否保存对工作簿的修改，然后单击“是”保存工作簿并退出。

如果希望在关闭用户的预订时自动保存工作簿，请在用户的预订关闭事件中添加以下代码：

子用户表单_查询关闭(取消为整数，关闭模式为整数)。

此工作簿。关闭保存更改：=真。

结束子级

事实2:打开工作簿后，它被完全隐藏，只显示用户分区。此时，用户可以被重定向到用户输入界面，工作簿是存储和处理数据的平台。

子工作簿_打开()

隐藏工作簿。

申请。可见=假

显示用户常量。

UserForm1。显示

结束子级

此时，Excel将正在运行，要退出此Excel应用程序，必须结束其进程。

事实3:打开工作簿后，工作表被隐藏，但Excel程序界面仍显示，显示用户明细。

子工作簿_打开()

工作簿(“示例1.xls”).Windows(1)。可见=假

UserForm1。显示

结束子级

此时，最好将用户平均值中“保存”按钮的代码修改如下：

子命令按钮1 _单击()。

米蒂阿朗

工作簿(“示例1.xls”).Windows(1)。可见=真

i=工作簿(“示例1.xls”).工作表(“第1页”).范围(“A”&行。计数)。结束(xlUp)。排

Ifrange ("a1")="然后。

范围(“A1”)=文本框1。文本

其他的

我=我1。

范围(“A”& I)=文本框1。文本

以防万一

工作簿(“示例1.xls”).Windows(1)。可见=假

文本框1。Text=" "

文本框1。SetFocus

目标