Heut gibt’s wieder einmal VBA – die lustige Programmiersprache, mit der Sie in Office nahezu alles automatisieren können.
Die aktuelle Anforderung: Welches Datum ist in einem bestimmten Bereich das größte?
In Excel verwenden Sie für die Beantwortung so einer Frage die Funktion MAX. Schreiben Sie aber MAX in VBA, so werden Sie nicht verstanden. Das muss also anders gehen … und zwar so:
Public Sub Datum_Max() Dim DatBis As Date Set dWs = Worksheets("Datenbasis") DatBis = Application.WorksheetFunction.Max(dWs.Range("Datum")) ... Set dWs = Nothing End Sub
Zur Erklärung: es gibt ein Worksheet, das Datenbasis heißt. Auf diesem gibt es einen Bereich, der Datum heißt. Mit Application.WorksheetFunction.Max(dWs.Range(„Datum„)) fordern wir nun Excel auf, seine eingebaute Funktion Max anzuwenden, und zwar auf den Bereich Datum des Worksheets dWs (das wir vorher als das Worksheet Datenbasis definiert haben). Das Ergebnis wird uns in die Variable DatBis geschoben, wo wir es auch haben wollen.
Mit WorksheetFunction können Sie natürlich auch andere Excel-Funktionen in VBA ausführen, und ja, auch den SVERWEIS – allerdings unter seinem Geburtsnamen VLOOKUP – probieren geht über Studieren!