excellde her 10 saniyede f5 yapmasını sağlayacak kod lazım

bjk42

Altın Üye
Katılım
21 Ocak 2016
Mesajlar
86
Excel Vers. ve Dili
excell 2010 türkçe
Altın Üyelik Bitiş Tarihi
08-11-2026
yardımcı olabilecek var mı
 

Trilenium

Destek Ekibi
Destek Ekibi
Katılım
16 Eylül 2008
Mesajlar
1,289
Excel Vers. ve Dili
Microsoft Office 2019 English
Sorularınızı lütfen forum kurallarına göre yöneltiniz.

Excel explorer,chrome vb. tarayıcı mantığında çalışmaz.

Her 10 saniye de bir defa olmak üzere neyi güncellemek istiyorsunuz?
 

tugkan

Altın Üye
Katılım
6 Kasım 2004
Mesajlar
481
Excel Vers. ve Dili
Excel 2016
Türkçe 64 BIT
Altın Üyelik Bitiş Tarihi
16-10-2025
Ayrıca excelde F5 e basınca git komutu çalışıyor. Bu haliyle bir işinize yaramaz. Belirli bir alanı mı güncellemek istiyorsunuz yoksa başka bir şey mi?
Tam olarak ne için istediğinizi örnekle yazarsanız ona göre yardım alabilirsiniz.
 

bjk42

Altın Üye
Katılım
21 Ocak 2016
Mesajlar
86
Excel Vers. ve Dili
excell 2010 türkçe
Altın Üyelik Bitiş Tarihi
08-11-2026
Sorularınızı lütfen forum kurallarına göre yöneltiniz.

Excel explorer,chrome vb. tarayıcı mantığında çalışmaz.

Her 10 saniye de bir defa olmak üzere neyi güncellemek istiyorsunuz?
yaptığım excellde bir yerde rastgeleara formülüm var o her 10 sn de bir değiştirmek için düşünmüştüm işe yaramaz mı
 

bjk42

Altın Üye
Katılım
21 Ocak 2016
Mesajlar
86
Excel Vers. ve Dili
excell 2010 türkçe
Altın Üyelik Bitiş Tarihi
08-11-2026
Ayrıca excelde F5 e basınca git komutu çalışıyor. Bu haliyle bir işinize yaramaz. Belirli bir alanı mı güncellemek istiyorsunuz yoksa başka bir şey mi?
Tam olarak ne için istediğinizi örnekle yazarsanız ona göre yardım alabilirsiniz.
yaptığım excellde bir yerde rastgeleara formülüm var o her 10 sn de bir değiştirmek için düşünmüştüm işe yaramaz mı
 

Trilenium

Destek Ekibi
Destek Ekibi
Katılım
16 Eylül 2008
Mesajlar
1,289
Excel Vers. ve Dili
Microsoft Office 2019 English
Sayın BJK42
,
Formülleriniz otomatik değil manuel olarak işlem yapıyor, ve siz her 10 saniye de bir defa olmak üzere hesaplamayı aktif etmesini mi talep etmektesiniz ?
 

bjk42

Altın Üye
Katılım
21 Ocak 2016
Mesajlar
86
Excel Vers. ve Dili
excell 2010 türkçe
Altın Üyelik Bitiş Tarihi
08-11-2026
Sayın BJK42
,
Formülleriniz otomatik değil manuel olarak işlem yapıyor, ve siz her 10 saniye de bir defa olmak üzere hesaplamayı aktif etmesini mi talep etmektesiniz ?
evet yani her hücreye dokununca veriler değişir ya onu zamana bağlı olarak yapsın onu da ben değiştirebileyim bazen 10 sn yapacam bazen 15 sn gireceğim değere göre rastgele formülü yeni değerleri getirsin bu arada rastgeleara formülü tanımlı excellimde çalışıyor
 

Trilenium

Destek Ekibi
Destek Ekibi
Katılım
16 Eylül 2008
Mesajlar
1,289
Excel Vers. ve Dili
Microsoft Office 2019 English
Tamamdır.

B1 hücresine ne kadar süreyle hesaplamayı durdurulmasını istiyorsanız oraya saniyeyi yazın örneğin 3,5,7,10

VBA tarafına gelin ve Thisworkbook yazan yere 2 defa clickleyip aşağıdaki kodları yapıştırın.




Dim SonrakiGuncelleme As Double

Private Sub Workbook_Open()
Application.Calculation = xlCalculationManual
FormulBaslat
End Sub

Private Sub Workbook_BeforeClose(Cancel As Boolean)
FormulDurdur
Application.Calculation = xlCalculationAutomatic
End Sub

Sub FormulBaslat()
SonrakiGuncellemeZamanla
End Sub

