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