Clever-Excel-Forum

Hallo zusammen, bin neu hier da ich bei meiner Suche im Netz nicht wirklich weiter gekommen bin!!

Ich benötige eine Tabelle mit folgenden Anforderungen

Zelle D5 -> Anzahl (wird manuell eingetragen)
Je nach Anzahl soll

Zeile 10 kopiert und unter die Zeile 10 eingefügt werden...

Gibt es dafür eine Funktion in Excel oder benötige ich dafür ein Makro?

Vielen Dank

Zum besseren Verständnis habe ich eine Screenshot beigefügt.

Also mit einer Formel glaube ich nicht, das dies funktioniert.

Habe hier ein kleines Makro:

In der Zelle A2 befindet sich die Anzahl, der einzufügenden Zeilen.
Sheets("Tabelle1").Rows("10") <---- die 10 ist die Zeilennummer, ab der die neuen Zeilen eingefügt werden.
Grüße
Silcono

Hallo erst einmal vielen Dank,

jetzt brauch ich aber noch Hilfe wie ich das Makro an laufen bekommen?

Bin nicht so der Excel-Profi

Vielen Dank

Das soll heißen, du hattest auch noch keinen Kontakt mit VBA?

Grüße Silcono

Hi,

schau mal hier:
http://www.online-excel.de/excel/singsel_vba.php?f=44

und
http://www.online-excel.de/excel/singsel_vba.php?f=100

Hier das angepasste Makro mit Kopieren der Zeile 10:

Option Explicit



Sub ZelleEinf()

  

  Dim Anzahl As Integer

  Dim i As Integer

  

  Anzahl = Sheets("Tabelle1").Range("D5").Value

  i = i + 1

  For i = 1 To Anzahl

     Sheets("Tabelle1").Rows(10).Insert Shift:=xlDown

  Next i

  Sheets("Tabelle1").Rows(10 + i - 1).Copy Sheets("Tabelle1").Range("A10:A" & 10 + i - 1)



End Sub

[attachment=14864]