• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

HÜcreye Daha Önce TanimladiĞim ....

Katılım
20 Mart 2006
Mesajlar
104
merhaba..sormak isteğim şu..yardımcı olacak arkadaşlara şimdiden tşk ederim..

mesala bir hücreye 1 yazınca yine o hücreye MALZEME,2 yazınca İŞÇİLİK ve 3 yazınca GENEL MASRAF kelimelerini yadırabilirmiyiz.yani o verileri nasıl tanımlayabiliriz.değişik önerileri olanlarda olabilir.saygıalr
 
Merhaba, diyelim ki bu işlemi A sütünunda yapmak istiyorsunuz (farklı sütunlarda yapacaksanız kodda ufak bir değişiklik yeterli), aşağıdaki kodu ilgili sayfanın kod bölümüne kopyalayınız

Kod:
Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, [A:A]) Is Nothing Then Exit Sub
If Target <> "" And Target = 1 Then Target.Value = "MALZEME"
If Target <> "" And Target = 2 Then Target.Value = "&#304;&#350;&#199;&#304;L&#304;K"
If Target <> "" And Target = 3 Then Target.Value = "GENEL MASRAF"
End Sub
 
yardımlarınız için tşk ederim Necdet bey..
 
Geri
Üst