Hücredeki işlem içeren değeri Formüle işleyip sonucu bulmak

[ahmetkutuk84]

A1 hücresinde ' 10/5+2*(9-5) ' şeklindeki bir değer var

B1 hücresine ' ="="&A1 ' yazdığımda ' =10/5+2*(9-5) ' şekilde görünüyor.

B1 hücresini kopyalayıp , C1 hücresine değer olarak yapıştırdığım da ve çift tıklayıp enter a bastığımda C1 hücresinde ' 10 ' yazıyor yani A1 hücresinde yazan işlem gerçekleştiriyor.

bu yaptıklarımı yapan yani A1 hücresinde yazan değerleri hesaplayarak sonucu bulacak bir formül var mı dersiniz?

 

[Necdet]

Merhaba,
Değerin A1 hücresinde olduğunu varsayarak, B1 hücresine sonucu verir.
Aşağıdaki kodu kendinize göre uyarlayınız ve deneyiniz.

Sub aa()

    Range("B1") = Evaluate("=" & Trim(Replace(Range("a1"), "'", "")))
    
End Sub

 

[Ömer]

Merhaba,

Aynı işlemi, ad tanımlamaya bu formülü tanımlayarak da yapabilirsiniz.

Ad tanımlamaya, bir ad vererek aşağıdaki formülü tanımlayın. (HESAPLA adını verdiğinizi düşünelim)

=DEĞERBİÇ($A$1)

Daha sonra herhangi bir hücreye =HESAPLA yazarsanız istediğiniz sonucu elde edersiniz.

Not: Bu işlemi yaptığınız dosyayı "makro içerebilen excel çalışma kitabı" olarak kaydedin.

.

 

[ahmetkutuk84]

elinize emeğinize sağlık.
şunuda merak ettim;
macro kullanmadan yazabileceğimiz bir formülü var mıdır?

 

[52779]

@Ömer 'in cevabı ile aynı cevap olacak...
Örnek hazırlamam biraz zaman aldı. Hazırladığım için göndereyim istedim..
https://www.dosyaupload.com/n07L