Hucredekı formulu bır baska hucreye formul olarakyazdırma (orn:=INT('Bill No 4'!I14)

[falkan]

Arkadaslar Merhaba
Hucrede kı bır formulu bır baska hucreye formul olarak yazdıran fonksıyon varmıdır veya nasıl yapılabılır.
Ornek :

A10 hucresınde : =INT('Bill No 4'!I14) formulu var ancak bu deger olarak gelıyor
bu formulu ancak hucrenın uzerıne gelınce gorebılıyorum F2

bu formulu C10 hucresıne =INT('Bill No 4'!I14) gozukecek sekılde yazdıran fonksıyorn veya yontem konusunda yazrdımcı olurmusunuz.

Saygı ve Sevgılerımle

Falkan

 

[Ömer]

Merhaba,

Boş bir module kopyalayın.

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

Daha sonra görmek istediğiniz hücreye,

=formul(A10) şekilinde yazınız..

.

 

[falkan]

Merhaba Cok Tesekkur ederim Sagolasiniz.

Ozur dilerim soruyu yanlis sormusum ben.

Soru su sekildeydi.
A10 hucresınde : ='Bill No 4'!I14 formulu var ancak bu deger olarak gelıyor
bu formulu ancak hucrenın uzerıne gelınce gorebılıyorum F2

bu formulu C10 hucresıne INT fonksiyonuyla birlikte =INT('Bill No 4'!I14) gozukecek sekılde yazdıran fonksıyorn veya yontem konusunda yazrdımcı olurmusunuz.

Sorunun dogrusu buydu arkadaslar.

Saygı ve Sevgılerımle

 

[Ömer]

Maalesef anlayamadım, küçük bir örnek dosya ekleyerek açıklarmısınız

 

[falkan]

Hemen Gonderiyorum Omer Bey

 

[uzmanamele]

merhaba

belki bu işinizi görür.

araçlar / seçenekler / görünüm / formüller
onay kutusunu işaretleyin.

 

[falkan]

Merhaba,
EKTE ki dosyada gorulecegi uzere, Collection Sheet de.
F Sutunundaki formulu (='Bill No 4'!I14)
K sutununa INT fonksiyonunu da ekleyerek yazdirmak istiyorum
K sutunu soyle olmali =INT('Bill No 4'!I14) seklinde yazdirilmali.
Yardimci olurmusunuz lutfen.

Saygilar

Falkan

 

[falkan]

Dosya

Merhaba,
EKTE ki dosyada gorulecegi uzere, Collection Sheet de.
F Sutunundaki formulu (='Bill No 4'!I14)
K sutununa INT fonksiyonunu da ekleyerek yazdirmak istiyorum
K sutunu soyle olmali =INT('Bill No 4'!I14) seklinde yazdirilmali.
Yardimci olurmusunuz lutfen.

Saygilar

Falkan

 

[falkan]

Omer Bey dosyayi onceki mesaja ekleyemedim kusura bakmayin

Saygilar

falkan

 

[Ömer]

K6 için,

=INT(F6)

İşinize yaramıyor mu?

.

 

[falkan]

Omer Bey isime yaramiyor
Cunku yukarida belirttigim sekilde formul value olarak oraya yazilmasi gerekiyor.

Saygilar

Falkan

 

[Ömer]

Sayın falkan,

Bir türlü anlayamadım,

Function formul(InputCell As Range) As String
formul = Replace(InputCell.FormulaLocal, "=", "=INT(") & ")"
End Function

İstediğiniz bu mu?

=formul(f6)

.

 

[Necdet]

Merhaba,

Ömer beyin ilk önerisi zaten formülü açık açık yazdırıyor, onu denediniz mi?

 

[falkan]

Cunku 'Bill No 4'!I14 gibi binlerce satir var
Amac bunlarin hepsinin basina INT fonksiyonunu Eklemek
INT fonksiyonuyla bu formulu kullanmak

Saygilar

Falkan

 

[falkan]

Omer Bey in onerisi dogrudur. Ben ilk soruyu yanlış sordugum için yeniden soruyu sormak zorunda kaldım. Kusura bakmahyınız.
Yardımcı olurmusunuz bu konuda.

Saygılar

Falkan

 

[falkan]

Omer Bey cok tesekkur ederim. Istedigim buydu.
Saygilar

Falkan

 

[uzmanamele]

merhaba
sanırım böyle birşey arıyorsunuz.
ek dosyayı inceleyiniz.

Sub tamsayıyap()
For i = 1 To Range("c65536").End(3).Row
Cells(i, 4) = Int(Cells(i, 3))
Next
End Sub

 

[GrSeL]

kalıcı fonksiyon

Merhaba,

Boş bir module kopyalayın.

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

Daha sonra görmek istediğiniz hücreye,

=formul(A10) şekilinde yazınız..

.

sayın ömer bey;
benim kodlarla çalışmam pek olmadı, ama inceleyip böyle yararlı olabilecek kodları excel' de kalıcı fonksiyon olarak yapmam gerektiğinde ne yapmam gerekiyor?
yani, bu kodu kopyaladım, excelin içinde Geliştirici\visual basic altında bir modül açıp oraya yapıştırdım, kaydet dedim kaydettim fakat exceli kapatıp yeni bir sayfa açtığımda bu fonksiyon işe yaramıyor, her seferinde böyle bir fonksiyon ihtiyacımızda, hep baştan yaptığımızı mı yapacağız, bu kodları kalıcı fonksiyon olarak yapmak için ne yapmamız gerekir.
saygılarımla;

 

[Korhan Ayhan]

Selamlar,

Aşağıdaki linkte konu anlatımı yapılmıştır. İncelermisiniz.

[URL="http://www.excel.web.tr/showthread.php?t=61736"]Hazırlanan Eklenti Dosyasını Excele Tanıtmak (Resimli Anlatım)[/url]