Saltar al contenido

ejemplo de código de excel sumif vba

Ejemplo: excel vba sumifs

Sub TestMe()
    Dim rValues As Range    ' range containing values to sum
    Dim rCriteria As Range  ' criteria range (must match criteria)
    Dim criteria As Variant ' the criteria
  Dim ws As Worksheet, i As Integer  
  'rValues and rCriteria must have the same size
    Set rValues = Sheets("Sheet1").Range("B2:B100")
    Set rCriteria = Sheets("Sheet1").Range("C2:C100")  ' True or False
    criteria = "=False"
    For i = 2 To 100
        ActiveSheet.Cells(i, 4).value = application.WorksheetFunction _
        	.SumIfs(rValues, rCriteria, criteria)
    Next i
End Sub
¡Haz clic para puntuar esta entrada!
(Votos: 0 Promedio: 0)


Tags : /

Utiliza Nuestro Buscador

Deja una respuesta

Tu dirección de correo electrónico no será publicada. Los campos obligatorios están marcados con *