vahap
Yeni Üye
- Katılım
- 27 Ocak 2019
- Mesajlar
- 24
- En iyi yanıt
- 0
- Puanları
- 1
- Konum
- Diyarbakır
- Ad Soyad
- Vahap Batal
- Office Vers.
- 2010 tr
Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, [E7:AI26]) Is Nothing Then Exit Sub
On Error Resume Next
Application.EnableEvents = False
Target.Value = UCase(Replace(Replace(Target.Value, "i", "İ"), "ı", "I"))
Application.EnableEvents = True
End Sub
E7:AI9 | Bu aralıklarda aynı sütüne birden fazla karekter gelmemesi |
E11:AI13 | |
E15:AI17 | |
E15:AI17 | |
E23:AI25 |
Eyvallah Evren Bey
Bir de husus daha vardı
İlgilenirseniz sevinirim.
Teşekkür ederim.
E7:AI9
Bu aralıklarda aynı sütüne birden fazla karekter gelmemesi
E11:AI13
E15:AI17
E15:AI17
E23:AI25
E7:AI9 |
E11:AI13 |
E15:AI17 |
E15:AI17 |
E23:AI25 |
Normal mesai+İzin |
Çalışılmayan hafta ve resmi tatiller |
Çalışılan hafta ve resmi tatiller Bu üç şıktan sadece birini seçebilmeliyiz yani bir sütunda 2 şık seçildiği zaman yanlış bir işlem oluyor. 2 şıka "değer girilmesine müsaade edilmemesi. ilginizden dolayı teşekkür ederim. Bir de bu Yardım yazan yeri çözüldü olarak nasıl değiştirebiliriz. İyi geceler |