Excel のセル参照に合わせて、Excel にユーザーフォーム (UserForm1 という名前) を配置しようとしています。以下の最初のコードを使用してフォームを初期化すると、ユーザーフォームは Excel の画面の中央に正しいサイズで配置されます。
Private Sub UserForm_Initialize()
With Me
.Width = 200
.Height = 170
End With
End Sub
ただし、セル B3:D15 をカバーするようにユーザーフォームのサイズを変更したいと考えています。私はもう試した
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
しかし、リボンの上にユーザーフォームが表示されます (Excel のズームは 100% です)。
画面解像度/ズームサイズを考慮して、これを適切に行う方法はありますか?