Arkadaşlar selam.
Private Sub Worksheet_Change(ByVal Target As Range)
Application.EnableEvents = False
If flag = 1 Then
If Not IsEmpty(oval) Then
If Not Intersect(Target, Target.Worksheet.Range("J10:J500")) Is Nothing Then
Target.Value =...
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Count > 1 Then Exit Sub
If Not Intersect(Target, Range("C18")) Is Nothing Then Range("$C$19").Select
If Not Intersect(Target, Range("C19")) Is Nothing Then Range("C20").Select
If Not Intersect(Target, Range("C20")) Is Nothing Then...
daha önce bu kodları başka bi çalışma kitabında kullanmıştım. fakat şimdi c ve e sütunları içinde gezerek sadece boş geçilemez uyarılarını vermesini sağlamak için nasıl sadeleştirebiliriz??
Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, [b:f]) Is Nothing Then Exit Sub...
Merhabalar, Yapmak istediğim çalışma sayfasında aktif hücre imlecinin belirli hücrelerde enter veya ok tuşları ile dolaşabilmesini saglamak.
Çalışma sayfasını kilidi açılmış hücrelerde çalışmaya izin vererek koruyorum. Seçenekler, düzen de seçimi enter tuşundan sonra taşı işaretli olduğu...
Sizlere daha iyi bir deneyim sunabilmek icin sitemizde çerez konumlandırmaktayız, web sitemizi kullanmaya devam ettiğinizde çerezler ile toplanan kişisel verileriniz Veri Politikamız / Bilgilendirmelerimizde belirtilen amaçlar ve yöntemlerle mevzuatına uygun olarak kullanılacaktır.