Excel Hücresine Giriş Yapılamaması

1 2
06/01/2022, 13:29

cdenktas

Kolay Gelsin;

Excel bir çalışmam daha var, Sözleşme tarihi var veya yok durumunda yandaki sütun (Sözleşme Tarihi) kısmına; sözleşme var ise giriş izin verirsin yok ise o hücreye ilgili personel arkadaşlar müdahale etmemesi için ne yapabilirim.
06/01/2022, 19:56

berduş

hücre içi formülle yapamam ama eğer soru olmayacaksa macroyla yapılabilir gibi ama bunun için dosya uzantısı xlsm yada xlsm gibi makro kaydedilebilen formatta olmalı
07/01/2022, 11:35

cdenktas

Size zahmet olacak, yaparsanız sevinirim....
07/01/2022, 12:37

berduş

veri hiç mi girilemeyecek yoksa veri girilse bile uyarı verip boşaltacak mı?
07/01/2022, 12:46

berduş

aşağıdaki kod ilgili sayfanın kod satırına ekler misiniz?
Private Sub Worksheet_SelectionChange(ByVal Target As Range)

If Not Intersect(Target, Range("B:B")) Is Nothing Then 'sadece B,C sütununa bakar
Application.EnableEvents = False
On Error GoTo hata
Dim cll As Range
AdrX = Target.Address & ":" & Target.Address
xDz = Split(AdrX, "$")
ilk = xDz(2)
Son = Val(xDz(4))
If ilk = "1:" Then ilk = "2:"
If Son < 2 Then Son = 2
Set Trgt = Range("B" & ilk & "B" & Son)

For Each cll In Trgt
Set Rng = cll
If Rng.Offset(, -1) = "Var" Then Else Rng.Value = ""
Next cll

End If
hata:
Application.EnableEvents = True
End Sub
07/01/2022, 15:04

cdenktas

Arkadaşlar veri giriş yaparken uyarı verecek ve içerisi boş olacak.... Ben makro yapmaya çalıştım. İlgili kodu yapıştırdım ancak A sütun yok seçtiğimde B sütun yazıyor.
Birde bu dosyayı Gözden Geçir kısmında Çalışma Kitabını paylaş yaptığımda makro çalışacak mı?
1 2