Membuat datasheet subform auto size

Para pecinta programmer yang baca blog ini, kita akan membahas tentang bagaimana membuat subform data sheet auto size, sehingga pada saat form di kecilka  maka isi form juga akan mengecil sesuai dengan ukuran form.
Silahkan baca atau copas script nya...

Sub form_resize()
On error resume next
Subform1.width = me.windowwidth - (subform1.left + 300)
Subform1.height = me.windowheight - (subforn1.top + 1500) ' sisakan untuk button dibawahnya
Command1.left = subform1.left + (subforn1.width - command1.width)' supaya command button berada di sisi kana form

End sub

Selamat mencoba dan mengkreasikan lagi