1

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% です)。

画面解像度/ズームサイズを考慮して、これを適切に行う方法はありますか?

4

1 に答える 1