Ich habe eine ganz einfache Aufgabenstellung, für die ich aber in der Hilfe nichts gefunden habe.
Das Problem ist, dass ich nicht von Anfang an weiss, wieviele Elemente mein Datenfeld besitzt - ich kann also die folgende Logik NICHT anwenden:
Sub SheetsArray()
Dim x As Integer, n As Integer
Dim df() As String
x = ActiveWindow.SelectedSheets.Count
ReDim Preserve df(1 To x)
For n = 1 To x
df(n) = ActiveWindow.SelectedSheets.Item(n).Name
Next
End Sub
Ich möchte die Zwischensummen-Zeilen eines Bereichs in ein Datenfeld einlesen, damit ich nachher eine Gesamtsumme errechnen kann. Nun kann natürlich - wie erwähnt - die Gesamtsumme einmal aus den Zeilen 5, 15, 35 und 49 bestehen, ein anderes Mal aus den Zeilen 6, 20 und 27 etc.
Wie schaffe ich es, das Datenfeld richtig zu deklarieren und zu managen, damit keine Werte verloren gehen?
Besten Dank für eure Hilfe!
Gruss Rudi