Clever-Excel-Forum

Normale Version: Makro zur Verschiebung von Zellen
Du siehst gerade eine vereinfachte Darstellung unserer Inhalte. Normale Ansicht mit richtiger Formatierung.
Hi zusammen,

Ich versuche gerade eine makro aufzunehmen bzw.  zu schreiben. Da ich auf diesem Gebiet noch unerfahren bin wäre es cool wenn ihr mir helfen könntet.

Die Ausgangssituation ist: Ich habe eine Tabelle in der senkrecht nach unten Zahlen verlaufen. Diese Zahlen sollen nicht nach unten verlaufen, sondern nach rechts.

Ich habe diese Makro aufgenommen.


Sub Makro1()
'
' Makro1 Makro
'
' Tastenkombination: Strg+s
'
    Selection.Cut
    Range("C2").Select
    ActiveSheet.Paste
    Range("B4").Select
    Selection.Cut
    Range("D2").Select
    ActiveSheet.Paste
End Sub


Wie packe ich das ganze in eine Schleife, sodass der Vorgang immer wieder für die nächsten Zellen wiederholt wird?
Danke für eure Hilfe!!!

Schöne Grüße

Tobias
[attachment=7181]
Hallo,

dafür bedarf es nicht zwingend eines Macros.

Markiere den Bereich, den Du kopieren willst (z.B. C3 - C46).
Kopiere die Werte. Klicke in Deine Zielzelle und wähle im Register "Start" unter "Einfügen" die Option "Transponieren".

[attachment=7182]

Gruß
Ich