Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
408to412
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
408to412
408to412
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Summieren von Werten im Format [h]:mm (VBA)

Summieren von Werten im Format [h]:mm (VBA)
05.04.2004 13:40:25
Daniel
Hallo,
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

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Summieren von Werten im Format [h]:mm (VBA)
05.04.2004 13:43:30
xXx
Hallo,
versuch's mal mit
Cells(8,10).FormulaLocal=Zeiger
Gruß aus'm Pott
Udo
AW: So geht's!
05.04.2004 13:55:22
Daniel
Viel Dank Udo für die schnelle Hilfe!!!
Gruß
Daniel

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige