Problem: Umsetzung einer Excel-Formel in VBA-Code
09.11.2003 21:09:59
Norbert
Ich benötige in einem VBA-Code die Anzahl verschiedener Zahlen in einer Spalte als Variable. Die Lösung als Excel-Formel ist kein Problem:
=SUMME((HÄUFIGKEIT(E:E;E:E)>0)*1)
Aber wie gesagt, benötige ich das Ergebnis innerhalb eines VBA-Codes. Meine nachfolgende 'Übersetzung' in VBA-Code scheitert aber immer bei WorksheetFunction.Frequency( ...
Private Sub WORKSHEET_ACTIVATE()
Dim nRows As Integer
nRows = WorksheetFunction.Sum((WorksheetFunction.Frequency(Columns(5);Columns(5)) > 0) * 1)
MsgBox nRows
End Sub
Wäre sehr dankbar für Hilfe bei der VBA-Umsetzung der Excel-Formel!
Ciao