Bintang
Altın Üye
- Katılım
- 31 Ekim 2006
- Mesajlar
- 328
- Excel Vers. ve Dili
- Microsoft Office Professional Plus 2019,Türkçe
- Altın Üyelik Bitiş Tarihi
- 05-09-2029
DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
Altın Üyelik Hakkında Bilgi
Malesef olmadıMakro kaydet yapın kaydetme esnasında bu ayarı değiştirin tiki kaldırın daha sonra kaydettiğiniz makroyu bir kez çalıştırın tekrar Manuel girdiğinizde düzeldi mi bakın
Private Sub Workbook_Open()
'Personal.xlsb kitabının "ThisWorkbook" koduna yazılacak.
Cells.Find(What:="", After:=ActiveCell, LookAt:=xlPart).Activate
End Sub
Merhaba,
Normalde excel açık kaldıkça o kutulardaki değişiklik son işaretlenen ne ise o şekilde kalır. Excelden çıkınca temizlenir. Sizde bir çeşit takılma problemi var gibi görünüyor. Takılma sebebi kendiliğinden kaybolabilir. Geçici bir çözüm olarak Personal.xlsb kitabının "ThisWorkbook" koduna aşağıdaki makroyu yazın. Her açılışta bul kutusundaki o tıkı temizler.
.Kod:Private Sub Workbook_Open() 'Personal.xlsb kitabının "ThisWorkbook" koduna yazılacak. Cells.Find(What:="", After:=ActiveCell, LookAt:=xlPart).Activate End Sub