问题标签 [userform]

我正在为我的同事创建一个宏。他们每天都会收到一个文件，并且在一天结束时必须将某些信息复制到另一个工作簿中。宏是负责复制的。我想要一个带有组合框弹出窗口的用户表单，其中包含当前打开的工作簿列表，以便它知道要从哪个文件复制。如何设置它以便在那里进行的选择设置具有该选择的工作簿变量？

我想做的是：

下面是用户表单的代码：

我在用户窗体上有一个文本框。它是表单上唯一的文本框。除了这个文本框之外，还有三个标签和两个按钮。基本上，除了单击其中一个按钮的那一刻之外，我希望在所有情况下都将焦点保留在此文本框上，但随后我希望焦点立即回到文本框。两个按钮都将“TakeFocusOnClick”和“TabStop”设置为 False。我在将焦点设置到文本框时遇到问题，这就是我更改这两个设置的原因。

一旦我更改了这些设置，文本框中的 Enter 键就不再起作用。我为文本框的 _AfterUpdate 和 _KeyPress 编写了事件，但它们不会触发。正如您在代码中看到的那样，我已经注释掉了将焦点设置到此文本框的行。由于它现在是唯一可以聚焦的对象，因此不需要这些线（理论上）。当我允许其他对象获得焦点时，这些线没有任何效果（尽管有这些 SetFocus 线，焦点仍切换到按钮）。

这是代码。这很简单，只是 Enter 键没有触发事件。谁能明白为什么？谢谢。

这是此处回答的问题的后续问题： How to detect a mouse_down on a Userform Frame while the mouse is still down

使用该问题的答案中的代码，我可以成功检测表单上任何框架上的 MouseDown、MouseUp 和 MouseMove。但是，cls 中显然没有 Frame_Enter 或 Frame_Exit 事件。有没有办法在类模块中模拟 Frame_Enter 事件？

编辑：这就是我想要做的。我有 8 帧加载了 8 张图片，当它们组合在一个更大的帧中时，就构成了一张更大的图片。想象一个有 8 个矩形块的拼图。通常，所有 8 帧都包含其图片的“变暗”（中性滤镜覆盖）版本，但是当鼠标进入其中任何一个时，它会触发在新输入的帧中加载“未变暗”版本的图片，并且变暗刚刚退出的帧中的图片版本。因此，如果鼠标在这些帧中的任何一个上，它总是在被暗色图片包围的明亮图片上移动。

当鼠标在一个未变暗的框架上移动时，它会在无限数量的“热点”触发器上滚动，这些触发器会导致一个文本框弹出，其中包含有关鼠标当前悬停的更多信息。当它离开那个框架并移到另一个框架上时，这个过程会重复。

除了检测鼠标何时越过帧边界并进入下一帧之外，一切正常。必须在处理任何 MouseMove 事件之前检测到这一点。

如果没有其他建议，这是一种看起来很有希望的方法： http ://www.mrexcel.com/forum/showpost.php?p=2567141&postcount=28

Edit2：它看起来仍然很有希望，但我无法让它发挥作用。直到我单击控件之后，它似乎才发出进入和退出事件，这对我没有用。

所以克里斯，回到你的。您正在观看 Frame_MouseMove 事件并等待与上次不同的 Frame 发出事件。我想知道是否不使用辅助文本框来表示更改，是否可以不使用静态变量来跟踪 currentFrame/prevFrame？

我有一个带有各种文本框的用户表单，这些文本框的 ControlSource 属性设置为 Sheet1 中的单元格。还有一个命令按钮。

单击命令按钮从 SQL Server 数据库中检索数据并填充 Sheet1。但是，除非我关闭用户表单并重新打开它，否则文本框不会刷新。我已尝试将 UserForm1.Repain 作为 CommandButton Click 事件的最后一行，但它仍然无法正常工作。

我在excel中创建了一个用户表单和几个按钮（数字将在运行时设置）。单击时，每个按钮将打开自己的用户表单版本（相同的用户表单，但每个按钮将有自己的用户表单，例如：按钮 1 将打开用户表单 1，按钮 2 将打开用户表单 2 等，每个用户表单是相同的用户表单类）。

我正在考虑以某种方式创建一个用户表单类，每个按钮都会实例化一个用户表单对象。

我只是不确定实现这一目标的正确代码/语法是什么。

我需要找到 VBA 代码以将 x 个选项卡添加到 excel 用户表单中的多页中。如果我使用 Visual Basic 编辑器，我可以手动添加选项卡，但我希望能够在运行时使用 VBA 动态添加/删除选项卡。

谢谢

我创建了一个带有三个文本框的用户表单。

第一个文本框用于输入第一个数字，第二个文本框用于输入第二个数字，最后一个是结果。

我创建了一个名为Calculate 的按钮。

我有 textbox1 的代码：

这对于textbox2：

我有一个显示结果的按钮

我为 textbox1 输入 1，为 textbox2 输入 2，1+2 将是 3，但在 MsgBox 中我看到 0。这是为什么，我该如何解决？

在 Excel 2007（和 2010）中使用 VBA，有没有办法在显示和隐藏用户窗体时禁用标准的淡入和淡出动画。特别是淡出对于我正在尝试创建的用户界面来说太慢了。

也许该user32功能AnimateWindow有一个可以作废的设置，但我还没有弄清楚。

编辑：这是一个审美目标；没有性能问题。由操作系统处理的淡出Me.Hide需要大约 1/2 秒，我想知道它是否可以被立即覆盖。

从 datepicker 传递日期以对 excel 表进行排序时，格式在某处变得混乱并 dd/mm/yyyy 从 mm/dd/yyyy

我检查了我的区域设置，它们设置为dd/mm/yyy

我表中的列已经按 dd/mm/yyyy 排序，但是如果我选择 2012 年 5 月 7 日，它会在 2012 年 7 月 5 日出现。注意：它只会在日列小于 12 时翻转。例如，如果我选择6 月 24 日为开始日期，它将保持 6 月 24 日。

任何帮助将不胜感激！

我有一个 VBA 代码，我在其中计算许多变量的值（为简单起见，我们将它们命名为 A、B、C）。

我需要弹出一个比具有多个 vbLines 的 MsgBox 更专业和参与的提示。例如，有一个框架包含三个框，每个框显示一个变量的值，并在其中有一个标题。

MsgBox 对于这项任务似乎太有限了。我尝试了一个用户窗体，但用户窗体可用的控件都是组合框、列表框等。我可以在用户窗体中插入简单的“显示框”吗？

此外，我最终需要在弹出提示中有一个附加框，用户在其中输入一些值，单击“确定”，然后重新计算变量 A、B、C 的值并在显示中更新。

我需要什么工具？消息框？对话框？用户表单？等等