Arkadaşlar merhaba.

Ekte gönderdiğim örnek dosyada "görevi" açılır kutusu güncellendikten sonra kişilerin görev yaptıkları yere göre görev isimli kutulara 1 ekleniyor. Fakat ikinci kez başka bir görev seçersem aynı satırda iki yada üç adet 1 sayısı oluyor. Uğraştım ama çözemedim. Yardımcı olursanız sevinirim. Yardımda bulunan arkadaşlara şimdiden çok teşekkür ederim.

Aşağıdaki kodu uygula

kodu şöyle değiştirin
------------------------------------
Private Sub görevi_AfterUpdate()
If Me.görevi = "giriş" Then
Me.giriş = "1"
Me.üs_kat = "0"
Me.bahçe = "0"
End If
If Me.görevi = "üs kat" Then
Me.giriş = "0"
Me.üs_kat = "1"
Me.bahçe = "0"
End If
If Me.görevi = "bahçe" Then
Me.giriş = "0"
Me.üs_kat = "0"
Me.bahçe = "1"
End If
End Sub
-----------------------------------

Çok teşekkür ediyorum. Kendinize iyi bakın.