Summieren von Werten im Format [h]:mm (VBA)
05.04.2004 13:40:25
Daniel
ich möchte über eine Summenformel, die über VBA in eine bestimmte Zelle (z.B. J8) eingetragen wird, Werte im Format [h]:mm aufsummieren. Bei den Werten sind auch negative dabei, die Berechnung von 1904-Datumswerten unter Extras -Optionen - Berechnungen habe ich aktiviert.
Die Werte, die aufsummiert werden sollen, stehen in Spalte I, wobei der erste Wert immer in Reihe 13 steht, die Reihe für den letzten Wert variiert dynamisch.
Bis jetzt sind die VBA-Routine so aus:
Dim Zeiger As String
Zeiger = "=" & "summe" & "(" & "I13" & ":" & "I" & intlastrow & ")"
' intlastrow ist die Variable für die letzte besetzte Reihe (vgl. Herber)
' nehmen wir mal an, der String sieht jetzt so aus: =summe(I13:I58)
Cells(8, 10) = Zeiger 'String in Zelle J8 eintragen
In Zelle J8, die im Format [h]:mm formatiert ist, wird korrekt der String wie oben angegeben eingetragen. Leider zeigt die Zelle im Tabellenblatt die Meldung #NAME? an. Erst wenn ich oben in der Formel-Eingabezeile, wo korrekt =summe(I13:I58) drinsteht, in die Klammer klicke und danach RETURN drücke, wird in der Zelle im Tabellenblatt der Wert im Format [h]:mm angezeigt.
Wie lässt sich das vermeiden? Wie wird der Wert sofort im Format [h]:mm angezeigt? Muss ich die Variable Zeiger eventuell in einen bestimmten Variablentyp umwandeln z.B. Cells(8, 10) = VARIABLENTYP(Zeiger) ???
Vorab vielen Dank für eure Hilfe!
MfG Daniel