Thema Datum  Von Nutzer Rating
Antwort
Rot Zeile einfügen und kopieren
23.03.2020 20:08:45 christian
NotSolved
24.03.2020 17:08:48 UweD
NotSolved
24.03.2020 19:59:51 Gast71371
NotSolved

Ansicht des Beitrags:
Von:
christian
Datum:
23.03.2020 20:08:45
Views:
936
Rating: Antwort:
  Ja
Thema:
Zeile einfügen und kopieren

Hallo zusammen!

Ich versuche Folgendes Problem zu lösen und zwar muss ich in der Spalte B nach einem Kürzel "ECE" suchen darunter dann eine Leerzeile einfügen und die Zeile zuvor kopieren und in die Leerzeile einfügen. Die Leerzeile einfügen funktioniert soweit, jedoch suche ich nach einer Lösung die Zeile zuvor zu kopieren und dann einzufügen!

Aktueller Code

Sub Leerezeile()
Dim lngI As Long
With ActiveSheet
For lngI = .Range("B65536").End(xlUp).Row To 1 Step -1
If .Cells(lngI, 2).Value = "ECE" Then ' Schluesselwort: TotalIf .Cells(lngI, 2).Value = "Total" Then ' Schluesselwort: Total
.Rows(lngI + 1 & ":" & lngI + 1).Insert Shift:=xlUp
End If

Next lngI
End With

End Sub

 

Hat jemand eine Idee?

Danke

Lg, Christian

 


Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
Rot Zeile einfügen und kopieren
23.03.2020 20:08:45 christian
NotSolved
24.03.2020 17:08:48 UweD
NotSolved
24.03.2020 19:59:51 Gast71371
NotSolved