Excel-Zelle mit Rahmen versehen

[hph]

Versuche gerade einen Zellbereich in Excel mit Rahmen zu versehen:

var
excel: Variant

begin
.
.
.
Excel.Range[Excel.Cells[1,1].address, Excel.Cells[3,6].address].select;
excel.Selection.Borders(xlDiagonalDown).LineStyle := xlNone;
excel.Selection.Borders(xlDiagonalUp).LineStyle := xlNone;
excel.Selection.Borders(xlEdgeLeft).LineStyle := xlContinuous;
excel.Selection.Borders(xlEdgeLeft).Weight := xlThin;
excel.Selection.Borders(xlEdgeLeft).ColorIndex := xlAutomatic;
excel.Selection.Borders(xlEdgeTop).LineStyle := xlContinuous;
excel.Selection.Borders(xlEdgeTop).Weight := xlThin;
excel.Selection.Borders(xlEdgeTop).ColorIndex := xlAutomatic;
excel.Selection.Borders(xlEdgeBottom).LineStyle := xlContinuous;
excel.Selection.Borders(xlEdgeBottom).Weight := xlThin;
excel.Selection.Borders(xlEdgeBottom).ColorIndex := xlAutomatic;
excel.Selection.Borders(xlEdgeRight).LineStyle := xlContinuous;
excel.Selection.Borders(xlEdgeRight).Weight := xlThin;
excel.Selection.Borders(xlEdgeRight).ColorIndex := xlAutomatic;
excel.Selection.Borders(xlInsideVertical).LineStyl e := xlContinuous;
excel.Selection.Borders(xlInsideVertical).Weight := xlThin;
excel.Selection.Borders(xlInsideVertical).ColorInd ex := xlAutomatic;
excel.Selection.Borders(xlInsideHorizontal).LineSt yle := xlContinuous;
excel.Selection.Borders(xlInsideHorizontal).Weight := xlThin;
excel.Selection.Borders(xlInsideHorizontal).ColorI ndex := xlAutomatic;
end;

funktioniert nicht!

Der Bereich wird markiert aber
excel.Selection.Borders(xlDiagonalDown).LineStyle := xlNone;
bricht mit dem Fehler "Mitglied nicht gefunden" ab.

Wer kennt die Lösung?

[Gogeta12]

Ich weis nicht wie du diese Befehle rausgefunden hast aber wenn du dir ein Makro aufzeichnest und dieses dann verwendest, dann sollte das eigentlich funktionieren.

ACHTUNG: Office 2007 mit XP, da gibts eine komische lücke mit dem Anmeldenamen im Office, das sorgt dafür, dass die Makrosteuerung nicht mehr so toll funktioniert (erfahrung damit habe ich im Word gemacht)!