userform相关内容
我在Excel工作簿中有代码,可以帮助我创建大量电子邮件,发送给各种程序的用户。我有一个弹出的用户表单,用户填写所有需要的信息。但这一次只适用于一款应用程序。是否有人可以与我共享代码,以便根据勾选的复选框将文本框动态添加到用户表单? 在第一个框架中,我有指示受影响的应用程序的复选框,在第二个框架中,我有选项按钮来描述事件的类型,然后我希望文本框根据勾选的内容显示。 非常感谢任何指导,因
..
我有UserForm,其中我有按钮来获取UserForm的打印屏幕,粘贴到新创建的工作表,并将其导出为pdf。我对当前代码的问题是: 1)我希望将Print Screen适合一页,现在它需要Print Screen并拆分成两页。 2)更高的打印屏幕分辨率。是否可以提高打印屏幕的分辨率以获得更高的质量? 我在UserForm上用于按钮的代码: Private Sub btnPri
..
我有以下代码以编程方式/动态创建一个框架并添加一个选项按钮: 私有子 ComboBox1_Change()将 cb1234Frame 调暗为 MsForms.Frame将 opbtn1 调暗为 MsForms.OptionButton设置 cb1234Frame = RT_Graph_Form.Controls.Add("Forms.Frame.1")带cb1234Frame.顶部 = 132.
..
在 VBA 中将 ProgressBar 用户窗体显示为模式还是非模式更好?在 VBA 中开发进度指标的最佳实践是什么? 无模式用户窗体需要使用 Application.Interactive = False,而模态用户窗体本质上会阻止与应用程序的任何交互,直到核心过程完成或被取消. 如果使用Application.Interactive = False,但是,Esc键会中断代码执行,
..
是否有一个用户窗体可以无模式运行,同时仍像模式窗体一样暂停代码执行? 我希望显示用户窗体,但仍允许与父程序交互.模态表单阻止与父程序的交互.无模式表单可以工作,但我希望代码执行在表单启动时暂停. 我已经通过创建一个检查表单是否可见的无限循环来解决这个问题,但这似乎有点 hacky. Public Sub GetFormInfoAndDoStuffufForm.show vbModel
..
我有一个带有列表框、文本框和组合框以及一个保存按钮的用户窗体.下面是我的保存按钮代码. 私有子 cmdsave_Click()将 x 调暗为整数x = Me.ListBox1.ListCount如果 Me.cmbtrans.Value = "借方" 那么和我在一起.ListBox1.启用=真.ColumnCount = 13.ColumnWidths = "49.95 点;10 点;114.95
..
我有一个带有 OK 和 Cancel 按钮和一个列表框的用户表单.它应该使用以下代码填充: Private Sub UserForm_Initialize()我.StartUpPosition = 0Me.Top = Application.Top + (Application.Height/2) - (Me.Height/2)Me.Left = Application.Left + (Appl
..
对于某些人来说,这可能是一个廉价的问题,但我完全不知道如何填充我的列表框. 使用这一行,我可以填充列表框,如下所示: ListBox1.List = Sheets("Sheet1").Cells(1, 1).CurrentRegion.Value 或 Dim rngName As Range暗淡为工作表将 i 调暗为整数设置 ws = Worksheets("Sheet1")For
..
社区,我对 excel 还不太熟悉.我有一个名为 Box_One 的文本框.这已在我的用户表单上设置.我想要做的就是让单元格值始终等于文本框中的任何值. 我尝试了以下,但不太确定如何正确实施 Home.Range("A2").Value = Box_One.Value 解决方案 使用你的文本框的 Change 事件来运行你想要的代码怎么样?类似的东西 私有子 TextBox1_Cha
..
我想学习一个新技巧,但我不是 100% 确信它在 VBA 中是可能的,但我想我会在这里与大师核实一下. 我想做的是避开旧的 getopenfilename 或浏览器窗口(在我们的网络驱动器上设置起始目录真的很困难),我想创建一个 VBA 用户表单,其中用户可以从桌面或表单上的浏览器窗口拖放文件,VBA 将加载文件名和路径.同样,我不确定这是否可能,但如果是这样,或者是否有人在我感激指针之前已
..
社区,我目前在我的用户窗体多页上隐藏我的标签,但当前标签除外.用户可以单击按钮在页面之间来回切换.一些按钮共享子程序.当用户单击按钮时,一旦选择了新选项卡,它就会隐藏前一个选项卡.我想这是一个双重问题. 1) 如何获取上一个选项卡选择值? 2) 如何循环浏览我的选项卡值?我的目标是针对所有其他标签测试当前标签标题或值.认为这将是一种隐藏它们的简单方法,无论哪个页面和哪个按钮调用子例程.
..
..
由于冗长的评论和建议答案的更新,此问题已被编辑. 这里要求的是模块 13; Sub SaveInFormat()Application.DisplayAlerts = FalseWorkbooks.Application.ActiveWorkbook.SaveAs Filename:="C:\Documents and Settings\jammil\Desktop\AutoFinance
..
我在用户表单上有一个文本框和一个列表框.我想根据我在文本框中输入的值过滤列表框中的值.名为 TMP 的工作表具有值,我根据文本框更改事件对其进行过滤,但在将该值添加到列表框时它会自动退出. 私有子Textbox1_Change()'在错误恢复下一个Dim fCell 作为范围,MyArr 作为变体,i As Long使用 TMP.AutoFilterMode = False.Range("A1"
..
我在表单上有以下按钮: 私有子命令Button1_Click()Dim pass As String通过 = UserForm1.TextBox1卸载 UserForm1结束子 然后我有一个名为 Module1 的模块: 公共子登录()...UserForm1.Showdriver.findElementByName("PASSWORD").SendKeys 通过...结束子 这个想法是
..
为什么 Excel 中有2 种类型的控件?(2 个按钮、2 个组合框、2 个复选框等...) 表单控件和ActiveX控件之间有什么区别?我应该使用哪个? 我在网上找到的一些代码示例可以与我的控件一起使用,但其他代码示例则不能.怎么来的? 我如何处理每种类型,如何区分? 解决方案 围绕 Excel 可用的两种控件类型存在[永恒的]混淆 - 对比术语em> 被不同的在线资源
..
我正在使用以下代码在 Excel 用户表单上动态创建按钮: With Me.CurrentFrame.Controls.Add("Forms.CommandButton.1").Caption = "XYZ".name = "AButton".Font.Bold = 真.ForeColor = &HFF&... 等等等等等等结束于 我想指定一个函数在点击这些按钮时运行,但我找不到一种直接的方法
..
对于某些人来说,这可能是一个廉价的问题,但我对如何填充我的列表框感到非常困惑. 使用这一行,我可以填充列表框,如下所示: ListBox1.List = Sheets("Sheet1").Cells(1, 1).CurrentRegion.Value 或 Dim rngName As RangeDim ws As 工作表Dim i 作为整数Set ws = Worksheets("
..
将代码放入 VBA 用户窗体而不是“普通"模块是否有缺点? 这可能是一个简单的问题,但我在搜索网络和 stackoverflow 时还没有找到决定性的答案. 背景:我正在 Excel-VBA 中开发数据库的前端应用程序.要选择不同的过滤器,我有不同的用户表单.我问什么通用程序设计更好:(1) 将控制结构放入单独的模块 OR (2) 将下一个用户表单或操作的代码放入用户表单. 让我
..
简介: 我知道 - 显示用户表单 - 最好的做法是 在用户表单代码中处理QueryClose (If CloseMode = vbFormControlMenu ...) 没有在其中执行Unload Me,只是一个胆小的Me.Hide指令(在通过 Cancel = True 防止 [x]-itting 和最终自毁之后) 在[class]代码中设置相关变量/[property](例如
..