Live-Forum - Die aktuellen Beiträge
Datum
Titel
29.03.2024 13:14:12
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
1504to1508
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

Letzte Zeile mit Rahmen unten

Letzte Zeile mit Rahmen unten
13.07.2016 16:28:05
jens
Hallo
wie kann ich sagen,
dass in der letzten beschriebenen zeile von Splate A bis G alle Zellen andere unteren Seite an Rahmen haben sollen.
hat jemand hierzu eine Hilfe?

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

Betreff
Datum
Anwender
Anzeige
AW: Letzte Zeile mit Rahmen unten
13.07.2016 19:20:55
fcs
Hallo Jens,
als Makro sieht es wie folgt aus.
Das Makro solltets du dann in deine persönliche Makroarbeitsmappe einfügen, dann hast du es jederzeit zur Verfügung.
Gruß
Franz
Sub prcRahmen_unten_A_G_Letzte()
Dim wks As Worksheet
Dim Zelle As Range
Set wks = ActiveSheet
With wks
Set Zelle = .Range("A:G").Find(What:="*", After:=.Range("A1"), LookIn:=xlFormulas, _
lookat:=xlWhole, Searchorder:=xlByRows, searchdirection:=xlPrevious)
With .Range(.Cells(Zelle.Row, 1), .Cells(Zelle.Row, 7))
With .Borders(xlEdgeBottom)
.LineStyle = xlContinuous
.Weight = xlThin
'xlHairline 1 Haarlinie (dünnster Rahmen)
'xlMedium -4138 Mittel
'xlThick 4 Dick (breitester Rahmen)
'xlThin 2 Dünn
End With
End With
End With
End Sub

Anzeige

305 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige