Programda farklı kullanıcı girişn yetkisi vermeye çalıştım yani yetki vermediğim kullanıcı kaydetmesin bilgi yazmasın yetki veriğim kullanıcıda programdahiç bir sorun yaşamasın.Ama yetki verdiğim kullanıcı kaydetme sorunu yaşıyor ve şu hatayı alıyor tanımsız kullanıcı hatası alıyor.Excel hataya giriyor ve kapanıyor birde kullanıcı şablonuda açılmıyor yardım edermisiniz.

Sn; mumya66;

Kullanıcı seviyesini hatalı yazmısınız vb kod paneline kodları yazarken Seviye0 yazarken "S" buyuk harf Excel tabloda yazarken ise seviyesinin "s" harfini küçük yazmışsınız düzelttiğinizde sorun çözülmüş olacaktır.

Alıntı:admin 111111 Seviye0
kullanıcı1 222222 seviye1
kullanıcı2 333333 seviye2
kullanıcı3 444444 seviye3

Alıntı:admin 111111 Seviye0
kullanıcı1 222222 Seviye1
kullanıcı2 333333 Seviye2
kullanıcı3 444444 Seviye3

If ComboBox1 = Empty Then MsgBox "Kullanıcı seçilmedi!", vbCritical, "Hata!": Exit Sub

If TextBox1 = Empty Then MsgBox "Şifre girilmedi!", vbCritical, "Hata!": Exit Sub

If TextBox1.Text <> ListBox1.List(ComboBox1.ListIndex, 0) Then

    MsgBox "Hatalı şifre!", vbCritical, "Hata!": Exit Sub

        Else

    MsgBox "Seviyeniz: " & ListBox1.List(ComboBox1.ListIndex, 1)

    seviye = ListBox1.List(ComboBox1.ListIndex, 1)

    Call seviyeler

End If

Select Case seviye

Case "Seviye0"

    MsgBox "Kısıtlama yok!", vbInformation

Case "Seviye1"

    MsgBox "Kısıtlama var!", vbInformation, "Seviye 1"

Case "Seviye2"

    MsgBox "Kısıtlama var!", vbInformation, "Seviye 2"

Case "Seviye3"

    MsgBox "Kısıtlama var!", vbInformation, "Seviye 3"

Case ""

    MsgBox "Tanımsız yetkilendirme!", vbCritical, "Program kapatılacak!"

    ThisWorkbook.Close False

End Select

Kolay gelsin.

Sn Power hocam şimdide açıkılışda 'ambiguos name detecdet:auto_open' hatası alıyorum ve programa bilgi yazdığımda kaydet dediğimde 'Tanımsız yetkilendirme ' hatası alıyorum ve kaydetmeden program kendiliğinden kapanıyor sn hocam

Sanırım yanlış yazdınız ne demek istediğinizi anlamadım...

Nasıl hocam anlamadım özür dilerim.

Konuyla ilgim yoktu bana yazmışsınız.

Auto_open modulunu silin düzelecektir.Modul3