Çarpma işlemi

[iaslan517]

merhabalar, j2 hücresine girilen değeri E2den itibaren en son dolu hücreye kadar çarpma işlemi makro ile yazılabilir mi?

 

[Ömer]

Merhaba,

Bu şekilde deneyin.

Aynı işlemi makro kullanmadan;
Kopyala/Özel Yapıştır/Değerleri/Çarp ile yapabilirsiniz.

Sub Carp()
    
    Dim son As Long
    
    son = Cells(Rows.Count, "E").End(xlUp).Row
    
    Range("J2").Copy
    Range("E2:E" & son).PasteSpecial Paste:=xlPasteValues, Operation:=xlMultiply
    
    Application.CutCopyMode = False
    Range("E2").Select
    
End Sub

.

 

[iaslan517]

teşekkür ederim