Soru Birden Fazla kullanıcı ekleme

[TURKOLOG]

Merhaba arkadaşlar iki konuda yardım istiyorum
1. si Form oluşturmadan vba da bir den fazla kullanıcı eklemek istiyorum Kırmızı ve kalın gösterdiğim yerde şifre ve kullanıcı adı yazıyor. Ama ben buradan birden fazla kullanıcı eklemek istiyorum alt alta nasıl yapabilirim.
2. si şifre doğru girildi ise Ana_Sayfa userformuna direkt geçmesini ve PBS isimli excel sayfasını saklamasını istiyorum

Private Sub CommandButton1_Click()
'Kullanıcı Tamam butonuna bastığı zaman bu metod çalışıyor

Dim username As String
Dim password As String
'2 tane metin tutan değişken tanımlıyoruz.

username = Giriş.TextBox2.Value
password = Giriş.TextBox1.Value
'UserForm1: İçerisinde textbox ve buttonu barındıran ana formumuz.
'textboxUsername ve textboxPassword: içerisine kullanıcı adı ve şifremizi yazdığımız textbox'lar
'Bunların adlarını properties alanı içerisindeki "Name" bölümünden değiştirdik.

If username = "1" And password = "1" Then
'Eğer koşulu yazarak kullanıcı adı ve şifre bizimbelirlediğimiz değer ise ekrana messagebox gösterip
'1 sayfayı seçiyoruz
MsgBox "Hoşgeldiniz", vbInformation
Giriş.Hide


Giriş.TextBox1 = ""
Giriş.TextBox2 = ""
Application.Windows("PBS.xlsm").Visible = True
Application.Visible = True
End
Else
'Eğer kullanıcı yanlış giriş yaptıysa hata mesajı görüntüleyip formdaki girişleri temizliyoruz.
MsgBox "Kullanıcı Adı Veya Şifre Yanlış..." & vbNewLine & "Lütfen Tekrar Deneyiniz...", vbCritical, "HATA"
Giriş.TextBox2.Value = ""
Giriş.TextBox1.Value = ""


End If
End Sub