koddaki sn'yi formda göstermek

[MURATT]

sub test ()
Dim basla3
Dim bekle3
basla = Timer
bekle = 5
While Timer < basla + bekle
DoEvents
DoCmd.RunMacro "test"
end sub

Merhaba bir konuda yardım rica edicem.
Yukarıdaki kod verilen snye göre macroyu bekliyor.Formda bu kodu command butonla çalıştırabiliyorum.
Sn sahasını aynı formda text box olarak nasıl gösterebilirim?
Yani sn sahasını prosedürden değil formdan değiştirmek istiyorum.
Teşekkürler saygılar...

 

[MURATT]

sub test ()
Dim basla
"düzeltme "
Dim bekle
basla = Timer
bekle = 5
While Timer < basla + bekle
DoEvents
wend
DoCmd.RunMacro "test"
end sub

kod bu şekilde...

 

[modalı]

Sayın MURATT

Formun timer özelliğiyle çözdüm. Açılan formda istediğiniz süreyi yazdıktan sonra tab tuşuna basın.

İyi çalışmalar :hey:

 

[MURATT]

gerçekten çok çok teşekkürler
bayağı işime yarayacak.
iyi çalışmalar...

 

[MURATT]

sn modalı tekrar merhaba,

Sizden bir yardım daha alabilirmiyim.

Göndermiş olduğunuz form iki yada daha fazla text box olarak yapılabilirmi?
yani aynı formda iki text box ve ve bunlar ayrı macroları çalıştırsın şeklinde.
Teşekkürler saygılar....

 

[modalı]

Bir çalıştır butonu ekledim

İyi çalışmalar :hey:

 

[MURATT]

sn modalı,
çok teşekkürler saygılar...

 

[MURATT]

sn modalı ,
bu iki textbox'ın birbirinden ayrı iki çalıştır komutuyla çalışma imkanı varmı?
saygılar...

 

[modalı]

Sayın MURATT,

Sanırım siz de yapabilirdiniz.

İyi çalışmalar

 

[MURATT]

sn .modalı gerçekten bu kadar kolay olduğunu sanmıyordum.

Bir önceki gönderdiğiniz formda textboxlardan biri boşsa invalid use of null hatası veriyordu.
Ben iki ayrı çalıştır butonu koydum ama bir tanesi başlayıp diğerini başlatmama izin vermiyor ve geriye saymaya devam ediyordu.
Sanıyorum bende şu kod yoktu ondan olmadı.Çünkü sizin kodlarda çalıştır2 den hariç bir şey göremedim.

Private Sub txtTimer_AfterUpdate()

End Sub

Tekrar teşekkürler saygılar...

 

[MURATT]

tekrar merhaba kodla ilgili değilmiş
command clicklere event procedure koymayı unutmuşum teşekkürler