Ich möchte nicht die Spalte "T" fix hinterlegen,
sondern die Spalte mit der Überschrift "gef. To" suchen und die Summe derer ausweisen:
WorksheetFunction.Sum(Range("T:T"))
Wer kann mir sagen wie das geht?
Gruß
F.
Sub summe()
Dim C As Range
Set C = [1:1].Find("gef. To")
If Not C Is Nothing Then
MsgBox Application.Sum(Columns(C.Column))
End If
End Sub
Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen