精华内容
下载资源
问答
  • VBA只显示用户窗体,不显示EXCEL

    千次阅读 2014-12-26 14:57:47
    如果你的VBA没有显示这个管理器,可以用CTRL+R将它调出;接着在弹出的代码编辑器里面输入: Private Sub Workbook_Open() Application.Visible = False UserForm1.ShowEnd Sub excel打开没反应的处理 按住SHIFT再...

    工程资源管理器那里点开“ThisWorkBook”;如果你的VBA没有显示这个管理器,可以用CTRL+R将它调出;接着在弹出的代码编辑器里面输入:

    Private Sub Workbook_Open()
        Application.Visible = False
        UserForm1.Show
    End Sub

     

     

    excel打开没反应的处理

    按住SHIFT再打开EXCEL文件,找到你那个PERSONAL.XLS,删除里面的代码,或者在电脑里找到这个文件,直接改名或者删除

    默认路径在:C:\Documents and Settings\你的登录名\Application Data\Microsoft\Excel\XLSTART

    展开全文
  • VBA 用户窗体的认识

    2020-08-18 21:19:49
    今天学的是VBA用户窗体~可算到这里来,有点以前大学学VB的味道了 一、插入新的用户窗体 插入用户窗体很简单啦,在VBE的工程下右击选择插入——用户窗体就可以了。 如果下面这个工具箱关闭了,可以在菜单栏的...

    今天学的是VBA用户窗体~可算到这里来,有点以前大学学VB的味道了

     

    一、插入新的用户窗体

    插入用户窗体很简单啦,在VBE的工程下右击选择插入——用户窗体就可以了。

    如果下面这个工具箱关闭了,可以在菜单栏的视图里面调出来

    二、认识工具箱中的控件

    我们根据这张图,从上到下依次说一下:

    第一排:

    ①箭头:移动按钮,可以移动其他控件

    ②标签:Label,只显示文本

    ③文本框:TextBox输入文本的

    ④复合(组合)框:Combox 与ListBox不同,允许输入没有出现的值

    ⑤列表框:ListBox 列表

    ⑥复选框:CheckBox,选中为True。

    ⑦单选框:OptionButton,单选啦选中后其他的就不会被选中

    ⑧切换框:ToggleButton

    第二排

    ①框架:Frame,一般用来把单选框框住

    ②命令:CommandButton,

    ③TabStrip:

    ④多页:MultiPage

    ⑤滚动条:ScrollBar

    ⑥旋转按钮:

    ⑦图像:Image

    ⑧RefEdit

    命名约定(就是控件名字太长了,一般大家都这样简写):

     

    三、基本操作

    ① 要显示用户窗体的话,可以在模块中这样设置:

    Sub showForm()
        UserForm1.Show
    End Sub

    这样的窗体是模态化的,也就不能点击EXCEL其他地方做其他事,不是很方便,非模态化只需要这样操作:

    Sub showForm()
        UserForm1.Show vbModeless
    End Sub

    还可以通过变量进行显示:

    Sub showForm()
        Dim myForm As String
        myForm = "UserForm1"
        UserForms.Add(myForm).Show vbModeless
    End Sub

    ② 加载用户窗体

    如果用户窗体比较复杂,需要较长时间显示的话,可以把它先加载到内存中去,这样下次显示窗口操作就很快了,当然了这个操作本身不会显示出窗体

    Load UserForm1

    ③ 关闭用户窗体

    虽然上面的加载用户窗体操作不会显示窗体,但是卸载窗体动作是会关闭窗体的哟,比如这样:

    Unload UserForm1

    如果是在窗体本身中运行,可以直接用Me

    Unload Me

    如果只是想隐藏窗口的话,程序还在后台运行的话,可以这样:

    UserForm1.Hide

    也可以这样

    Me.Hide

    四、简单示例

    录入个人信息,比如画了这样一个框框,在框框里输入完了就写入到工作表上的下一个空行去,怎么实现呢?

    其实就点写入的时候进行了操作,所以只需要再点击“写入”这个按钮时才进行了一系列操作,具体代码如下:

    Private Sub CommandButton1_Click()
        Dim blankRow As Long
        Dim name As String
        Dim gender As String
        
        If Me.TextBox1.Text = "" Then MsgBox "请输入姓名"
        If Me.OptionButton1.Value Then gender = "男"
        If Me.OptionButton2.Value Then gender = "女"
        If Me.OptionButton3.Value Then gender = "不知道"
    
        name = Me.TextBox1.Text
    
        blankRow = Sheets("Sheet1").Range("A1048576").End(xlUp).row + 1
        Sheets("Sheet1").Range("A" & blankRow).Value = name
        Sheets("Sheet1").Range("A" & blankRow).Offset(0, 1).Value = gender
        
        Me.TextBox1.Text = "" 
    End Sub
    
    Private Sub CommandButton2_Click()
        Unload Me
    End Sub

    CommandButton1:写入按钮

    CommandButton2:退出按钮

    TextBox1:姓名边上的输入框

    OptionButton1~3:性别

     

    明天继续学啦~

    展开全文
  • 有时候当我们打开excel,没有看到常规的显示工作表界面,而是只显示了用户窗体。这是怎么实现的呢?...只显示用户窗体方法一: Private Sub Workbook_Open() ThisWorkbook.Windows(1).Visible = Fals

    有时候当我们打开excel,没有看到常规的显示工作表界面,而是只显示了用户窗体。这是怎么实现的呢?我们可以通过VBA代码来进行。

      按下ALT+F11,打开VBE编辑器,下面所有代码都位于ThisWorkBook中:

    只显示用户窗体方法一:
    Private Sub Workbook_Open()
    ThisWorkbook.Windows(1).Visible = False
    UserForm1.Show
    End Sub
      说明:这个方法可以隐藏工作簿和工作表,但工具栏、标题栏等程序界面仍显示,并且在关闭窗体后,工作簿不会恢复显示(除非增加恢复的代码)。
     
    只显示用户窗体方法二:
    Private Sub Workbook_Open()
    Application.WindowState = xlMinimized
    UserForm1.Show
    End Sub
      说明:这个方法可以隐藏整个Excel程序界面,只在任务栏里显示。关闭用户窗体后可以点击任务栏图标恢复Excel窗口的显示。
     
    只显示用户窗体方法三:
    Private Sub Workbook_Open()
        Application.Visible = False
        UserForm1.Show
    End Sub
      说明:这个方法可以真正隐藏整个Excel程序界面。关闭用户窗体后仍不会显示Excel窗口,只有从进程管理器中关闭Excel进程才能完全退出。
    展开全文
  • VBA研究】如何防止用户关闭窗体

    千次阅读 2016-01-18 16:45:19
    VBA开发中经常用到窗体,这样界面可以做的漂亮一点,我们甚至可以关闭Excel应用窗口,保留我们自己的窗口,需要启动时增加关闭应用显示语句。虽然Excel应用窗口不显示,但不影响工作表的使用,依然可以在工作表...

    iamlaosong文

    VBA开发中经常用到窗体,这样界面可以做的漂亮一点,我们甚至可以关闭Excel应用窗口,只保留我们自己的窗口,只需要启动时增加关闭应用显示语句。虽然Excel应用窗口不显示,但不影响工作表的使用,依然可以在工作表中读写数据。启动窗体语句如下:

    Private Sub Workbook_Open()
        Application.Visible = False
        UserForm1.Show
    End Sub
    

    显示自己的窗口后,一般不希望用户点击“X”直接关闭窗体,而是希望用户点击指定的按钮关闭,因为常常需要在关闭系统请做一些数据处理。

    当用户点击“X”直接关闭窗体时,会激发UserForm_QueryClose事件,可以在这个事件中阻止窗体关闭,代码如下:

    Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
             If CloseMode = 0 Then Cancel = 1
    End Sub
    

    Closemode的值为0(vbFormControlMenu)表示用户在 UserForm上选择“控制”菜单中的“关闭”命令。----就是点击右上角的叉的情况。

    Closemode的值为1(VbFormCode)表示由代码调用 Unload 语句关闭窗体。----知道 userform.show么?有show方法也有卸载窗口的unload语句,在用unload userform1来卸载窗口的时候 closemode的值为1。

    此外,Closemode的值还有2(vbAppWindows)当前窗口操作环境对话正在结束;3(vbAppTaskManager)“任务管理器”窗口正在关闭应用程序;4(vbFormMDIForm)一个MDI子窗体因为MDI窗体正在关闭而关闭。

    Cancel 参数是个Integer值(整数值),在VBA里面0值表示False 非零值表示True,当Cancel值为True的时候表示当前关闭操作被终止,也就是说窗口是不被允许关闭的。

    注意:Cancel=True表示不允许用户关闭。


    展开全文
  • 学习资源:《Excel VBA从入门到进阶》第59集 by兰色幻想四、筛选数据筛选数据需要配合循环和判断 , 把...弟弟①初始化用户窗体的代码:Private Sub UserForm_Initialize() Dim i, d As Object, arr Set d = Creat...
  • 01003获取当前用户名称 01004获取注册组织名称 01005获取当前操作系统的名称和版本号 01006获取启动Excel的路径 01007获取打开Excel文件时的默认路径 01008获取模板保存的默认路径 01009获取库文件夹的路径 01010...
  • 学习资源:《Excel VBA从入门到进阶》第59集 by兰色幻想四、筛选数据筛选数据需要配合循环和判断 , 把...弟弟①初始化用户窗体的代码:Private Sub UserForm_Initialize() Dim i, d As Object, arr Set d = Creat...
  • Excel VBA与数据库整合应用范例精讲

    热门讨论 2011-10-29 18:48:38
    实例3-44 利用窗体实现记录的分页显示 第4章 编辑Access数据库数据 实例4-1 添加新记录(ADO+AddNew) 实例4-2 添加新记录(ADO+SQL) 实例4-3 添加新记录(DAO+AddNew) 实例4-4 添加新记录(DAO+SQL) 实例4...
  • 实例3-44 利用窗体实现记录的分页显示 第4章 编辑Access数据库数据 实例4-1 添加新记录(ADO+AddNew) 实例4-2 添加新记录(ADO+SQL) 实例4-3 添加新记录(DAO+AddNew) 实例4-4 添加新记录(DAO+SQL) 实例4...
  • 1.本表由VBA编码制作而成,用户使用本模板时需启动宏,工作表中带有公式的单元格不要去更改,本工作簿需要用户将基础信息录入进来,方便入库单和出库单的信息录入。 2.入库单,出库单,退货单中供应商和客户的信息都...
  • 本书分为12章,涵盖了使用Access 2003来设计数据库系统的相关概念与技巧,通过实例让读者轻松学会表、查询、窗体、数据访问页的制作,更有宏、控件、VBA等高级应用知识等待你去探索。 本书理论与实践相结合,解说...
  • 本书分为12章,涵盖了使用Access 2003来设计数据库系统的相关概念与技巧,通过实例让读者轻松学会表、查询、窗体、数据访问页的制作,更有宏、控件、VBA等高级应用知识等待你去探索。 本书理论与实践相结合,解说...
  • 本书分为12章,涵盖了使用Access 2003来设计数据库系统的相关概念与技巧,通过实例让读者轻松学会表、查询、窗体、数据访问页的制作,更有宏、控件、VBA等高级应用知识等待你去探索。 本书理论与实践相结合,解说...
  • 数据库课程设计人力资源管理系统

    热门讨论 2009-11-27 18:51:50
    主界面是整个系统的核心,主要是显示出这个管理软件的各个功能按纽,只要用户点击其中的一个按纽,就能够弹出相应的窗口进入操作。主要有十三个功能按纽,分别是:员工信息编辑,调动信息编辑,奖惩信息编辑,员工...
  • 其中功能窗体显示区(NoTaskbar)功能可设置本工具启用的窗体图标是否在状态栏显示,并允许切换功能。 扩 展 工 具 【屏幕截图】 可以截取屏幕任意一区域并复制或另存为图片,可随意更改大小,操作灵活性特强。 【屏幕...
  • EXCEL集成工具箱V6.0

    2010-09-11 01:44:37
    其中功能窗体显示区(NoTaskbar)功能可设置本工具启用的窗体图标是否在状态栏显示,并允许切换功能。 扩 展 工 具 【屏幕截图】 可以截取屏幕任意一区域并复制或另存为图片,可随意更改大小,操作灵活性特强。 ...
  • 其中功能窗体显示区(NoTaskbar)功能可设置本工具启用的窗体图标是否在状态栏显示,并允许切换功能。 扩 展 工 具 【屏幕截图】 可以截取屏幕任意一区域并复制或另存为图片,可随意更改大小,操作灵活性特强。 ...
  • 其中功能窗体显示区(NoTaskbar)功能可设置本工具启用的窗体图标是否在状态栏显示,并允许切换功能。 扩 展 工 具 【屏幕截图】 可以截取屏幕任意一区域并复制或另存为图片,可随意更改大小,操作灵活性特强。 ...
  • 其中功能窗体显示区(NoTaskbar)功能可设置本工具启用的窗体图标是否在状态栏显示,并允许切换功能。 扩 展 工 具 【屏幕截图】 可以截取屏幕任意一区域并复制或另存为图片,可随意更改大小,操作灵活性特强。 ...
  • Excel百宝箱9.0无限制破解版

    热门讨论 2012-02-03 19:05:29
    VBA窗体帮助信息查询】:窗体相关的VBA帮助查询,包括事件、方法、属性、对象、集合与控件 【函数运算符符语法查询】:VBA函数以及运算符相关的帮助查询 【反向选择】:选择当前区域中未选择的区域 【千年日历】:工...
  • Excel百宝箱

    2012-10-27 17:09:21
    VBA窗体帮助信息查询】:窗体相关的VBA帮助查询,包括事件、方法、属性、对象、集合与控件 【函数运算符符语法查询】:VBA函数以及运算符相关的帮助查询 【反向选择】:选择当前区域中未选择的区域 【千年日历】:工...
  • PROJECT 2007宝典 9/9

    2012-04-01 19:13:00
     3.8.3 显示和隐藏任务   3.9 获取帮助   3.9.1 使用帮助系统   3.9.2 查找联机帮助   3.10 小结   第4章 建立任务   4.1 为任务建立时间安排   4.1.1 固定单位任务   4.1.2 固定工期任务...
  • PROJECT 2007宝典 8/9

    2012-04-01 19:11:45
     3.8.3 显示和隐藏任务   3.9 获取帮助   3.9.1 使用帮助系统   3.9.2 查找联机帮助   3.10 小结   第4章 建立任务   4.1 为任务建立时间安排   4.1.1 固定单位任务   4.1.2 固定工期任务...
  • PROJECT 2007宝典 7/9

    2012-04-01 19:08:40
     3.8.3 显示和隐藏任务   3.9 获取帮助   3.9.1 使用帮助系统   3.9.2 查找联机帮助   3.10 小结   第4章 建立任务   4.1 为任务建立时间安排   4.1.1 固定单位任务   4.1.2 固定工期任务...
  • PROJECT 2007宝典 6/9

    2012-04-01 19:05:22
     3.8.3 显示和隐藏任务   3.9 获取帮助   3.9.1 使用帮助系统   3.9.2 查找联机帮助   3.10 小结   第4章 建立任务   4.1 为任务建立时间安排   4.1.1 固定单位任务   4.1.2 固定工期任务...
  • PROJECT 2007宝典 5/9

    2012-04-01 19:02:17
     3.8.3 显示和隐藏任务   3.9 获取帮助   3.9.1 使用帮助系统   3.9.2 查找联机帮助   3.10 小结   第4章 建立任务   4.1 为任务建立时间安排   4.1.1 固定单位任务   4.1.2 固定工期任务...
  • PROJECT 2007宝典 4/9

    2012-04-01 18:59:17
     3.8.3 显示和隐藏任务   3.9 获取帮助   3.9.1 使用帮助系统   3.9.2 查找联机帮助   3.10 小结   第4章 建立任务   4.1 为任务建立时间安排   4.1.1 固定单位任务   4.1.2 固定工期任务...
  • PROJECT 2007宝典 3/9

    2012-04-01 18:56:06
     3.8.3 显示和隐藏任务   3.9 获取帮助   3.9.1 使用帮助系统   3.9.2 查找联机帮助   3.10 小结   第4章 建立任务   4.1 为任务建立时间安排   4.1.1 固定单位任务   4.1.2 固定工期任务...
  • PROJECT 2007宝典 2/9

    2012-04-01 18:53:07
     3.8.3 显示和隐藏任务   3.9 获取帮助   3.9.1 使用帮助系统   3.9.2 查找联机帮助   3.10 小结   第4章 建立任务   4.1 为任务建立时间安排   4.1.1 固定单位任务   4.1.2 固定工期任务...
  • PROJECT 2007宝典 1/10

    2012-04-01 18:49:33
     3.8.3 显示和隐藏任务   3.9 获取帮助   3.9.1 使用帮助系统   3.9.2 查找联机帮助   3.10 小结   第4章 建立任务   4.1 为任务建立时间安排   4.1.1 固定单位任务   4.1.2 固定工期任务...

空空如也

空空如也

1 2 3
收藏数 41
精华内容 16
关键字:

vba只显示用户窗体