=FORMUL() Kullanımı Hakkında

[vardar07]

Merhabalar,
Bazı dosyalarda formulleri görmek için formül olan hücrenin yanındaki hücreye ;Mesela A1 de kullanılan formulü görmek için B1'e =Formul(A1) yazınca (#AD )hatasını veriyor. Buhata yeni açılan çalışma kitabında meydana gelmekte. Normalde bu formul uygulanan dosyalarda olmuyor. Sebebini bulamadım. Bilen arkadaşların bilgisine müracaat ediyorum.

 

[turist]

Kullandığınız fonksiyon "KULLANICI TANIMLI FONKSİYON"dur.

Function Formul(Mycell As Range)
Formul = Mycell.Formula
End Function

Kodunu, VBA da bir modül açarak yazın.
Daha sonra sayfalarınızda bu fonksiyonu kullanabilirsiniz.
Kod sadece kodu yazdığınız dosya için geçerlidir.

İsterseniz boş bir excel dosyası açıp dosyayı Formul.xlam olarak kaydedip,
daha sonra Excel Eklenti ekleme yoluyla, kalıcı olarak da kullanabilirsiniz.

 

[vardar07]

Kullandığınız fonksiyon "KULLANICI TANIMLI FONKSİYON"dur.

Function Formul(Mycell As Range)
Formul = Mycell.Formula
End Function

Kodunu, VBA da bir modül açarak yazın.
Daha sonra sayfalarınızda bu fonksiyonu kullanabilirsiniz.
Kod sadece kodu yazdığınız dosya için geçerlidir.

İsterseniz boş bir excel dosyası açıp dosyayı Formul.xlam olarak kaydedip,
daha sonra Excel Eklenti ekleme yoluyla, kalıcı olarak da kullanabilirsiniz.

Sayın turist ilgine teşekkürler.Ancak bende aşağıdaki gibi kod buldum.Ama bu kodda sizin vermiş olduğunuz kodda "ambiguous name detected " hatası veriyor.

Function formul(InputCell As Range) As String
formul = InputCell.FormulaLocal
End Function

 

[vardar07]

Yeni bir çalışma kitabı açıp kodları uygulayınca oluyor. Teşekkürler.