Thema Datum  Von Nutzer Rating
Antwort
Rot Makro in nächste freie Zeile einfügen
28.12.2022 09:22:13 Adam
NotSolved
28.12.2022 09:39:29 ralf_b
NotSolved
28.12.2022 09:49:25 ralf_b
NotSolved

Ansicht des Beitrags:
Von:
Adam
Datum:
28.12.2022 09:22:13
Views:
327
Rating: Antwort:
  Ja
Thema:
Makro in nächste freie Zeile einfügen

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
 

 


Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:

 
 

  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
Rot Makro in nächste freie Zeile einfügen
28.12.2022 09:22:13 Adam
NotSolved
28.12.2022 09:39:29 ralf_b
NotSolved
28.12.2022 09:49:25 ralf_b
NotSolved