Hallo zusammen,
ich kenne mich mit VBA nicht wirklich gut aus. Bis jetzt habe ich mich mit Makros aufzeichnen beholfen oder habe im Internet nach Makros gesucht. Auch jetzt habe ich wieder ein super Makro im Internet gefunden, was mir nur zu 90% weiterhilft. Das Makro kopiert bestimmte Zeilen und bevor die kopierten Zeilen eingefügt werden, wird man gefragt, ab welcher Zeile die kopierten Zeilen eingefügt werden sollen. Es werden immer dieselben 2 Zeilen aus dem Tabellenblatt "Tabelle1" kopiert. Jetzt möchte ich aber den Ort, in dem die kopierten Zeilen eingefügt werden sollen, variabel halten. Das Makro wird per Steuerelement, welches sich in verschiedenen Tabellenblättern befindet, ausgeführt. Und die kopierten Zeilen, sollen in dem Tabellenblatt eingefügt werden, wo das Makro per Steuerelement ausgeführt wurde.
Ich kenne immer nur Makros, die sich auf bestimmte Tabellenblätter beziehen. D.h. wähle das Tabellenblatt Tabelle1 aus, kopiere die Zeilen und füge die kopierten Zeilen in Tabelle2 ein.
Derzeit sieht mein Makro wie folgt aus:
Sub(Zeilen_einfügen)
Sheets("Tabelle1").Select
Dim zelleE
zelleE = Application.InputBox(Prompt:="Wo einfügen?", Title:="Zellenauswahl", Type:=1)
Rows("1:2").Select
Selection.Copy
Sheets("Tabelle2").Select
Rows(zelleE).Insert
End Sub
Kann mir hierbei vielleicht jemand weiterhelfen?
Über eine Rückmeldung würde ich mich freuen. Ich habe jetzt 3 Stunden im Netz gesucht und nichts richtiges gefunden.
Vielen Dank schon mal vorab.
V.G. M.K.