Einzelnen Beitrag anzeigen

HendrikM

Registriert seit: 30. Aug 2005
Ort: Berlin
49 Beiträge
 
#2

Re: Fett/kursiv mit Excel (BIFF)

  Alt 13. Sep 2005, 13:38
folgendes sollte funktionieren:

[delphi]var R:Excel_TLB.Range;
begin
R:=TAB.Range[TAB.Cells.Item[1,1],TAB.Cells.Item[1,1]] as Excel_TLB.Range;
with R do
begin
with Font do
begin
Name := 'Arial';
FontStyle := 'Bold';
Size := 10;
end;
end;
end;
Übergeben müßtest Du (als TAB) das entsprechende Excel.Worksheet.
Gruß HendrikM
  Mit Zitat antworten Zitat