UserForm StartUpPosition

Question

我在excel中弹出了一个不错的日历，并用以下方法测试了UserForm的位置：

.Top = Application.Top + 125 .Left = Application.Left + 125

这很好，不过，我真正想要的是让表单在活动单元格旁边弹出。

我在下面所做的尝试是行不通的，我也不知道为什么。我希望窗体的左上角能够触摸活动单元格的右上角，但是表单将覆盖活动单元格。

.Top = ActiveCell.Top .Left = ActiveCell.Left + ActiveCell.Width

有什么建议吗？

Answer 1

正如你所期望的那样，这对我是有用的：

    .Top = ActiveCell.Top + ActiveCell.Height / 2 + .Height
    .Left = ActiveCell.Left + ActiveCell.Width * 1.5

Answer 2

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

不算太糟..。