Zeilen Kopieren und darunter X mal einfügen Helfe beim Thema Zeilen Kopieren und darunter X mal einfügen in Microsoft Excel Hilfe um das Problem gemeinsam zu lösen; Hallo Forum Ich Blicks grad nicht mehr! In einem Makro müssen noch Zeilen 6 bis 9 kopiert werden und darunter (ab Zeile 10) X-fach (und dann Zeile 14... Dieses Thema im Forum " Microsoft Excel Hilfe " wurde erstellt von supermario73, 20. Oktober 2017. Hallo Forum In einem Makro müssen noch Zeilen 6 bis 9 kopiert werden und darunter (ab Zeile 10) X-fach (und dann Zeile 14 usw. ) eingefügt werden. Also wär kann den Code ergänzen? VBA - Zeile kopieren und darunter einfügen. Code: Besten Dank für Eure Hilfe! :) Danke für die superschnelle Antwort. Nun klemmt es weil ich das Makro kombiniert habe und die Schlaufe natürlich die gleichen Variablen haben. Ich verstehe nicht warum dies nicht funktioniert, da die erste Schlaufe ja komplett fertig ist. Code: Hilfe ist willkommen. Besten Dank Hallo, lösch die Zeile: Code: Ach so. Ja nun läufts! Besten Dank!!
Im Datenbereich Ctrl-T und fertig. Tab (Ctrl-I) auf der letzten Tabellenzelle fügt automatisch eine neu Zeile ein! Gruess Hansueli Betrifft: AW: zum testen von: Bernd Geschrieben am: 13. 2015 11:51:36 Hi! nicht getestet, aber das hier habe ich gefunden: Private Sub Worksheet_Change(ByVal Target As Range) Dim Zeile As Long ' nur beim Ändern einer Zelle If > 1 Then Exit Sub Zeile = 'nur bei Änderungen in Spalte 12(L) If = 12 Then Application. EnableEvents = False Range(Cells(Zeile, 1), Cells(Zeile, 11)) Range(Cells(Zeile + 1, 1), Cells(Zeile + 1, 11)) xlDown With Application. Excel vba zeile kopieren und darunter einfügen 2019. CutCopyMode = False. EnableEvents = True End With End If End Sub sollte bei jedem Eintrag in L funktionieren, aber ob es so passt, kann ich auch nicht recht sagen. mfg Bernd Betrifft: AW: zum testen - Nachtrag Geschrieben am: 13. 2015 11:57:36 für A-I so: Private Sub Worksheet_Change(ByVal Target As Range) Range(Cells(Zeile, 1), Cells(Zeile, 9)) Range(Cells(Zeile + 1, 1), Cells(Zeile + 1, 9)) xlDown lg Bernd Geschrieben am: 13.
VBA - Zeile kopieren und darunter einfügen von stefanseevetal vom 03. 08. 2006 13:24:43 AW: VBA - Zeile kopieren und darunter einfügen - von u_ am 03. 2006 13:26:07 AW: VBA - Zeile kopieren und darunter einfügen - von stefanseevetal am 03. ✔ - VBA Excel Zeile Kopieren und woanders einfügen | tutorials.de. 2006 13:33:28 AW: VBA - Zeile kopieren und darunter einfügen - von u_ am 03. 2006 13:51:20 Danke - von stefanseevetal am 03. 2006 14:03:51 Betrifft: VBA - Zeile kopieren und darunter einfügen von: stefanseevetal Geschrieben am: 03. 2006 13:24:43 Hallo, ich möchte per Makro die erste leere Zeile der Spalte B finden, diese Zeile Kopieren und eine Zeile darunter einfügen. Hab da unten mal hingeschrieben, wie ich es dachte, funktioniert aber nicht: Sub testZeileKopieren() Dim suchbegriff As String, zelle Dim z As Long suchbegriff = "" Set zelle = Range(Cells(47, 2), Cells(65536, 2))(suchbegriff) If Not zelle Is Nothing Then z = Rows(z) Shift:=xlDown End If End Sub Kann mir da jemand helfen? Danke und Gruß, Stefan Betrifft: AW: VBA - Zeile kopieren und darunter einfügen von: u_ Geschrieben am: 03.
Grüße tomexp 12. 2017, 12:23 # 2 MOF Guru Registrierung: 17. 05. 2008 Code: Option Explicit reenUpdating = False Dim leereZeile "J:Exp_FS_JELeihinventar " leereZeile = Workbooks("Leihinventar ")("Leih")(, 1)(xlUp) + 1 Workbooks("FESTEZETTEL Jettenbach neu ab ")("Tabelle1")("A2:AZ2") _ Workbooks("Leihinventar ")("Leih")("A" & leereZeile) With Workbooks("Leihinventar ") reenUpdating = True MsgBox ("Daten sind erfolgreich übertragen worden") __________________ Signatur in jedem Beitrag Bitte Version angeben. Bereich kopieren und 2 zweilen darunter einfügen. Bei keiner Angabe gehe ich von meinen Angaben aus. Betriebssystem: Windows 10 - 64 Bit, Office 2021 - 32 Bit. Fragen werden im Forum beantwortet, nicht per PN. 13. 2017, 06:21 # 3 Threadstarter Guten Morgen Haio, vielen Dank, dass du dich meines Problems angenommen hast. Leider werden immer noch die Verknüpfungen übertragen, ich bräuchte aber die reinen Werte. Die Werte kommen aus einer Vorlagen-Datei, so dass immer wieder neue Arbeitsmappen erstellt werden und neue Werte eine Zeile darunter in "Leih" eingetragen werden sollen.