Hallo
Weder das eine noch das andere mag mein Excel 2007
Die Zelle A2 wird zwar selektiert aber es kommt kein Rahmen.
Wenn ich den Makro Recorder benutze sieht es genau so aus. Egal was ich nutze es taucht nicht in Excel auf.
Code:
Selection.Borders(xlDiagonalDown).LineStyle = xlNone
Selection.Borders(xlDiagonalUp).LineStyle = xlNone
Selection.Borders(xlEdgeLeft).LineStyle = xlNone
With Selection.Borders(xlEdgeTop)
.LineStyle = xlContinuous
.Color = -16777024
.TintAndShade = 0
.Weight = xlThin
End With
Delphi-Quellcode:
Excel.Range['A1:L3'].Select;
Excel.Selection.Borders[xlDiagonalDown].LineStyle := xlNone;
Excel.Selection.Borders[xlDiagonalUp].LineStyle := xlNone;
Excel.Selection.Borders[xlEdgeLeft].LineStyle := xlNone;
Excel.Selection.Borders[xlEdgeTop].LineStyle := xlContinuous;
Excel.Selection.Borders[xlEdgeTop].Color := -16777024;
Excel.Selection.Borders[xlEdgeTop].TintAndShade := 0;
Excel.Selection.Borders[xlEdgeTop].Weight := xlThin;
Hier passiert ebenfalls nichts weiter als der Range selekt.
// http://www.swissdelphicenter.ch/de/showcode.php?id=156
Das hier hingegen funktioniert ohne Probleme es deckt nur leider nicht alles ab was ich benötige.
Wo steckt hier nur der Fehler?