LOKASYON isimli açılan kutunun güncelleştirme sonrasında olayına aşağıdaki kodu ekleyerek deneyiniz.

GLokasyon = Me.LOKASYON



Select Case GLokasyon



    Case "TURAN"

    

        GAlan = "Ocak1"

    

    Case "ARAMA YARMA"

    

        GAlan = "Ocak2"

    

    Case "SULUDERE"

    

        GAlan = "Ocak3"

    

    Case "KORKMAZ"

    

        GAlan = "Ocak4"

    

    Case "KIZILTEPE"

    

        GAlan = "Ocak5"



End Select



    Me.Metin114 = Dlookup (GAlan, "DAMPER HACMİ", "[EKİPMAN KODU]='" & [EKİPMAN KODU] & "'")

Ayrıca, Yapılmaması Gereken Ölümcül Hatalar konusunu mutlaka inceleyiniz.