ich möchte einen Projektnamen vergleichen mit einer Übersicht von verschiedenen Projekten (Array).
Immer wenn der Projektname mit einer Position im Array übereinstimmt, soll er aus einem anderen Bereich die Bearbeitungszeit holen und auf addieren.
Wollte so die gesamten Stundenzahlen, die in ein Projekt investiert wurden, zusammenzählen. Dazu sollte diese Funktion in einer Zelle in Excel aufgerufen werden.
- p_name = Projektname der im Array gesucht wird
- p_array = verschiedenste Projekte in einer Projektliste
- p_zeit = Bearbeitungszeit des Projekts aus der Projektliste
- p_zeit_ges = Zeit die in der Excelzelle ausgegeben werden soll
### VBA Code:
Function Projektzeit(p_name As String, ByRef p_array() As String, ByRef p_zeit() As Date)
p_zeit_ges As Date
For i = 1 To 31 Step 1
If p_name = p_array(i) Then
p_zeit_ges = p_zeit_ges + p_zeit(i)
End If
Next
End Function
### Aufruf in excel:
=Projektzeit(Oktober!A9 E4:E33 F4:F33)
- Die Zelle Oktober!A9 ist als Standard definiert und enthät den Projektnamen
- E4:E33 ist die Projektliste als Standard definiert
- F4:F33 enthält die Zeiten zu den jeweiligen Elementen aus der Projektliste
Hoffe Ihr könnte einem Neuling helfen.
Vielen Dank!!!