Guten Tag,

ich habe folgendes Problem. Ich habe im Arbeitsblatt "Vorlage" eine Rechnung erstellt wo ich einzelne Zellen kopiere und diese in das Arbeitsblatt "Rechnungen" in einzelne Zellen in einer Spalte via Makrobutton einfüge. Bei der nächsten Änderung der Rechung in "Vorlage" möchte ich nun, dass die kopierten Zellen, wenn ich dann den Makrobutton betätige, dann in dem Arbeitsblatt "Rechnungen" die nächste freie Spalte anspringen. 

Wie kann nun der Code so formuliert werden, dass diese Ausführung automatisch beim betätigen des Buttons immer wiederholt wird und die nächste freie Zelle im Arbeitsblatt "Rechnungen" befüllt.

Hier mein Code:

Sub Rechnunganlegen()
'
' Rechnunganlegen Makro
'

'
    Range("B12").Select
    Selection.Copy
    Sheets("Rechnungen").Select
    Range("A6").Select
    ActiveSheet.Paste
    Sheets("Vorlage").Select
    Range("B11").Select
    Application.CutCopyMode = False
    Selection.Copy
    Sheets("Rechnungen").Select
    Range("B6").Select
    ActiveSheet.Paste
    Sheets("Vorlage").Select
    Range("E12").Select
    Application.CutCopyMode = False
    Selection.Copy
    Sheets("Rechnungen").Select
    Range("D6").Select
    ActiveSheet.Paste
    Sheets("Vorlage").Select
    Range("F25").Select
    Application.CutCopyMode = False
    Selection.Copy
    Sheets("Rechnungen").Select
    Range("E6").Select
    ActiveSheet.Paste
End Sub

Für jegliche Hilfestellung in meinem Anliegen wäre ich dankbar. 

Gruß

Adam