• DİKKAT

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

basit bir fonksiyon sorunu!!!

Katılım
6 Şubat 2006
Mesajlar
18
öncelikle merhabalar...

benim yapmak istediğim basit olarak;

A1 hücresine misal "1" yazdığımda B1 de "byy" ibaresi yazması. "2" yazdığımda başka bir şey..

bu şekilde girilmesi gereken 8 farklı anahtar var! yardımcı olursanız sevinirim..

basit bi sorun ama ben çözemedim..
 
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If IsEmpty(Target) Then Exit Sub
If Target = "1" Then Target = "A"
If Target = "2" Then Target = "B"
If Target = "3" Then Target = "C"
If Target = "4" Then Target = "D"
End Sub

Ã?rnek : 4 yazdığında D'ye çevirir. A,B,C.. yerine kendi değerlerinizi atayın.
 
merhaba bu da vba çözümü olmadan verilmiş bir örnek
 
=ELEMAN(A1;"B1";"B2";"B3";"B4";"B5";"B6";"B7";"B8")
 
sorunum çözüldü arkadaşlar tekrar teşekkür ediyorum.. yalnız

HIDROKINON' Alıntı:
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If IsEmpty(Target) Then Exit Sub
If Target = "1" Then Target = "A"
If Target = "2" Then Target = "B"
If Target = "3" Then Target = "C"
If Target = "4" Then Target = "D"
End Sub

Ã?rnek : 4 yazdığında D'ye çevirir. A,B,C.. yerine kendi değerlerinizi atayın.

bu uygulamayı yapmayı beceremedim.

vbd den modül sayfasına yapıştırıp kaydediyorum bu yuklardaki alıntıyı... ondan sonrasını çalıştıramıyorum.. bu konuda da bilginize başvurucam :)
 
merhaba;
kodu modüle yerleştirdikten sonra sayfa üzerinde bir buton oluşturup bu butona makroyu bağlamanız gerekir eğer buton ile olmayacaksa yukarıdaki kodu modüle değil kod sayfasında sayfanın içine yazmanız gerekir.
 
Sayın barb aros ;

Bu kodu çalışma sayfasının kod bölümüne yapıştıracaksınız. Modüle değil.

Ek'teki örnek isteğinize uygun olmalı.
 
sorunumu hikmet arkadaşımızın formulüyle çözdüm ilginize teşekkürler... bu sizin yazdığınızı istediğimden farklı bunuda başka bi yerde değerlendirebilirirm sanırım...
benim sonradan öğrenmek istediğim kod sayfasına yapıştırarak işlem yapmaktı.. onuda hallettim sanırım. tekrar teşekkürler :)
 
Geri
Üst