Sunday, October 14, 2018

√ Cara Menciptakan Scrollbar Pada Userform

ScrollBar yakni penggulung layar yang sanggup dipakai saat layar tersebut tidak cukup untuk memuat object. ScrollBar sanggup dibentuk pada UserForm apabila diharapkan contohnya Anda telah menciptakan ukuran UserForm dengan Height 217.5 dan Width 402.75 Karena banyak object yang harus dimasukan dalam UserForm tersebut namun kalau ukuran diperkecil hal ini akan memungkinkan ketidakindahan user dalam memakai UserForm tersebut.

Berikut tutorial bagaimana cara menciptakan UserForm supaya sanggup mempunyai tampilan ScrollBar

Langkah pertama Anda harus menciptakan sebuah UserForm dengan ukuran ibarat yang telah disebutkan diatas, namun Anda juga sanggup menciptakan dengan ukuran sendiri, Untuk menciptakan UserForm sudah aku bahas sebelumnya atau Anda silakan gunakan pencarian untuk mengetahui bagaimana cara menciptakan UserForm di pojok kanan atas.

Berikut tampilan UserForm dengan ScrollBar


Perhatikan gambar diatas merupakan tampilan UserForm yang sudah difasilitasi SrcollBar. Pada UserForm standar tampilan tersebut tidak akan muncul Anda sanggup menambahkan coding dengan mekanisme UserForm_active berikut ini

Private Sub UserForm_Activate()
    With Me
        'scrollbar untuk vertical
        .ScrollBars = fmScrollBarsVertical
       
        'tinggi dan lebar scroll dikalikan
        .ScrollHeight = .InsideHeight * 2
        .ScrollWidth = .InsideWidth * 9
    End With
End Sub

Coding VBA diatas akan menampilkan UserForm secara Vertical kalau Anda akan memakai secara horizontal silakan ganti FmScrollBarHorizontal lalu untuk ukuran nya silakan ganti InsideHeight dan Inside Width nya.

Selamat mencoba, semoga bermanfaat.
Sumber http://www.excel-id.com/