Resize continuous form

[Drenda]

Hi

Is there any way I can resize a continous form that can sink or grow dependant on the number of records

Thanks

 

[MajP]

You could do something like this.

Private Sub Form_Load()
  Dim x As Integer
  x = Me.RecordsetClone.RecordCount
  Me.InsideHeight = 1500 + x * 550
End Sub

On my form 1500 is the size needed to show the header and 550 needed per row.