Hallo,
ich habe in einer fertigen Tabelle etwas geändert, um die Eingabe der Daten zu erleichtern.
Statt die Daten in der Spalte zu erfassen, werden die Daten jetzt in einer Zeile eingegeben.
Also statt vorher in B10, B11, B12... jetzt in B10, C10, D10...
Die Daten werden mi Hilfe eine Makros in eine andere Tabelle transferiert.
Die Daten werden in der Tabelle waagerecht eingefügt.
Da ich aber die Eingabeart verändert habe, werden die Daten jetzt untereinander in die Tabelle eingefügt.
Ich weiß, dass das mit "Application.Transpose" zu tun hat.
Nun weiss ich aber nicht wie ich die Zeile umbenennen muss, damit die waagerechte Darstellung übernommen wird.
Die Zeile lautet:
With .Cells(.Rows.Count, 2).End(xlUp)
.Offset(1, 0).Resize(rngReklam.Columns.Count, rngReklam.Rows.Count).Value = Application.Transpose(rngReklam.Value)
End With
Habe schon etwas herumprobiert, indem ich z.B. nach .Value einfach gelöscht habe. Aber ich bekomme dann immer nur Fehler ausgeworfen.
Wie ändere ich die Zeile, damit die angesprochenen Werte waagerecht in die Zeile kopiert werden?
|