excelde timer - Baskı Önizleme

excelde timer - Baskı Önizleme

+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Excel (https://accesstr.net/forum-microsoft-excel.html)
+--- Forum: Excel Cevaplanmış Soruları (https://accesstr.net/forum-excel-cevaplanmis-sorulari.html)
+--- Konu Başlığı: excelde timer (/konu-excelde-timer.html)

excelde timer - herdogan - 23/01/2011

[attachment=12210][attachment=12210]Merhabalar;
Acceste yaptığımız gibi Excel userformlarında da timer uygulaması yapılabilirmi?
Geri saydırmak ve belirlenen zamanlarda bir kısım kontrolleri görünmez yapmak gibi

forma üzerindeki text kutusunda geri sayım yaptırsak, 30. sayinede, 1. butonu, gizlese,
60. saniyede 2. butonu gizlese.
Veya geri sayım yaparak bu işleri yapsa

Cvp: excelde timer - herdogan - 25/01/2011

Soruyu biraz değiştirsem iyi olacak.
Eski şekliyle ilgili bir uygulama yapılamıyor heralde.
User formu kaldıralım evvela.
Normal bir sayfaya bir kaç buton ekledik diyelim.
Makra veya hücre içinde bir çalışma ile timer oluşturup, 20 saniyede 1. buton, 40 saniyede 2. buton gizlensin diyebilirmiyiz

Cvp: excelde timer - ogulcan92 - 14/02/2011

Sn:herdogan
UserForm1 üzerine butonlar ekleyiniz (CommandButton1, CommandButton2, CommandButton3) ve bir adette Module1 ekleyiniz butona yazılacak kodlar aşağıdaki gibidir.

Private Sub CommandButton1_Click()

CommandButton2.Visible = True

CommandButton3.Visible = True

Application.OnTime Now + TimeValue("00:00:02"), "Form1"

Application.OnTime Now + TimeValue("00:00:03"), "Form2"

End Sub

Module1 e yazılacak kodlar aşağıdadır.

Private Sub Form1()

UserForm1.CommandButton2.Visible = False

End Sub

Private Sub Form2()

UserForm1.CommandButton3.Visible = False

End Sub