Hallo liebe VBA-ler,
ich würde gerne eine Zelle definieren, sodass ich sie später mit dem Namen "Erster" aufrufen kann. Das habe ich so gemacht:
Function Termin(sheet As Worksheet, zeile As Single, Start As Date, Ende As Date)
ye_Start = Year(Start)
Dim Erster As Range 'Projektstart
Dim Letzter As Range 'Projektende
Select Case ye_Start
Case 2017
sheet.Cells(zeile, 9 + mo_Start).Value = "+++ Projektstart +++"
Erster = sheet.Cells(zeile, 9 + mo_Start)
Es klappt alles ausßer dass ich "Erster" auf diese Zelle beziehen kann
Seht ihr den Fehler in meinem Code?