Sub SonrakiGuncellemeZamanla()
Application.Calculate
Dim sureSaniye As Double
sureSaniye = Sheets("Sheet1").Range("B1").Value
SonrakiGuncelleme = Now + TimeValue("00:00:" & sureSaniye)
Application.OnTime SonrakiGuncelleme, "ThisWorkbook.SonrakiGuncellemeZamanla"
End Sub

Sub FormulDurdur()
On Error Resume Next
Application.OnTime SonrakiGuncelleme, "ThisWorkbook.SonrakiGuncellemeZamanla", , False
End Sub
 

bjk42

Altın Üye
Katılım
21 Ocak 2016
Mesajlar
86
Excel Vers. ve Dili
excell 2010 türkçe
Altın Üyelik Bitiş Tarihi
08-11-2026
Tamamdır.

B1 hücresine ne kadar süreyle hesaplamayı durdurulmasını istiyorsanız oraya saniyeyi yazın örneğin 3,5,7,10

VBA tarafına gelin ve Thisworkbook yazan yere 2 defa clickleyip aşağıdaki kodları yapıştırın.




Dim SonrakiGuncelleme As Double

Private Sub Workbook_Open()
Application.Calculation = xlCalculationManual
FormulBaslat
End Sub

Private Sub Workbook_BeforeClose(Cancel As Boolean)
FormulDurdur
Application.Calculation = xlCalculationAutomatic
End Sub

Sub FormulBaslat()
SonrakiGuncellemeZamanla
End Sub

Sub SonrakiGuncellemeZamanla()
Application.Calculate
Dim sureSaniye As Double
sureSaniye = Sheets("Sheet1").Range("B1").Value
SonrakiGuncelleme = Now + TimeValue("00:00:" & sureSaniye)
Application.OnTime SonrakiGuncelleme, "ThisWorkbook.SonrakiGuncellemeZamanla"
End Sub

Sub FormulDurdur()
On Error Resume Next
Application.OnTime SonrakiGuncelleme, "ThisWorkbook.SonrakiGuncellemeZamanla", , False
End Sub
formül bende çalışmıyor yanlış yere mi yapıştırdım acaba
 

RBozkurt

𐱅𐰇𐰼𐰚
Altın Üye
Katılım
10 Ocak 2018
Mesajlar
745
Excel Vers. ve Dili
Microsoft Office 2024
Google Sheets
Altın Üyelik Bitiş Tarihi
19-12-2026
İlgili formülü paylaşınız.
 

RBozkurt

𐱅𐰇𐰼𐰚
Altın Üye
Katılım
10 Ocak 2018
Mesajlar
745
Excel Vers. ve Dili
Microsoft Office 2024
Google Sheets
Altın Üyelik Bitiş Tarihi
19-12-2026
Deneyiniz,
 

Ekli dosyalar

  • 17.7 KB Görüntüleme: 7

RBozkurt

𐱅𐰇𐰼𐰚
Altın Üye
Katılım
10 Ocak 2018
Mesajlar
745
Excel Vers. ve Dili
Microsoft Office 2024
Google Sheets
Altın Üyelik Bitiş Tarihi
19-12-2026
Dosyayı açıyorsunuz, makrolar etkinleştirilsin vb. olan uyarı varsa okeyliyorsunuz. Bu kadar.
10 sn süre geçtikten sonra değer değişiyor.
 

bjk42

Altın Üye
Katılım
21 Ocak 2016
Mesajlar
86
Excel Vers. ve Dili
excell 2010 türkçe
Altın Üyelik Bitiş Tarihi
08-11-2026
Dosyayı açıyorsunuz, makrolar etkinleştirilsin vb. olan uyarı varsa okeyliyorsunuz. Bu kadar.
10 sn süre geçtikten sonra değer değişiyor.
benim excellde mi sıkıntı var bende çalış mıyor siz excele ekleyip atar mısınız ondan mı kaynaklanıyor bilemedim
 

Trilenium

Destek Ekibi
Destek Ekibi
Katılım
16 Eylül 2008
Mesajlar
1,289
Excel Vers. ve Dili
Microsoft Office 2019 English
Ben size kodları vermiştim diye hatırlıyorum.

A1 random sayı üretir.

B1 verilen saniyeyi belirtir.. ben 5 yaptım siz değiştirebilrisiniz... isterseniz kodun içinden de bu süreyi sabitleyebilirsiniz.

Dosyanız ektedir.

Bu arada internetten dosya indirdikten sonra windows11 kullanıyorsanız dosyaya sağ tuşlayın ve özelliklere gelin. En alt satırda engellemeyi kaldırı işaretleyip tamam diyip öyle deneyin. Aksi takdirde çalışmayabilir.

254680
 

Ekli dosyalar

Üst