In diesem Beispiel wird das Ergebnis der Tabellenfunktion Min angezeigt, die auf den Bereich A1:A10 angewendet wird.
Set myRange = Worksheets("Sheet1").Range("A1:C10") answer = Application.WorksheetFunction.Min(myRange) MsgBox answer