Auf eure Hilfe war bisher immer verlass!

Wie kann ich mir nur den manipulierten Wert "Arr(i, 3)" ausgeben lassen. Ich glaube ich denke gerade zu kompliziert

Sub Datenmanipulation_FPLO_Verzeichnis()

Dim rngData As Range
Dim i As Long
Dim Arr As Variant

'Daten-Bereich setzen
Set rngData = Tabelle3.Range("A4").CurrentRegion
'Array dimensionieren
ReDim Arr(i To rngData.Rows.Count, i To rngData.Columns.Count)
'Array befüllen
Arr = rngData.Value
'Schleife über alle Daten
For i = 1 To UBound(Arr, 1)
'Manipulation
Arr(i, 3) = Arr(i, 2) & Arr(i, 1)
Next i

'Array zurückschreiben
Tabelle3.Range("C4").Resize(UBound(Arr, 1), UBound(Arr, 2)).Value = Arr

End Sub

Ich bedanke mich für die investierte Zeit