Office: Zeilen einfügen nach einem bestimmten Muster

Helfe beim Thema Zeilen einfügen nach einem bestimmten Muster in Microsoft Excel Hilfe um das Problem gemeinsam zu lösen; Ich möchte gern in eine bereits bestehende Tabelle aus 9 Einträgen in der Spalte A zu jedem Eintrag eine Menge von Zeilen einfügen. Die Anzahl der... Dieses Thema im Forum "Microsoft Excel Hilfe" wurde erstellt von Starker, 25. April 2006.

  1. Starker Neuer User

    Zeilen einfügen nach einem bestimmten Muster


    Ich möchte gern in eine bereits bestehende Tabelle aus 9 Einträgen in der Spalte A zu jedem Eintrag eine Menge von Zeilen einfügen. Die Anzahl der Zeilen möchte ich gern vom Benutzer erfragen.
    Die Anzahl ist für alle 9 Einträge gleich.
    Kann mir jemand helfen.

    Die Abfrage ist klar mit
    m = InputBox("Bitte geben sie die Nummer des aktuellen Monats ein! " & _
    "z.B. für Mai eine 5", Title:=msgTitel)

    Sei z die Zeile, in der der erste Eintrag steht.
    Nun hätte ich gern so etwas wie:

    For i = 1 To 9
    For d = 1 To m - 1
    Rows("z+1:z+1").Select
    Selection.Insert Shift:=xlDown
    ActiveLine.FormulaR1C1 = "&i&"
    Next d
    z = z + m
    Next i

    Aber das funktioniert leider nicht.
    Kann mir jemand helfen?
     
    Starker, 25. April 2006
    #1
  2. john g. Erfahrener User
    Hallo,

    kürzlich habe ich in einem ähnlichen Zusammenhang folgendes gepostet:

    Sub ZeilenEinfügen()
    Dim z As Variant
    z = Application.InputBox _
    ("Geben Sie die Anzahl der einzufügenden Zeilen ein.", _
    "Zeilen einfügen", "6", , , , , 2)
    For x = 1 To z
    Selection.EntireRow.Insert
    Next x
    End Sub

    Wo der Cusor steht, werden die Zellen eingefügt.
    Ich empfehle den Shortcut Strg+a, weil es in der Praxis mit am schnellsten geht.

    Hilft Dir das?

    Gruß
    J.
     
    john g., 25. April 2006
    #2
Thema:

Zeilen einfügen nach einem bestimmten Muster

Die Seite wird geladen...
  1. Zeilen einfügen nach einem bestimmten Muster - Similar Threads - Zeilen einfügen bestimmten

  2. UserForm in bestimmte Zeile einfügen

    in Microsoft Excel Hilfe
    UserForm in bestimmte Zeile einfügen: Hallo, Ich möchte, dass die Werte, die ich in eine UserForm eingebe, in einer bestimmten Zeile ausgegeben werden sollen. In der Tabelle soll quasi oben eine neue Zeile eingefügt werden in die...
  3. Excel 16; Neue Zeile mit bestimmter Formatierung einfügen

    in Microsoft Excel Hilfe
    Excel 16; Neue Zeile mit bestimmter Formatierung einfügen: Guten Tag, ich stehe vor folgendem Problem: Ich möchte gerne eine neue Zeile in Excel 2016 einfügen und diese neue Zeile soll sofort eine bestimmte Formatierung aufweisen z.B. 3. Zelle dieser...
  4. Daten ab einem bestimmten Punkt in nächste freie Zeile einfügen

    in Microsoft Excel Hilfe
    Daten ab einem bestimmten Punkt in nächste freie Zeile einfügen: Hallo zusammen, ich benötige dringend Hilfe bei der Umsetzung folgender Aufgabenstellung. Ich habe eine Excel Liste mit mehreren Sheets. Im Sheet "Eingabemaske" werden von Zelle B4 bis AA4 Daten...
  5. VBA: neue Zeile einfügen an bestimmter Stelle inkl. Datum und Laufnummer

    in Microsoft Excel Hilfe
    VBA: neue Zeile einfügen an bestimmter Stelle inkl. Datum und Laufnummer: Hallo zusammen, ich muss eine neue Aufgabenliste erstellen. Die Formatierungen habe ich soweit hingekriegt, doch an allem was Makro/VBA betrifft beisse ich mir als Laie trotz intensiver...
  6. VBA - Code Zeile einfügen soll erst ab bestimmter Zeile beginnen

    in Microsoft Excel Hilfe
    VBA - Code Zeile einfügen soll erst ab bestimmter Zeile beginnen: Hallo ihr Lieben, ich habe vor kurzem eine Excel-Tabelle erstellt, in der ich über ein Makro eine neue Zeile hinzufügen kann, in der alle Formeln und Formate übernommen werden. Das sieht so...
  7. Bestimmte Zeilen Ausschneiden und in anderes Tabellenblatt einfügen

    in Microsoft Excel Hilfe
    Bestimmte Zeilen Ausschneiden und in anderes Tabellenblatt einfügen: Hallo, ich habe folgendes Problem: Mein Makro soll alle (kompletten) Zeilen von Tabelle 1 in Tabelle 2 verschieben, bei denen in der Spalte 1 der Wert größer als 4999 ist. Habe mir ein Makro...
  8. Makro, welches bestimmte Anzahl von Zeilen in einer Spalte ausschneidet

    in Microsoft Excel Hilfe
    Makro, welches bestimmte Anzahl von Zeilen in einer Spalte ausschneidet: Hallo zusammen, ich bin ganz neu im Bereich der Makros in Excel, deshalb habe ich wirklich noch überhaupt keine Ahnung. Habe mir schon einige Themen durchgelesen, aber nichts hat mir...
  1. Diese Seite verwendet Cookies, um Inhalte zu personalisieren, diese deiner Erfahrung anzupassen und dich nach der Registrierung angemeldet zu halten.
    Auf dieser Website werden Cookies für die Zugriffsanalyse und Anzeigenmessung verwendet.
    Wenn du dich weiterhin auf dieser Seite aufhältst, akzeptierst du unseren Einsatz von Cookies.
    Information ausblenden