Ich möchte die Zellrahmenlinien einer Zelle auslesen.
Der Code "Rahmen_Linie_auslesen" bringt aber einen Fehlerhinweis, den ich nicht beheben kann.
Hinweis: Laufzeitfehler '438', Objekt unterstütz die Eigenschaft oder Methode nicht und markiert die Zeile MsgBox.
Der Code:
Sub Rahmen_Linie_auslesen()
MsgBox "Links: " & Selection.Borders(xlEdgeLeft).LineStyleIndex & vbLf & _
Oben: " & Selection.Borders(xlEdgeTop).LineStyleIndex & vbLf & _
Rechts: " & Selection.Borders(xlEdgeRight).LineStyleIndex & vbLf & _
Unten: " & Selection.Borders(xlEdgeBottom).LineStyleIndex, , "Rahmenlinie"
End Sub
Z.B. Der Code "Rahmen_Farbe_auslesen" funktionert.
Mir der Bitte um Hilfe,
grüßt, Dieter(Drummer)
Musterdatei: https://www.herber.de/bbs/user/135412.xlsm