Hücrede formülü sabitleme!!!!!

[Akansu]

Hücreye yazdığım bir formül var örneğin =A1*B1
bu formül C1 hücresine tanımlanmış
A1=usd maaşı
B1=usd kur
C1=usd karşılığı tl maaşı gösteriyor

Benim öğrenmek istediğim C1 hücresine yazılacak tl rakkamı ile usd'ye dönermi
ve C1 e sayı yazarsam formül kaybolurmu

Teşekkürler

 

[fbscorpion]

C1 hücresine doğrudan sayı yazarsan aynı hücrede onun USD karşılığını öğrenemezsin. Eğer C1 hücresine sayı veya yazı yazarsan formül kaybolur.

 

[parametre]

Hücreye yazdığım bir formül var örneğin =A1*B1
bu formül C1 hücresine tanımlanmış
A1=usd maaşı
B1=usd kur
C1=usd karşılığı tl maaşı gösteriyor

Benim öğrenmek istediğim C1 hücresine yazılacak tl rakkamı ile usd'ye dönermi
ve C1 e sayı yazarsam formül kaybolurmu
d1 hucresine c1deki hesaplanan tl hesabını =c1/b1 diye formulu girerseniz d1 hucresinde tlye cevirdiginiz rakamın usd karsılıgını bulursunuz

isteginiz bu mudur ?

 

[Ömer]

Merhaba,

Çalıştığınız sayfanın kod bölümüne kopyalayın. C1:C10 arasına sayı girerseniz girilen sayı / B1 değerini verir. C hücresindeki sayıyı silerseniz yada 0 yazarsanız =A1*B1 formülünü yazar.

Private Sub Worksheet_Change(ByVal Target As Range)
On Error GoTo Son
If Intersect(Target, [[COLOR=red]C1:C10[/COLOR]]) Is Nothing Then Exit Sub
If Target.HasFormula = True Then Exit Sub
If IsNumeric(Target) = True Then
    Application.EnableEvents = False
    Target = CDbl(Target.Value) / CDbl(Target.Offset(0, -1).Value)
End If
If Target = 0 Then
Target.Formula = "=RC[-2]*RC[-1]"
End If
Application.EnableEvents = True
Son:
End Sub

.

 

[Akansu]

Değerli arkadaşlar ilginize ve yardımlarınıza çok teşekkür ederim

Ömer arkadaşımın hazırladığı kod işe yarayacaktır muhtemelen,

fakan benim bu kod yazma yada çalıştırma konusunda daha önce bi bilgim

olmadığından açıkçası beceremedim.

Araştırdım ama beceremedim

bu konuyu sade bir biçimde anlatacak yada anlaımın nerede olduğunu

söyleyecek bi arkadaşım olursa sevinirim

ilginize ve yardımlarınıza teşekkür ederim

 

[Ömer]

Önce boş bir excel sayfası açarak aşağıdaki linkte bulunan uygulamayı yaparak çalışmayı kapatın.

Makroları etkin kılmak.Güvenlik düzeyini düşürmek

Daha sonra kodları aşağıda anlatılan gibi ilgili sayfaya yapıştırın.

Sayfaya Ait Kodlar ve Uygulama Yöntemleri (Resimli Anlatım)

.
.

 

[Akansu]

İlginize teşekkür ederim