Çözüldü İsim yazdığımda, o isim formül içine yansısın

[ERDALOZ]

Merhaba,
ekte bir dosya mevcut. A2 hücresinde bir isim yazılı B2 hücresine ise o ismin DDE aktarım kodu(sizde #ref hatası görülebilir çünkü bir programdan veri alıyorum).
yapmak istediğim A2 hücresine ne yazarsam onun B2 hücresine o ismin kodu yansısın. örneğin: ERDAL yazarsam =FX|ERDAL.ISE!Last olsun, MEHMET yazarsam =FX|MEHMET.ISE!Last olsun. Metin olarak yansımamalı sanırım formül olarak yansıyor(ya da DDE) Bu mümkünse yardımlarınızı rica ediyorum.
Teşekkürler.

 

[Miraga]

merhabalar
işinizi görürmü

HTML:

İçeriği görebilmek için Giriş yap ya da Üye ol.

 

[ERDALOZ]

merhabalar
işinizi görürmü

HTML:

İçeriği görebilmek için Giriş yap ya da Üye ol.

denedim ama olmadı.

 

[Miraga]

kontrol edermisiniz

 

[ERDALOZ]

kontrol edermisiniz

yaptığınız sanırım metin olarak yansıyor, yaptığınız olursa veri alınan programı kullanmayanlar B2 hücresini #ref hatası olarak görmeli

 

[Ümit Bakacak]

Şu olabilir mi?
=DOLAYLI("FX|"&A2&".ISE!Last")

 

[Caylak]

Merhaba,
Ekli dosyayı dener misiniz?

 

[ERDALOZ]

Merhaba,
Ekli dosyayı dener misiniz?

Konu çözülmüştür teşekkürler.

 

[ERDALOZ]

Merhaba,
Ekli dosyayı dener misiniz?

Üstadım bunu kendi dosyama kopyaladığımda olmadı, makroyu direkt yapıştırdım. sanırım hücre içerik ayarını yapamadım mesala yazıyı A1 hücresine yazınca formül yansımasını B4 hücresine yansımasını istiyorum, yazdığınız makro içeriğinde neresinde düzenleme yapmam lazım?

 

[Caylak]

Target.Offset(0, 1) = Formül(Target.Offset(0, 1), Target.Value)

satırında Target = A sütununda seçilen hücre anlamına geliyor. Örneğin A1 seçtiniz diyelim

Target.Offset(0, 1)

0 satır numarası, 1 sütun numarası,
Yani Target hücresinden (A1) 0 satır ve 1 sütun atla demek. Bu da B1 anlamına gelir.
Siz A1 e yazıp B4 te sonuç almak için;
ilgili satırı

Target.Offset(3, 1) = Formül(Target.Offset(3, 1), Target.Value)

şeklinde değiştirebilirsiniz.
Yalnız ben A sütununa birden fazla giriş yapacağını düşünerek, worksheet change eventına hedef aralığı A:A şeklinde tanımlamıştım, bu durumda her a hücresine girişte yukarıdaki kod problem yaratacaktır diye düşünüyorum.
Bu nedenle ilgili event'ta A:A olarak belirlenen aralığı A1 şeklinde değiştirirseniz sorun ortadan kalkacaktır.

If Not Intersect(Target, Range("A:A")) Is Nothing Then

If Not Intersect(Target, Range("A1")) Is Nothing Then

 

[ERDALOZ]

satırında Target = A sütununda seçilen hücre anlamına geliyor. Örneğin A1 seçtiniz diyelim

0 satır numarası, 1 sütun numarası,
Yani Target hücresinden (A1) 0 satır ve 1 sütun atla demek. Bu da B1 anlamına gelir.
Siz A1 e yazıp B4 te sonuç almak için;
ilgili satırı

şeklinde değiştirebilirsiniz.
Yalnız ben A sütununa birden fazla giriş yapacağını düşünerek, worksheet change eventına hedef aralığı A:A şeklinde tanımlamıştım, bu durumda her a hücresine girişte yukarıdaki kod problem yaratacaktır diye düşünüyorum.
Bu nedenle ilgili event'ta A:A olarak belirlenen aralığı A1 şeklinde değiştirirseniz sorun ortadan kalkacaktır.

çok teşekkürler, konu çözülmüştür.