Excelde Hesaplama

[musaagac]

Arkadaşlar Excel sayfa birde C1 hücresine vb modüle yardımı ile A1 ve A2 deki değerleri çarpım atmasını istiyorum. excele C1 hücresi =A1*A2 yazmadan nasıl yapabilirim

 

[uzmanamele]

merhaba

sanırım bu çarpma işlemini formül yerine kod yazarak yapmak istiyorsunuz
aşağıdaki kod işinizi görür mü?

Private Sub Worksheet_Change(ByVal Target As Range)
On Error Resume Next
If Intersect(Target, [A1:A2]) Is Nothing Then Exit Sub
[c1] = Application.WorksheetFunction.Product(Range("a1:a2"))
End Sub

veya

Private Sub Worksheet_Change(ByVal Target As Range)
On Error Resume Next
If Intersect(Target, [A1:A2]) Is Nothing Then Exit Sub
[c1] = [a1] * [a2]
End Sub

not:
kodları sayfanın kod bölümüne yazınız.

 

[musaagac]

Bunu Modüle yazıyorum olmuyor

 

[karadush]

İnceleyiniz

Sayın musaagac;

Yukarıda uzmanamele; arkadaşımız kodları vermiş kodları verirken de sayfaya yazınız diye belirtmiş module yazın dememiş ki


her iki koduda ekledim çalıştı ornek ekliyorum Sayfa1 de 1. Kod Sayfa2 dede 2. kod mevcut

 

[yusufk]

mrb

mrb beyfendi
sizi izliyorum gerçekten çok başarılısınız. müsait iseniz bir hücrede ki sayının karakökünü nasıl bulabilirim.
şimdiden teşekkürler

 

[yusufk]

kusura bakmayın buldum