Range(cells-Anordnung ändern

Question

Hallo, ich möchte gerne die cells Ausgaben auf eine Spalte D mit einen vorhanden Makro2 ausgeben lassen,
jetzt wird alles in mehreren Spalten nebeneinander ausgegeben.Gruß kallie
Range(Cells(1, 3 + k), Cells(4, 3 + k)) = Application.WorksheetFunction.Transpose(D)
Loop Until k = 9
Erase G

Answer 1

Hi, hab wohl nicht alles copiert.
k = k + 1
Range(Cells(1, 3 + k), Cells(4, 3 + k)) = Application.WorksheetFunction.Transpose(A)
Loop Until k = 9
Gruß kallie