我在excel中弹出了一个漂亮的日历,并用以下方法测试了UserForm的位置:
.Top = Application.Top + 125
.Left = Application.Left + 125
这非常有用,但我真正想要的是在活动单元格旁边弹出表单。
我在下面尝试的是不起作用,我不知道为什么。我希望表单的左上角触及活动单元格的右上角,但是表单最终会覆盖活动单元格
.Top = ActiveCell.Top
.Left = ActiveCell.Left + ActiveCell.Width
任何建议?
答案 0 :(得分:2)
这对我有用,如你所愿:
.Top = ActiveCell.Top + ActiveCell.Height / 2 + .Height
.Left = ActiveCell.Left + ActiveCell.Width * 1.5
答案 1 :(得分:0)
If Application.Version = "11.0" Then
Me.Top = Application.Top + [b7].Top + 70 - Windows(1).VisibleRange.Top
Else
Me.Top = Application.Top + [b7].Top - 4 + (Application.CommandBars.Item("Ribbon").Height * 0.75) - Windows(1).VisibleRange.Top
End If
Me.Left = Application.Left + [b7].Left + 90 - Windows(1).VisibleRange.Left
还不错......