Microsoft Excel

Excel und VBA: Formeln, Programmierung, Lösungen

Die Excel/VBA-Beispiele

Thema

Eintragen von Matrixformeln in eine Jahres-/Monatsmatrix

Gruppe

Vba

Problem

In eine Jahres-/Monatsmatrix sollen Arrayformeln zur Ermittlung der jeweiligen Werte aus einer Datentabelle eingetragen werden.

Lösung
Den nachstehenden Code in ein Standardmodul eingeben, einer Schaltfläche zuweisen und starten.

StandardModule: Modul1

Sub DatenFiltern()
   Dim iYear As Integer, iMonth As Integer
   For iYear = 2001 To 2004
      For iMonth = 1 To 12
         Cells(iMonth + 1, iYear - 1997).FormulaArray = _
            "=sum((year(a1:a100)=" & iYear & ")" & _
            "*(month(a1:a100)=" & iMonth & ")*b1:b100)"
      Next iMonth
   Next iYear
End Sub

    

Beiträge aus dem Excel-Forum zu den Themen Matrix und Vba