Office: (Office 2007) Neue Zeile Makro spinnt in einer Spalte

Helfe beim Thema Neue Zeile Makro spinnt in einer Spalte in Microsoft Excel Hilfe um das Problem gemeinsam zu lösen; Hi ihr Lieben, ich habe ein etwas konfuses Problem. Ich habe folgendes Makro: Sub Zelle_einfügen_Kategorien() With Rows(ActiveCell.Row)... Dieses Thema im Forum "Microsoft Excel Hilfe" wurde erstellt von Eraser, 29. Juni 2017.

  1. Eraser hat Ahnung

    Neue Zeile Makro spinnt in einer Spalte


    Hi ihr Lieben,

    ich habe ein etwas konfuses Problem. Ich habe folgendes Makro:

    Code:
    Sub Zelle_einfügen_Kategorien()
       
     With Rows(ActiveCell.Row)
         .Copy
         .Insert shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove
         .SpecialCells(xlCellTypeConstants).ClearContents
     End With
     Application.CutCopyMode = False
     End Sub
    Dieses funktioniert soweit, wie es soll. Ich füge eine neue Zeile ein und vorhandene Formatierungen und Formeln werden übernommen. Nun passiert das verrückte. In Zeile B und C klappt das nicht (beide zusammengefügt., da bleibt dann ein Hänger und 2 Zeilen sind in diesen 2 Spalten identisch. Ich habe viele verschiedene Formeln ausprobiert und nichts hat wirklich geholfen. Da verrückteste war, als ich zum Test eine andere Formel aus anderen Spalten (da habe ich 3 zusammengefügt und es klappt alles), reinkopiert habe, funktionierte es auf einmal. Also habe ich ähnliches zur Problemlösung probiert, aber das hat nicht geholfen. Verwirrend, oder? Deswegen habe ich mal eine ähnliche Tabelle mit angehangen. (Da ist noch ein Makro, wenn ihr in Zeile E den Wert löscht und dann was eintragt, erscheint Datum und Benutzername, nicht wundern)

    Den Anhang Beispiel Makro Zeile einfuegen.xlsm betrachten

    VG
    Tobi
     
    Zuletzt bearbeitet: 29. Juni 2017
    Eraser, 29. Juni 2017
    #1
  2. Eraser hat Ahnung
    PS:

    Ich bin gerade dabei noch ein anderes Makro umzuschreiben. Da funktioniert es mit den Formeln, nur löscht es zur Zeit die Zeile darunter, statt die neue einzufügen. Vielleicht ist dieses Makro aber besser:

    Code:
    Sub NeueZeile()
     Dim Zeile As Long
    
     With ActiveSheet
        'Zeilennummer:
        Zeile = ActiveCell.Row + 1
        'Kopieren:
        Intersect(.Rows(Zeile - 1), .UsedRange).Copy
        .Cells(Zeile, 1).PasteSpecial Paste:=xlPasteFormats            'Formate
        .Cells(Zeile, 1).PasteSpecial Paste:=xlPasteFormulas           'Formeln
        Application.CutCopyMode = False
         
        'Werte löschen
        Intersect(.Rows(Zeile), .UsedRange).SpecialCells(xlCellTypeConstants).ClearContents
         
     End With
     End Sub
    
     
    Eraser, 29. Juni 2017
    #2
  3. Eraser hat Ahnung
    Hier des Rätsels Lösung, falls eine*r von euch mal ein ähnliches Problem hat:

    Code:
    Sub Zelle_einfügen_Kategorien()
       
     With Rows(ActiveCell.Row)
         .Copy
         .Insert shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove
         .SpecialCells(xlCellTypeConstants).ClearContents
     End With
     Application.CutCopyMode = False
     
    
    Dim Ende As Long
    
        With ActiveSheet
             Ende = .Cells(.Rows.Count, 2).End(xlUp).Row
             .Range("B8:C8").AutoFill Destination:=Range("B8:C" & Ende), Type:=xlFillDefault
        End With
    End Sub
     
    Eraser, 30. Juni 2017
    #3
Thema:

Neue Zeile Makro spinnt in einer Spalte

Die Seite wird geladen...
  1. Neue Zeile Makro spinnt in einer Spalte - Similar Threads - Zeile Makro spinnt

  2. Makro - Kombination aus Zeile löschen oder Text ersetzen

    in Microsoft Excel Hilfe
    Makro - Kombination aus Zeile löschen oder Text ersetzen: Hallo miteinander, ich würde gerne folgendes Problem per Makro (nicht mit klassischen Formeln) lösen (wichtig, das Makro muss beim Öffnen starten): - wenn in Spalte A nichts steht -> gesamte...
  3. Makro Problem nach Wörtern filtern und Zeilen löschen

    in Microsoft Excel Hilfe
    Makro Problem nach Wörtern filtern und Zeilen löschen: Hallo zusammen! Ich habe ein Makro, dass ich erweitern möchte. Dabei soll in den Daten in der ersten Zeile ein Filter aktiviert werden und alle Datenzeilen löschen, die in Spalte 10 eines von 4...
  4. Ausgeblendete Zeilen nicht kopieren Makro

    in Microsoft Excel Hilfe
    Ausgeblendete Zeilen nicht kopieren Makro: Hallo, Ich habe folgendes Makro in meine Tabelle eingefügt und das funktioniert soweit auch, ich würde aber gern dafür sorgen, dass ausgeblendete Zeilen nicht in die Übersicht kopiert werden. Wie...
  5. Löschen von Zeilen mit Makro

    in Microsoft Excel Hilfe
    Löschen von Zeilen mit Makro: Hallo, ich hätte folgendes Vorhaben: ein Makro soll alle Zeilen löschen beginnend ab der zweiten Zeile, bis zu der Zeile, die einen bestimmten Wert enthält (z.B. "XYZ"). Diese soll stehen bleiben....
  6. Makro Zeilen kopieren und einfügen nach Bedingung

    in Microsoft Excel Hilfe
    Makro Zeilen kopieren und einfügen nach Bedingung: Hallo liebe Community, für eine Vertragsanpassung möchte ich eine Liste mit mehreren 1000 Einträgen (Zeilen) überarbeiten. Auf Grund des juristischen Vorgehens ist es wichtig, die Vorher/Nachher...
  7. Makro: Zeilen (mit X) aus anderen Registern in Master kopieren

    in Microsoft Excel Hilfe
    Makro: Zeilen (mit X) aus anderen Registern in Master kopieren: Liebe Excel-Cracks Ich habe ein Problem. In einem File muss ich die 3 Register (G_ER; G_IR;G_EG) in ein Master-Register (G_Master) untereinander kopieren. In den Ausgangsregistern müssen alle...
  8. Zeilen und Spalten per Makro kopieren wenn ckeckerbox/haken gesetzt wird.

    in Microsoft Excel Hilfe
    Zeilen und Spalten per Makro kopieren wenn ckeckerbox/haken gesetzt wird.: Guten Abend, ich versuche grad eine Arbeitsmappe zu optimieren und stoße doch leider an meine Grenzen was vba und Makros angeht. Bisher habe ich ein makro mit einer Schaltfläche,welche einen...
Schlagworte:
  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