2014-02-27 114 views
1

我做了一個漂亮的日曆在Excel中彈出並與測試用戶窗體位置:用戶窗體StartUpPosition

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

這個偉大的工程,但是我真正想的是讓旁邊的表格彈出活動細胞。

我在下面嘗試過的是不工作,我不知道爲什麼。我想表單的左上角觸摸活動單元格的右上角,但形式結束了覆蓋活性細胞

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

有什麼建議?

回答

2

這是爲我工作,你希望:

.Top = ActiveCell.Top + ActiveCell.Height/2 + .Height 
    .Left = ActiveCell.Left + ActiveCell.Width * 1.5 
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 

是不是太糟糕了......