我一直试图找到一种方法,把换行符在鼠标悬停提示如何在userform鼠标悬停工具提示上换行符?
我想显示
完全 - 从外部部分完全覆盖 - 只将覆盖 非空白外部否 - 输入只在空白单元格
数据
完全 - 完全覆盖˚F ROM外部
部分 - 仅覆盖从外部
没有非空白 - 输入数据只在空白单元格
有没有办法使用Excel 2010中的BTW
我一直试图找到一种方法,把换行符在鼠标悬停提示如何在userform鼠标悬停工具提示上换行符?
我想显示
完全 - 从外部部分完全覆盖 - 只将覆盖 非空白外部否 - 输入只在空白单元格
数据
完全 - 完全覆盖˚F ROM外部
部分 - 仅覆盖从外部
没有非空白 - 输入数据只在空白单元格
有没有办法使用Excel 2010中的BTW
我这个
做米不知道我明白这个问题。通过“鼠标悬停工具提示”你的意思是正确的?创建换行符应该没有问题。只需击中输入/* 返回 *键您想要中断的工作适合我。以下是我所做的一系列详细指示。
1)我选择了我想要的单元格。
2)在审阅功能区中,我选择了新评论。
3)然后我将你的文本复制并粘贴到评论框中。
4)我调整了评论框大小,以防止包装。 5)最后,我删除了文本,并用手重写了它,以确保我可以手动输入换行符。
希望这会有所帮助。干杯。
excel会简单地忽略ControlTipText
属性中的换行/回车。一个可能的解决方法是隐藏多行标签(格式化看起来像一个工具提示)的可见性通过使用相关的控件和用户表单MouseMove
事件 - 即SomeControl_MouseMove
显示标签和ParentForm_MouseMove
再次隐藏它(可能在延迟后)。如果用户非常快速地移动指针,这种方法可能会有点击或失败。另一个(更好的,恕我直言)解决方案将是在您的窗体上的某个地方有一个永久可见的标签或文本框对象,其标题/值根据当前鼠标指针下的任何控件进行更改,同样使用MouseMove
事件。
编辑:如果,因为我怀疑你的工具提示与组合框/列表框控件相关联,你可能想考虑让你的选项描述在控件的第二列中?
我试图保持它容易(没有API,很短码):
Private Sub ListBox1_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
'If Events Then
Dim list_index As Long, Zero As Long
Zero = Me.ListBox1.TopIndex
list_index = Y \ (8 + 2) + Zero ' ; 8 si the size of Font ; note \ is a integer division
'Me.label1 = Y 'test label
'Me.label2 = list_index 'test label
'Me.label3 = Zero 'test label
With Me.ListBox1
.ControlTipText = .List(list_index, 1)
End With
'End If
End Sub
这不是在工作表上,但在一个窗体所以这不能适用 – forums 2013-02-14 02:07:54