Çözüldü makro ile negatif değer varsa başka sutuna

Koboy66 · 2 Tem 2020

Merhabalar aşağıdaki kodu kullanıyorum takıldığım nokta

(-)negatif rakam varsa bunu f sutuna değilde g sutuna yazmasını istiyorum

pozitif rakamlar f de negatifler g sutuna

C++:

Sub formulyaz()
Dim sat As Long, i As Long
sat = Sheets("Sayfa1").Cells(65536, "A").End(xlUp).Row
For i = 2 To sat
    Sheets("Sayfa1").Cells(i, "F").Formula = "=IF(RC[-3]="""","""",SUM(R1C4:RC[-2])-SUM(R1C5:RC[-1]))"
Next i
End Sub

End Sub

Vedat ÖZER · 2 Tem 2020

Merhaba,

Rakamlar hangi sütunda ?

Koboy66 · 2 Tem 2020

merhaba raklmar d ve e sutununda

Vedat ÖZER · 4 Tem 2020

Aşağıdaki kodu dener misiniz

Kod:

Sub formulyaz()
Dim sat As Long, i As Long
sat = Sheets("Sayfa1").Cells(65536, "A").End(xlUp).Row

For i = 2 To sat
    If Sheets("Sayfa1").Cells(i, "D") < 0 Then
    Sheets("Sayfa1").Cells(i, "F") = Abs(Sheets("Sayfa1").Cells(i, "D"))
    Else
    If Sheets("Sayfa1").Cells(i, "E") > 0 Then
    Sheets("Sayfa1").Cells(i, "G") = Sheets("Sayfa1").Cells(i, "E")
    End If
    End If
Next i


End Sub

Koboy66 · 4 Tem 2020

Çok teşekkür ederim

Çözüldü makro ile negatif değer varsa başka sutuna

Koboy66

Vedat ÖZER

Koboy66

Vedat ÖZER

Koboy66