Startupposition dell'utente

Question

Ho fatto un bel calendario pop-up in Excel e testato la posizione dell'utente con:

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

funziona grande, tuttavia ciò che vorrei veramente è quello di avere la forma pop-up proprio accanto alla cella attiva.

Quello che ho provato sotto non funziona e non sono sicuro del perché.Voglio l'angolo in alto a sinistra del modulo per toccare in alto a destra della cella attiva, tuttavia il modulo finisce per coprire la cella attiva

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

Qualche suggerimento?

Answer 1

Questo funziona per me come ti aspetti:

    .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

.

non è troppo brutto ...