Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Abstandszeile einfügen

Forumthread: Abstandszeile einfügen

Abstandszeile einfügen
29.09.2004 12:16:36
fabienne
Hello!
Kann mir jemand sagen wie ich zusätzlich vor "name = " eine Zeile mit ---------------------- einfügen kann? Dankeschön!

Sub Abstandszeile_einfügen()
Dim k As Integer
For k = 1 To Range("A65536").End(xlUp).Row
If Range("A" & k).Value = "Other data = " Or Range("A" & k).Value = "name = " Then
Rows(k + 1).Insert
Range(Cells(k + 1, 1).Address).Select
ActiveCell.FormulaR1C1 = "#---------------------------------------------------------------------------------"
End If
Next k
Range("A1").Select
ActiveCell.FormulaR1C1 = "#---------------------------------------------------------------------------------"
End Sub

Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Abstandszeile einfügen
29.09.2004 12:29:43
Oberschlumpf
Hi Fabienne
Versuch es mal so:

Sub Abstandszeile_einfügen()
Dim k As Integer
For k = 1 To Range("A65536").End(xlUp).Row
If Range("A" & k).Value = "Other data = " Or Range("A" & k).Value = "name = " Then
Rows(k + 1).Insert
Range("A" & k + 1 ":D" & k + 1).Merge
ActiveCell.FormulaR1C1 = _
End If
Next k
Range("A1").Select
ActiveCell.FormulaR1C1 = "#---------------------------------------------------------------------------------"
End Sub

Ich hab das jetzt nicht getestet. Also probier es besser erst mal mit einer Kopie.
Konnte ich helfen?
Ciao
Thorsten
Anzeige
AW: Abstandszeile einfügen
29.09.2004 13:54:03
Fabienne
Hallo Thorsten
Ne, hat leider nicht funktioniert!
Aber versuch jetzt das ganze umzukrempeln......
Danke für deine Hilfe!
Gruss Fabienne
;

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige