Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
144to148
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
144to148
144to148
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Zeilen fett und Leerzeilen einfügen

Zeilen fett und Leerzeilen einfügen
11.08.2002 00:17:30
PaulR
Hallo,
ich habe wieder mal ein Problem:

Ich möchte in einer Tabelle mit unbestimmter Länge (Zeilenzahl) immer nach 22 zeilen eine leerzeile einfügen, Ausgehend von Zeile 5 (die nächsten Leerzeilen sollen dann also in zeile 27, 49, 71, 93,... eingefügt werden). Gibt es dafür eine Formel?

Und dann würde ich gerne in derselben Tabelle alle Zeilen in denen ein bestimmter Ausdruck vorkommt fett darstellen. (Wenn z.b. in Zelle C6 "ABC" steht, sollen die zellen A6 bis I6 fett dargestellt werden.) Auch diese Ausdrücke wiederholen sich alle 22 Zeilen. Mit FORMAT - BEDINGTE FORMATIERUNG komme ich hier jedoch nicht weiter, da dann immer nur die Zelle mit dem Ausdruck fett formatiert wird.

Kann hier jemand helfen?

Gruß Paul.

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

Betreff
Datum
Anwender
Anzeige
Re: Zeilen fett und Leerzeilen einfügen
11.08.2002 00:48:51
L.Vira
Option Explicit
Sub Leere_einfügen()
Dim z As Long, lZ As Long
Application.ScreenUpdating = False
lZ = [a65536].End(xlUp).Row
For z = 5 To lZ Step 22
Rows(z).Insert
Next
Application.ScreenUpdating = True
End Sub
Sub fett_wenn()
Dim z As Long, lZ As Long
lZ = [a65536].End(xlUp).Row
If [c6] = "ABC" Then
For z = 6 To lZ Step 22
Range(Cells(z, 1), Cells(z, 9)).Font.Bold = True
Next
End If
End Sub
Re: Zeilen fett und Leerzeilen einfügen
11.08.2002 13:19:33
PaulR
Danke! damit hast Du mir sehr geholfen!

Gruß,
Paul

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige