Private Sub Form_Load()With Forms(0).Move Left:=0, Top:=0, Width:=200 * 25.4, Height:=Me.Detail.HeightEnd WithEnd Sub