Richten Userform, um Zellen in Excel

Ich versuche, die position eines userform (namens UserForm1) in Excel-Abstimmung mit Zellbezügen in Excel. Wenn ich initialisieren Sie das Formular mit dem ersten code wird die userform richtige Größe positioniert sich in der Mitte des Bildschirms in Excel.

Private Sub UserForm_Initialize()

With Me
  .Width = 200
  .Height = 170
End With

End Sub

Allerdings möchte ich die Größenänderung zum ausrichten der userform, so dass es umfasst die Zellen B3:D15. Ich habe versucht

Private Sub UserForm_Initialize()

With Me
.Top = Sheet1.Range("B3").Top
.Left = Sheet1.Range("B3").Left
.Width = Sheet1.Range("B3").Offset(0, 4).Left - Sheet1.Range("B3").Left
.Height = Sheet1.Range("B3").Offset(12, 0).Top - Sheet1.Range("B3").Top
End With

End Sub

aber die userform erscheint über dem Menüband (Excel-zoom auf 100% steht.)

Gibt es eine Möglichkeit, um dies richtig tun, unter Berücksichtigung der Bildschirmauflösung/zoom-Größe?

Dank
Zahnarzt

InformationsquelleAutor Dentist | 2011-05-24
Schreibe einen Kommentar