Summenformel in VBA
Ich versuche zu berechnen, die Summe zu ändern einen Zellbereich in vba. Leider ist die Zelle Werte sind Variablen. Ich kann nicht scheinen, um die folgende Formel zu arbeiten.
Private Sub calcOverheadRate(startCell As Integer, endCell As Integer)
Total = endCell + 1
Range("D" & Total).Formula = "=SUM("D" & startCell & ":" & "D" & endCell)"
End Sub
Bekomme ich kompilieren-Fehler: "Erwartet: Ende Anweisung
Dieses problem zu lösen, änderte ich die Funktion,
Private Sub calcOverheadRate(startCell As Integer, endCell As Integer)
Dim start As String
Dim endC As String
start = "D" & CStr(startCell)
endC = "D" & CStr(endCell)
Total = endCell + 1
Range("D" & Total).Formula = "=SUM(start:endC)"
End Sub
Die Funktion kompiliert in Ordnung, wenn ich es laufen lasse, wird der Wert in der Zelle "#NAME", wo es Verweise SUM(start:endC)
nicht SUM(D5:D23)
....
Irgendwelche Gedanken darüber, wie man dieses Problem lösen würde geschätzt werden.
InformationsquelleAutor user1155383 | 2012-07-05
Du musst angemeldet sein, um einen Kommentar abzugeben.
Die Zitate sind der Ausgabe:
Range("D" & Total).Formula = "=SUM(" & startCell & ":" & endCell & ")"
InformationsquelleAutor SeanC
Habe ich herausgefunden, das problem der & muss innerhalb der Anführungszeichen für string-Literale
InformationsquelleAutor user1155383
Wie über Sie, versuchen Sie es mit einer Tabelle?
Hier ist ein 1 min video auf, wie man eine Tabelle in Excel:
http://www.screenr.com/VvZ8
InformationsquelleAutor Margus