• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

Soru Kullanıcı Yetkilerini Userform Üzerinden kontrol etme

V

veysikulte1

Altın Üye
Katılım
23 Ekim 2015
Mesajlar
99
Excel Vers. ve Dili
2016
Merhaba ekteki dosyayı daha önce bir arkadaşımız kullanıcı yetkilendirme işlemi için sağolsun hazırlamış bende ek olarak bir userform açtım orada kullanıcıların bilgilerine ulaşılıp excell üzerinden değilde userform üzerinden kullanıcı ekleme kullanıcı silme veya kullanıcı yetkilerini değiştirmek gibi. örneğin CommandButton1 isimli yetki karşısındaki iki tane Optionbutton var evet yada hayır evet seçili ise seçili kullanıcının seçili yetkisine 1 yazsın Hayır seçeneği seçili ise 0 yazsın umarım anlatabilmişimdir lütfen dosyayı indirip incelerseniz daha iyi anlarsınız şimdiden hepinize çok teşekkür ederim.
 

Ekli dosyalar

Yukarıdaki mesajımda yazdım ben sadece alternatif link verdim.
Dosyanızı incelemedim.
 
Kullanıcı silme için aşağıdaki kodu deneyebilirsiniz.

Kod: 
Private Sub CommandButton5_Click()
    Dim S1 As Worksheet, Bul As Range

    Set S1 = Sheets("USERS")

    If ComboBox1.Value <> "" Then
        Set Bul = S1.Range("A:A").Find(ComboBox1.Value, , , xlWhole)
        If Not Bul Is Nothing Then
            Bul.Rows.Delete
            MsgBox "Silme işlemi tamamlanmıştır.", vbInformation
        Else
            MsgBox "Aradığınız kullanıcı bulunamadı!", vbCritical
        End If
    End If
End Sub
 
Yeni kullanıcı eklemek için kullandığınız formdaki nesnelerin (OptionButton) sıra numaralarını düzenlerseniz daha kısa kodlama yapılabilir.

Formunuzda hem kaydet butonu var hemde YENİ KULLANICI EKLE butonu var. Bunların görevleri ne olacak?

Bu hali ile tek tek nesneleri sorgulamak gerekiyor. Ayrıca formunuzun üzerinde sayfa yetkilendirme seçenekleri yok.

Bu düzenlemeleri yaparsanız uygulamayı yönetmek daha basit bir hâl alacaktır.
 
Cevap yazmak için giriş yap yada kayıt ol.
Geri
Üst