- Katılım
- 2 Ekim 2023
- Mesajlar
- 7
- Excel Vers. ve Dili
- 2013
Merhaba vba üzerinden bir Sumif formulü yazıyorum ve ikinci kriteri bir değişkene bağlayarak oluşturmak istiyorum ve bu değişkenden dolayı hata alıyorum nasıl çözerim bu sorunu yardımcı olursanız çok mutlu olurum iyi günler dilerim .(Hata aldığım kısım renkli ve altı çizili şekilde belirtilmiştir.)
Public Sub çoklutoplam()
Dim last5 As Long
Dim a As Integer
Dim b As Integer
With Worksheets("Genel")
last5 = .Cells(.Rows.Count, "B").End(xlUp).row
End With
a = 1
b = 2
For i = 1 To last5
If Worksheets("Genel").Cells(i, 12).Value = "Saha Ekipman Montajı" Then
Worksheets("Genel").Range("N" & i).formula = "=SUMIFS(" & "C:C" & "," & "B:B" & "," & "L" & i & "," & "AN:AN" & "," & "a" & ")"
a = a + 1
End If
Next
End Sub
Public Sub çoklutoplam()
Dim last5 As Long
Dim a As Integer
Dim b As Integer
With Worksheets("Genel")
last5 = .Cells(.Rows.Count, "B").End(xlUp).row
End With
a = 1
b = 2
For i = 1 To last5
If Worksheets("Genel").Cells(i, 12).Value = "Saha Ekipman Montajı" Then
Worksheets("Genel").Range("N" & i).formula = "=SUMIFS(" & "C:C" & "," & "B:B" & "," & "L" & i & "," & "AN:AN" & "," & "a" & ")"
a = a + 1
End If
Next
End Sub