Abfrage ob Zelle einen Rahmen hat

Hallo,

Ich komme wieder mal nicht weiter,

gibt es eine Abfragemöglichkeit nach einen Rahmen, egal welchen? Allgemeingültig?

Das sollte folgendermaßen lauten, wenn Zelle einen Rahmen hat, dann lösche den Rahmen.

VIelen Dank

Gruß
Wischnor

gibt es eine Abfragemöglichkeit nach einen Rahmen, egal
welchen? Allgemeingültig?
Das sollte folgendermaßen lauten, wenn Zelle einen Rahmen hat,
dann lösche den Rahmen.

Moin Wischnor,

bei welchen Zellen? Bei allen im Blatt, bei allen im markierten Bereich?

Sub Test()
Call Loesch(Selection) ' markierter Zellenbereich
Call Loesch(Range("A1:c5")) ' fester zellenbereich
Call Loesch(ActiveSheet.UsedRange) ' alle Rahmen des blattes
End Sub
'
Sub Loesch(Bereich As Range)
Dim N As Byte
For N = 5 To 12
 Bereich.Borders(N).LineStyle = xlNone
Next N
End Sub

Gruß
Reinhard

Hey,

das sollte ein bestimmer Bereich sein.

Wenn ich das mit Call ausführe, muss ich dann noch ein Makro zuschreiben, richtig? Einfach in ein Modul herein schreiben oder wo soll ich den Makro abspeichern in den Tabellen?

Vielen Dank

Gruß
Wischnor