Hallo!
Ich habe folgendes Problem:
Ich richte ein Formular so aus, dass es sich immer knapp unter der ausgewählten Zelle geöffnet wird. Soweit nicht schwer:
Private Sub UserForm_Activate()
AuswahlBox.Top = ActiveCell.Top + 100
AuswahlBox.Left = ActiveCell.Left
End Sub
Aber wenn der Anwender nun in diesem Worksheet nach unten Scrollt, kommt alles durcheinander, ist auch klar, der Top Wert der Zellen ändert sich beim Scrollen ja nicht. Nun habe ich mich gefragt, wie ich das trotzdem so hinbekomme, mein Ansatz wäre gewesen Top-ScrollIndex*Zeilenhöhe, wobei das weder sehr sicher ist, noch ist es mir bislang gelungen den ScrollIndex auszulesen...
Bin für jede Hilfe sehr Dankbar! |