Userform Kullanıcı Giriş Saydırma
Tarih
22/09/2010 16:54
Konu Sahibi
drummers
Yorumlar
3
Okunma
1571
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 0/5 - 0 oy



drummers
Omur Can
Kullanici Avatari
Destek
O.... C....
398
11/05/2009
125
İzmir
Ofis 2003
29/11/2016,13:56
Çözüldü 
Userform2 ile dosyamı açmaktayım. Seçtiğim kullanıcı adı "Yetkiler" sekmesinde "AA2" hücresine atanmakta ve kaç sefer girdiği sayılmaktadır.

Kullanıcı adını userform1 de label37 ye yamakta
Kaç sefer açıldığınıda label243 e yazmaktadır.

İsteğim şudur: Girişteki userform2 den seçilen kulanıcı adı userfom1 deki label37 ye yazılsın ve bu kaçıncı girişi olduğuda label243 e yazılsın. Kullanıcı değişir ise onuda aynı şekilde ilgili label e yazısın fakat giriş sayılarını ayrı ayrı tutsun


Örnek:

Diyelim Admin programı 10 kez açtı
label37= Admin label243= 10

iyelim User programı 14 kez açtı
label37= User label243= 14

Teşekkürler


Kullanıcı Adı:Admin Şifre:1
Kullanıcı Adı: User Şifre:2


Ek Dosyalar
.rar   drmkayıt v1.rar (Dosya Boyutu: 271,71 KB / İndirme Sayısı: 39)
drummers, 11-05-2009 tarihinden beri AccessTr.neT üyesidir.
Cevapla


ogulcan92
Aktif Üye
Kullanici Avatari
Aktif Üye
1.160
06/05/2009
477
İzmir
Ofis 2003
07/08/2015,11:50
Çözüldü 
Sn:drummers
Aşağıdaki kodu kendi projenize göre düzenleyiniz.

Visual Basic Code
1
2
3
4
5
6
7
8
9
Private Sub UserForm_Initialize()
Label1.Caption = [Sayfa1!A1]
If Label1.Caption = "Admin" Then
Label2.Caption = [Sayfa1!B2]
End If
If Label1.Caption = "User" Then
Label2.Caption = [Sayfa1!B3]
End If
End Sub

Cevapla


drummers
Omur Can
Kullanici Avatari
Destek
O.... C....
398
11/05/2009
125
İzmir
Ofis 2003
29/11/2016,13:56
Çözüldü 
(22/09/2010, 17:46)ogulcan92 Adlı Kullanıcıdan Alıntı: Sn:drummers
Aşağıdaki kodu kendi projenize göre düzenleyiniz.

Visual Basic Code
1
2
3
4
5
6
7
8
9
Private Sub UserForm_Initialize()
Label1.Caption = [Sayfa1!A1]
If Label1.Caption = "Admin" Then
Label2.Caption = [Sayfa1!B2]
End If
If Label1.Caption = "User" Then
Label2.Caption = [Sayfa1!B3]
End If
End Sub


Üzgünüm beceremedim..Img-cray

drummers, 11-05-2009 tarihinden beri AccessTr.neT üyesidir.
Cevapla


drummers
Omur Can
Kullanici Avatari
Destek
O.... C....
398
11/05/2009
125
İzmir
Ofis 2003
29/11/2016,13:56
Çözüldü 
Yok Yok becerdim..Img-grin. Tamamdır ve teşekkürler
drummers, 11-05-2009 tarihinden beri AccessTr.neT üyesidir.
Cevapla







Konuyu Okuyanlar: 1 Ziyaretçi


Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Tarih Son Yorum
  userform güncelleme hatası yok_06 3 406 18/06/2016, 15:09 atoz112
  userform açıldığında excel kitaplarının kapanması bydogannn67 11 2.238 09/06/2016, 20:09 atoz112
Çözüldü Userform çalıştırma ve bilgileri denetimlerde gösterme yok_06 9 938 26/12/2015, 13:34 atoz112
Çözüldü Userform Adres ve Telefon Rehberi Listeleme meram42 9 1.668 13/05/2015, 10:39 meram42
Çözüldü UserForm sorunu kenan827 1 1.181 08/09/2014, 12:37 kenan827


Türkçe Çeviri: MCTR, Forum Yazılımı: MyBB, © 2002-2016 MyBB Group.
DMCA.com Protection Status
© Desing by XSTYLED| Develops by ozanakkaya