dengeceteris
Altın Üye
- Katılım
- 21 Aralık 2019
- Mesajlar
- 204
- Excel Vers. ve Dili
- Office 2016
- Altın Üyelik Bitiş Tarihi
- 15-06-2025
Günaydın arkadaşlar:
Makromda şöyle bir sorunu nasıl aşabilirim.
3-4 tane sayfam da makrolar var. Bunları çalıştırınca call şeklinde farklı sayfaları da tetiklediği için ekran sayfaları geziyor filan bana zararı var mı derseniz yok ama görüntü kirliliği. Bunu engellemenin yolu varmıdır. Ben aşağıdaki gibi bir kod bulmuştum denedim olmadı daha doğrusu bu işler için mi emin de olamadım. Yardımcı olacaklar için tşk ederim. Benim butonum LİSTE sayfamda onun için tekrar listeye dönsün diye de araya Range("L2").Select yazan kısmı ekliyorum
Sub HESAPLA()
With Application
.ScreenUpdating = False
.Calculation = xlCalculationManual
.EnableEvents = False
End With
Call B_LİSTEM
Call MİZAN
Call NAKİT
Call FİNANSAL
Call GELİR
ActiveWindow.ScrollWorkbookTabs Sheets:=11
Sheets("LİSTE").Select
Range("L2").Select
With Application
.ScreenUpdating = True
.Calculation = xlAutomatic
.EnableEvents = True
End With
End Sub
Makromda şöyle bir sorunu nasıl aşabilirim.
3-4 tane sayfam da makrolar var. Bunları çalıştırınca call şeklinde farklı sayfaları da tetiklediği için ekran sayfaları geziyor filan bana zararı var mı derseniz yok ama görüntü kirliliği. Bunu engellemenin yolu varmıdır. Ben aşağıdaki gibi bir kod bulmuştum denedim olmadı daha doğrusu bu işler için mi emin de olamadım. Yardımcı olacaklar için tşk ederim. Benim butonum LİSTE sayfamda onun için tekrar listeye dönsün diye de araya Range("L2").Select yazan kısmı ekliyorum
Sub HESAPLA()
With Application
.ScreenUpdating = False
.Calculation = xlCalculationManual
.EnableEvents = False
End With
Call B_LİSTEM
Call MİZAN
Call NAKİT
Call FİNANSAL
Call GELİR
ActiveWindow.ScrollWorkbookTabs Sheets:=11
Sheets("LİSTE").Select
Range("L2").Select
With Application
.ScreenUpdating = True
.Calculation = xlAutomatic
.EnableEvents = True
End With
End Sub