Excelde Kullaniciya gore sayfayi gizlemek

Katılım
11 Nisan 2011
Mesajlar
111
Excel Vers. ve Dili
2003
Merhaba,
Uzerinde calistigim excel belgesinin 3 sayfasi var. Bu belgeye 2 farkli kullanici, kullanici isimleri ve sifreleriyle girecek. Istedigim sey 1. kullanici girdiginde sayfa 2 ve sayfa 3u, 2. kullanici girdiginde sayfa 1 ve sayfa 3 u gorebilsin. bunu yapabilecek bir kod yazabilirmiyim??
 

Necdet

Moderatör
Yönetici
Katılım
4 Haziran 2005
Mesajlar
15,496
Excel Vers. ve Dili
Ofis 365 Türkçe
Merhaba,

Fikir vermesi açısından basit bir kod yazdım. Siz kendinize göre uyarlayınız.

Kullanıcı "ahmet" ve "mehmet" e göre davranır.

Aşağıdaki kodların ThisWorkbook'un sayfa bölümünde olması gerekir.

Kod:
Private Sub Workbook_Open()
    Dim Kullanici As String
    
    Kullanici = InputBox("Kullanıcı Adını Giriniz", vbOKCancel, "Kullanıcı Adını Giriniz")
    
    MsgBox "Kullanıcı : " & Kullanici
    
    If Kullanici = "ahmet" Then
        Sheets("Sayfa2").Visible = True
        Sheets("Sayfa3").Visible = True
        Sheets("Sayfa1").Visible = False
        Sheets("Sayfa2").Select
    ElseIf Kullanici = "mehmet" Then
        Sheets("Sayfa1").Visible = True
        Sheets("Sayfa3").Visible = True
        Sheets("Sayfa2").Visible = False
        Sheets("Sayfa1").Select
    Else
        ThisWorkbook.Close Savechanges:=False
    End If
    
End Sub
 
Katılım
11 Nisan 2011
Mesajlar
111
Excel Vers. ve Dili
2003
Hocam teşekkürler. Bir adım sonrasında da şöyle bir şeye ihtiyacım var. Her kullanıcı bir kullanıcı grubuna dahil olacak. 1,2,3,4,5 numaralı gruplar. (Kullanıcı adı ve şifresini yazdığım sayfada bir sütuna kullanıcının dahil olduğu grubuda yazacağım.) Amacım 1. gruba dahil kullanıcının visible olan sayfa1in A ve B sütunlarını, 2. gruba dahil olan kullanıcının sayfa2nin C ve D sütunlarını görmemesini istiyorum v.s.?

Ayrıca, saayfa1in K kolonunda kullanıcı kodları olacak. (Her kullanıcının kendine ait kodu olacak) kullanıcı kendi adıyla giriş yaptığında sadece kendi koduna ait satırları görebilecek?(Görünür olan sayfanın kendi koduna ait satırlarını görecek)

Şöyle özetleyebilirim: Her kullanıcı ait olduğu gruba göre bazı sütunları göremeyecek ayrıca kendi koduna ait satırları görecek. Bu yapılabilir mi?
 

Necdet

Moderatör
Yönetici
Katılım
4 Haziran 2005
Mesajlar
15,496
Excel Vers. ve Dili
Ofis 365 Türkçe
Merhaba,

Örnek dosya ekleyebilir misiniz? Sorunuzu yanıtlayacak olan arkadaşlara yardımcı olacaktır.
 
Üst