möchte gerne ein markierten Bereich von zellen in einem Array haben.
Das markieren funktioniert und die for next anweisung auch, aber was dann?
Dank und gruß, claus
Sub bla()
Dim arr()
arr() = Selection.Cells.Value
End Sub
Sub tt()
Dim Anz As Long, arr()
With Selection
ReDim arr(.Cells.Count)
For Anz = 1 To .Cells.Count
arr(Anz) = .Cells(Anz).Value
Next Anz
End With
End Sub