1 Saat Sonra Bİlgİsayarin Yenİden BaŞlamasi Lazim:(((

[sky85]

excel de modüllerde vba kodları ile1 saat sonra bilgisayarı yeniden baştana program gerekli şimdiden teşekkürler

 

[geren36]

bilgisayarını kapatıp açmak için değil ancak, istediğin programı istediğin saatte açıp-kapatmak için; sırasıyla

başlat (start) > ayarlar (settings) > zamanlanmış [ ya da planlanmış ] görevler (scheduled task) : buradan da istediğin ayarları yapabilirsin.

 

[sky85]

:S saol ama kodlar nerde???

 

[geren36]

bunlar kod değil.

bilgisayarının sol alt köşesinde bulunan "start - başlat" düğmesine tıklaman gerekiyor. oradan da sırasıyla söylediğim sekmeleri tıklayarak sonuca gitmen gerekiyor...

 

[sky85]

ama bana vba kodları gerekiyo

 

[Skorpiyon]

Sayın sky85,

Bazı Anakartların BIOS ayarlarında bilgisayarı istenilen saatte açmak için gerekli yerler mevcut. Siz illa kod istediğiniz için; bu konuda bilgim yok ama, Sayın Üstad'lara makro ile Bios ayarlarına ulaşılıp ulaşılamayacağını sormanızın daha doğru olacağını düşünüyorum.

Saygılarımla...

 

[Skorpiyon]

Bios üzerindeki ayarı;

ALINTIDIR

Bu ayar bilgisayarınızı istediğiniz saatte açmaya yarar. Bilgisayarınız ayarladığınız saatte açılır fakat bu ayarı günü gününe yapamazsınız hergün aynı saatte açar. Ayarı yapmak için yazdığım yolu izleyin.

1-BIOS'u açın ve POWER MANAGEMENT ayarlarına girin.
2-Resume on Alarm seçeneğini Enebled yapın.
3-Gelen seçeneklerden Date(of Month)Alarm olanı 1(açılmasını istediğiniz süre - ay olarak) yapın.
4-Time(hh:mm:ss)Alarm olanı açılmasını istediğiniz saat olarak ayarlayın.

Saygılarımla...

 

[hamitcan]

MrExcel sitesinden bir kod buldum. Bu kod 30 sn sayıp bilgisayarı kapatıyor
Umarım işinize yarar.

Sub test() 
Shell (Environ("SystemRoot") & "\System32\shutdown.exe -s") 
End Sub

 

[sky85]

hamitcan hocam saolun ama bana lazım olan kodlar bunlar değil(

 

[sky85]

lütfen bi bilen var mı??

 

[Mahmut Bayram]

Şunu UserForm a koy 1 buton ekle.

Private Sub CommandButton1_Click()
Application.OnTime Now + TimeValue("01:00:00"), "kapat"
End Sub

'bunu da modüle yaz

Sub kapat()
Shell "shutdown -s -f -t 0"
End Sub

Kolay gelsin.