excel 2013 formülmetni sorusu

[modoste]

merhaba sayın hocalarım
excel 2013 kullanıcısıyım. Formülmetni formülü ile bir hücrede yazan formülü formülün yazımı olarak gösteriyo

Örneğin A1 deki formülü B1 hücresine Formülmetni formülü ile buldurup
=SAĞDAN(M4;UZUNLUK(M4)-BUL("+";M4;1)) görünüyo
B1 hücresindeki veriyi KOPYALA/ÖZEL YAPIŞTIR/DEĞERLERİ diyip C1 hücresine metin olarak yapıştırıyorum.

işte sorum burdan başlıyo C1 hücresinde bu hale geldikten sonra mouse ile yada F2 ile aktif hale geçirip tıklayıp ENTER dediğimde formül çalışıyo

C1:C100 arasında A1:A100 arasındaki formülleri tek seferde kopyalayıp burdada çalışmasını istiyorum ama her defasında hücreye girip (C1,C2...) aktif hale getirip ENTER demek zorundayım. Kolay Yolu varmıdır.

 

[hamitcan]

Bir alan seçin ve kodu çalıştırın.

Sub FormuleCevir()
On Error Resume Next
    For Each Hcr In Selection
            a = Right(Hcr.Text, Len(Hcr.Text) - 1)
             Hcr.Value = "=" & a
    Next
end sub