Süreli Commandbutton yapımı.

[Gorarr]

Selamlar excelde yaptığım userform exploreri açıyor. istediğim butonu tıkladıktan 5sn sonra açolması. (Birde excel deki buton userform1 i açmıyor sanırım bir hata oldu.)Yardımınız için şimdiden teşekkürler.

 

[İhsan Tank]

Selamlar excelde yaptığım userform exploreri açıyor. istediğim butonu tıkladıktan 5sn sonra açolması. (Birde excel deki buton userform1 i açmıyor sanırım bir hata oldu.)Yardımınız için şimdiden teşekkürler.

eki inceler misin

 

[Gorarr]

Elinize sağlık. Çok teşekkür ederim..

 

[İhsan Tank]

Elinize sağlık. Çok teşekkür ederim..

rica ederim
iyi çalışmalar :mutlu:

 

[Gorarr]

Birşey daha sorabilirmiyim. Bu kod excel içinde çalışıyorken neden VBA 6.0 da hata veriyor aceba.

Application.Wait Now + TimeSerial(0, 0, 5)

 

[İhsan Tank]

Birşey daha sorabilirmiyim. Bu kod excel içinde çalışıyorken neden VBA 6.0 da hata veriyor aceba.

Application.Wait Now + TimeSerial(0, 0, 5)

vb6'yı tam bilmiyorum ama sanırım Timer nesnesi ekleseniz olur. diye düşünüyorum

 

[security]

Birşey daha sorabilirmiyim. Bu kod excel içinde çalışıyorken neden VBA 6.0 da hata veriyor aceba.

Application.Wait Now + TimeSerial(0, 0, 5)

Merhaba VB6 da 1 Timer1 Nesnesi Ekleyin Kod Bölümüne

Private Sub Command1_Click()
Timer1.Enabled = True
End Sub
 
Private Sub Form_Load()
Timer1.Enabled = False
End Sub
 
Private Sub Timer1_Timer()
Shell "Explorer.exe C:\", vbMaximizedFocus
End Sub

Kodunu Deneyin...
NOT :Timer1 intervalini 5000 yapın...

 

[Gorarr]

Çok çok teşekkür ederim...

 

[security]

Çok çok teşekkür ederim...

Rica Ederim Kolay Gelsin...