Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1304to1308
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
Inhaltsverzeichnis

Gesamtrahmen um Zeilen wenn

Gesamtrahmen um Zeilen wenn
09.04.2013 12:09:10
Stefan
Hallo Ihr Lieben
Habe da ein Problem und dreh gleich durch.
Ich habe 22 Spalten und bis zu 200 Zeilen.
In Spalte B stehen Zahlen B1=1, B2=1, B3=3, B4=3, B5=3, B6=7.....,
jetzt muss ich wenn in Spalte B mehrere gleiche Zahlen stehen um die Zeilen A-V einen Gesamtrahmen fett einfügen, geht das mit VBA.
LG Rosi

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Geschlechtsumwandlung?
09.04.2013 13:08:22
Rudi
Hallo Rosi Stefan,
Sub aaa()
Dim rngStart As Range, rng As Range
Set rngStart = Cells(2, 2)
Application.ScreenUpdating = False
Cells.Borders.LineStyle = xlNone
For Each rng In Range(rngStart, Cells(Rows.Count, 2).End(xlUp))
If rng  rng.Offset(1) Then
With Range(rngStart, rng).Offset(, -1).Resize(, 22)
.BorderAround xlContinuous, xlMedium
End With
Set rngStart = rng.Offset(1)
End If
Next
End Sub

Gruß
Rudi

AW: Geschlechtsumwandlung?
09.04.2013 14:28:41
Stefan
Danke Rudi ist genau das was ich gesucht hatte, supi

AW: Geschlechtsumwandlung?
09.04.2013 15:46:59
Klaus
Hallo Stefan / Rosi,
du hast einen Hinweis auf deine Geschlechtsumwandlung gesucht? Ich bin verwirrt.
Grüße,
Klaus M.vdT.

Anzeige
vllt. ein Ladyboy? ;-)
09.04.2013 15:55:08
Rudi

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige