Soru Makro İle Koşullu Çarpma İşlemi

umit1907

New member
Üye
#1
Merhabalar
ilk destek sorumuzla foruma merhaba diyelim. Benim yapmak istediğim satış fiyatları aynı olan ürünler var fakat bu fiyatlar alıcılara göre bazen değişiyor. bu fiyatları makro ile otomatik değiştirebilirmiyiz.
 

Ekli dosyalar

metehan8001

Moderator
Yönetici
Moderatör
#2
Kod:
Sub exceldepo() 
For i = 2 To Cells(Rows.Count, 1).End(xlUp).Row 
Set BUL = Range("R:R").Find(Cells(i, "a")) 
If Not BUL Is Nothing Then
 Cells(i, "f") = Cells(i, "b") * BUL.Offset(0, 1) 
Else 
Cells(i, "f") = Cells(i, "b") * Cells(i, "C") 
End If 
Next 
End Sub
 

Ekli dosyalar

Üst