Hi Guys,
I did to manage to figure out something but less fashionable than excel vba.
XlApp:= CreateOleObject('Excel.Application');
xlapp.Visible := TRUE;
xlsOpenDialogSingle.Options := [];
ExcelOpenFile(XlApp,xlsOpenDialogSingle.Files[0]);
tempBool:=ExcelHome(XlApp);
XlApp.Range['D1'].Select;
XlApp.Selection.Interior.ColorIndex := 15;
XlApp.Selection.Interior.Pattern := xlSolid;
XlApp.Selection.Interior.PatternColorIndex := xlAutomatic;
XlApp.Cells[1,4].Value:='RFDS Link';
XlApp.Cells[2,4].Value:='=HYPERLINK("C:\","Link")';
--- On Mon, 8/25/08, Adrian Estoquia <[EMAIL PROTECTED]> wrote:
From: Adrian Estoquia <[EMAIL PROTECTED]>
Subject: With Statement in delphi
To: delphi-en@yahoogroups.com
Date: Monday, August 25, 2008, 10:34 AM
Hi Guys,
I am currently migrating my VBA code into delphi. But I have hard time
converting it
in a delphi fashion.
Range("D1").Select
With Selection.Interior
.ColorIndex = 15
.Pattern = xlSolid
End With
ActiveSheet.Hyperlinks.Add Anchor:=MainSht.Cells(1, 4), Address:= _
"C:\", TextToDisplay:="Link"
Is there a possible equivalent for this one in delphi? I want to use With
statement and
also wants to create a link in the sheet.
Regards,
Adrian
[Non-text portions of this message have been removed]
