[Yardım]  Belli Bir Süre Sonra Şifre Isteme

VBA Makrolar ile ilgili sormak istedikleriniz, yapmak istedikleriniz hakkında yardım alabileceğiniz bölümdür.

Belli Bir Süre Sonra Şifre Isteme

İleti#1)  ercanfb34 » 17 Haz 2022 02:11

Merhabalar

Sayfada bir buton var ilk kez tıklanınca şifre istesin. Belli bir süre sonra (1 saat gibi) tekrar butona tıklayınca şifre istesin.
Kod: Tümünü seç
Private Sub CommandButton1_Click()
    If InputBox("Şifre") = "123" Then
        MsgBox "Başarılı giriş"
    Else
        MsgBox "Hatalı şifre"
    End If
End Sub
Kullanıcı avatarı
ercanfb34
Yeni Başlamış
 
Kayıt: 19 Tem 2020 03:53
Meslek: tekniker
Yaş: 32
İleti: 10
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: istanbul

Yıllık Maaş Bordrosu Hesaplama 2022

Cevap: Belli Bir Süre Sonra Şifre Isteme

İleti#2)  Abidin Özçelik » 17 Haz 2022 09:49

Kod: Tümünü seç
Sub auto_Open()
Application.OnTime Now + TimeValue("00:10:00"), "CommandButton1_Click"
End Sub


Kod: Tümünü seç
Private Sub CommandButton1_Click()
    If InputBox("Şifre") = "123" Then
        MsgBox "Başarılı giriş"
call auto_open
    Else
        MsgBox "Hatalı şifre"
    End If
End Sub
Kullanıcı avatarı
Abidin Özçelik
Siteye Alışmış
 
Adı Soyadı:ABİDİN ÖZÇELİK
Kayıt: 16 Haz 2008 11:47
Konum: Diyarbakır
Meslek: Eczacı
Yaş: 41
İleti: 380
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: DİYARBAKIR

Cevap: Belli Bir Süre Sonra Şifre Isteme

İleti#3)  Tarkan VURAL » 17 Haz 2022 10:00

Merhaba,
Zaman ayarlamasını OnTime metodu ile kurgulayabilirsiniz. Bir örnek dosya yaptım. İnceleyiniz.

Kod: Tümünü seç
Sub Auto_Open()
Application.OnTime Now + TimeValue("00:00:10"), "KontrolEt"
End Sub
Bu iletideki ekleri görmek için gerekli yetkilere sahip değilsiniz.
Resim
www.tarkanvural.com.tr

İnnâ lillâhi ve innâ ileyhi raciûn
Şüphesiz ki; biz Allah’a âidiz ve vakti geldiğinde O’na döndürüleceğiz.

HasbunAllâhu ve nimel vekîl
Bize Allah yeter. O ne güzel vekildir.


ExcelVBA.NET' e katkıda bulunmak ister misiniz ?
Kullanıcı avatarı
Tarkan VURAL
Yönetim Kurulu
 
Adı Soyadı:Tarkan VURAL
Kayıt: 14 Haz 2008 20:27
Konum: @tarkanvural73
Meslek: LUU, Database Expert, Senior Software Specialist, Developer
Yaş: 48
İleti: 27526
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: İstanbul - Beylikdüzü

Cevap: Belli Bir Süre Sonra Şifre Isteme

İleti#4)  ercanfb34 » 17 Haz 2022 11:58

@Abidin Özçelik ve @Tarkan VURAL çok teşekkür ederim ama benim istediğim biraz daha farklı.

Butona bastım ve şifre ekranı geldi doğru şifreyi yazdım. 1 saat süre boyunca benden butona bastığım zaman şifre istemesin. 1 saat süre dolduğu zaman butona bastığım zaman tekrar şifre istesin.
Kullanıcı avatarı
ercanfb34
Yeni Başlamış
 
Kayıt: 19 Tem 2020 03:53
Meslek: tekniker
Yaş: 32
İleti: 10
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: istanbul

REKLAM
Excel Logo XML Oluşturucu
Logo Object Designer ile Uyarlama

Cevap: Cevap: Belli Bir Süre Sonra Şifre Isteme

İleti#5)  Abidin Özçelik » 17 Haz 2022 12:35

ercanfb34 yazdı:@Abidin Özçelik ve @Tarkan VURAL çok teşekkür ederim ama benim istediğim biraz daha farklı.

Butona bastım ve şifre ekranı geldi doğru şifreyi yazdım. 1 saat süre boyunca benden butona bastığım zaman şifre istemesin. 1 saat süre dolduğu zaman butona bastığım zaman tekrar şifre istesin.


Burdaki zaman ayarını değiştirebilirsiniz. Dosyanızı eklermisiniz

Kod: Tümünü seç
Application.OnTime Now + TimeValue("00:00:10"), "KontrolEt"
Kullanıcı avatarı
Abidin Özçelik
Siteye Alışmış
 
Adı Soyadı:ABİDİN ÖZÇELİK
Kayıt: 16 Haz 2008 11:47
Konum: Diyarbakır
Meslek: Eczacı
Yaş: 41
İleti: 380
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: DİYARBAKIR

Cevap: Belli Bir Süre Sonra Şifre Isteme

İleti#6)  ercanfb34 » 17 Haz 2022 13:40

Abidin Özçelik yazdı:
ercanfb34 yazdı:@Abidin Özçelik ve @Tarkan VURAL çok teşekkür ederim ama benim istediğim biraz daha farklı.

Butona bastım ve şifre ekranı geldi doğru şifreyi yazdım. 1 saat süre boyunca benden butona bastığım zaman şifre istemesin. 1 saat süre dolduğu zaman butona bastığım zaman tekrar şifre istesin.


Burdaki zaman ayarını değiştirebilirsiniz. Dosyanızı eklermisiniz

Kod: Tümünü seç
Application.OnTime Now + TimeValue("00:00:10"), "KontrolEt"


olmadı hocam
Kullanıcı avatarı
ercanfb34
Yeni Başlamış
 
Kayıt: 19 Tem 2020 03:53
Meslek: tekniker
Yaş: 32
İleti: 10
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: istanbul

REKLAM
ETA - Excel Konsolide Raporlama
ETA Excel Personel Entegre Raporu

Cevap: Cevap: Belli Bir Süre Sonra Şifre Isteme

İleti#7)  Abidin Özçelik » 17 Haz 2022 13:41

ercanfb34 yazdı:
Abidin Özçelik yazdı:
ercanfb34 yazdı:@Abidin Özçelik ve @Tarkan VURAL çok teşekkür ederim ama benim istediğim biraz daha farklı.

Butona bastım ve şifre ekranı geldi doğru şifreyi yazdım. 1 saat süre boyunca benden butona bastığım zaman şifre istemesin. 1 saat süre dolduğu zaman butona bastığım zaman tekrar şifre istesin.


Burdaki zaman ayarını değiştirebilirsiniz. Dosyanızı eklermisiniz

Kod: Tümünü seç
Application.OnTime Now + TimeValue("00:00:10"), "KontrolEt"


olmadı hocam

Dosyanızı eklermisiniz.
Kullanıcı avatarı
Abidin Özçelik
Siteye Alışmış
 
Adı Soyadı:ABİDİN ÖZÇELİK
Kayıt: 16 Haz 2008 11:47
Konum: Diyarbakır
Meslek: Eczacı
Yaş: 41
İleti: 380
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: DİYARBAKIR


Forum Genel Makro Soruları

Online Kullanıcılar

Bu forumu görüntüleyenler: Google [Bot] ve 2 misafir

Bumerang - Yazarkafe