anrion
Goto Top

WorksheetFunction in anderem Blatt

Hallo Leute,

ich habe folgendes Problem:

With Worksheets("Kalender")  
gittplt = WorksheetFunction.Sum(Range(Cells(3, rittplt), Cells(3, (cittplt - 1))))
End With

Dieser Code steht in einem Makro in Modul 1. Führe ich es aus, passiert nichts mit dem g.

Es soll aus dem Blatt Kalender auf die Zellen zugegriffen werden und hieraus die Summe gebildet werden.
rittplt und cittplt sind Variablen im Makro, welche die Spalte beschreiben (r z.B. 3 und c z.B. 5 - 1 -> Somit Summe aller Zahlen von Spalte 3 bis 4 in den Zeilen 3)

Lg Stefan

Content-Key: 312855

Url: https://administrator.de/contentid/312855

Ausgedruckt am: 28.03.2024 um 21:03 Uhr

Mitglied: 129813
Lösung 129813 17.08.2016 aktualisiert um 13:35:45 Uhr
Goto Top
You did not define which cells from which worksheet, only the With statement is not enough you need to add the points for the properties .Range() and .Cells() face-wink
With Worksheets("Kalender")  
    gittplt = WorksheetFunction.Sum(.Range(.Cells(3, rittplt), .Cells(3, (cittplt - 1))))
End With
Regards
Mitglied: AndreasHoster
AndreasHoster 17.08.2016 aktualisiert um 13:38:11 Uhr
Goto Top
highload ist zu schnell.
Mitglied: Anrion
Anrion 17.08.2016 um 13:51:45 Uhr
Goto Top
Thanks highload helps me a lot! face-smile