VBA-Programmierung in Microsoft Excel

Tutorial: Excel-Beispiele

Funktion ANZAHL2 ohne ausgeblendete Spalten

Gruppe

UDF

Bereich

Anzahl2

Thema

Funktion ANZAHL2 ohne ausgeblendete Spalten

Problem

Wie kann ich die Excel-Funktion ANZAHL2 anwenden, ohne daß die ausgeblendeten Spalten mitgezählt werden?

Lösung

Geben Sie die nachfolgende benutzerdefinierte Funktion in ein Standardmodul ein.




StandardModule: basMain

Function CountC(iRow As Integer) As Integer
   Dim iCol As Integer, iCounter As Integer
   For iCol = 1 To 256
      If Application.Caller.Parent _
         .Cells(iRow, iCol).Text <> "" Then
         iCounter = iCounter + 1
      End If
    Next iCol
    CountC = iCounter
End Function

    


Beiträge aus dem Excel-Forum zu den Themen UDF und Anzahl2