Thema Datum  Von Nutzer Rating
Antwort
Rot Zellbereich aus TAB X in TAB Y kopieren und unterhalb einfügen
11.09.2024 10:34:04 Kristin
NotSolved
11.09.2024 12:17:15 Gast25539
Solved
11.09.2024 12:52:14 Kristin
NotSolved

Ansicht des Beitrags:
Von:
Kristin
Datum:
11.09.2024 10:34:04
Views:
255
Rating: Antwort:
  Ja
Thema:
Zellbereich aus TAB X in TAB Y kopieren und unterhalb einfügen

Hallo liebe VBA Community,

ich habe mich schon durch Beiträge diverser VBA Foren geklickt, aber leider keine Lösung gefunden.

Wir arbeiten mit MS Office Professional 2019. Ich habe eine Excel Arbeitsmappe mit 4 Reitern. Unter dem Reiter "Makro" findet man zwei Zeilenblöcke (2:5) und (6:14), welche über jeweils ein Makro in den Reiter "Inhalt" kopiert werden. Als Zielzeile wurde Zeile 47 in die Makros geschrieben. Das funktioniert erstmal tadellos, allerdings sollen die eingefügten Blöcke immer am Ende der Tabelle eingefügt werden und daran scheitere ich leider im Moment. Mir ist schon klar, dass durch den Code immer die Zeile 47 genutzt wird, aber da ich leider auch keine tieferen VBA-Kenntnisse habe, bekomme ich den Code einfach nicht umgeschrieben.

Würde mich sehr freuen, wenn mir hier jemand einen Tipp zum Anpassen des Codes geben könnte.

 

 

Sub Einfügen_Zuführung()
'
' Einfügen_Zuführung Makro
'
    Sheets("Makro").Select
    Rows("2:5").Select
    Application.CutCopyMode = False
    Selection.Copy
    Sheets("Inhalt").Select
    Rows("47:47").Select
    Selection.Insert Shift:=xlDow
End Sub

 

Sub Einfügen_Vereinzelung()
'
' Einfügen_Vereinzelung Makro
'
    Sheets("Makro").Select
    Rows("6:14").Select
    Application.CutCopyMode = False
    Selection.Copy
    Sheets("Inhalt").Select
    Rows("47:47").Select
    Selection.Insert Shift:=xlDow
End Sub

 

Vielen Dank für Eure Hilfe schonmal im Voraus.


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 Zellbereich aus TAB X in TAB Y kopieren und unterhalb einfügen
11.09.2024 10:34:04 Kristin
NotSolved
11.09.2024 12:17:15 Gast25539
Solved
11.09.2024 12:52:14 Kristin
NotSolved