✔ Verwenden von Excel Tabellenfunktionen in VBA

[Marius83]

Hallo,

habe auf der Arbeit ein Problem, was ich einfach nicht loesen kann. Es geht um folgende Zeile:

Tabelle1.Cells(wert2, wert8 + 1).FormulaLocal = "=AUFRUNDEN(Label7.Caption/5; 0)"

wert2 und wert8 sind als integer definiert, Label7.Caption enthaelt eine Zahl.
Das Problem ist, dass Excel Label7.Caption nicht als eine Zahl erkennt, sondern in die angegebene Zelle "=AUFRUNDEN(Label7.Caption/5; 0)" schreibt, so dass eine Fehlermeldung kommt, und nichts berechnet wird. Wie muss ich das umformulieren?

Hoffe, mir kann jemand helfen...

 

[Nirraven]

Hallo Marius83.

Label enthalten immer Strings. Ein Label kann niemals "von Natur aus" integer sein.
Des Rätsels Lösung ist CInt().
Das nächste problem ist, dass "=AUFRUNDEN(Label7.Caption/5; 0)" ein String ist, also auch "Label7.Caption" nur als string angesehen wird.

Aber versuch es mal so.

Tabelle1.Cells(wert2, wert8 + 1).FormulaLocal = "=AUFRUNDEN(" & Label7.Caption & "/5; 0)"