Excel Fonksiyonları gibi
Forum kuralları
Forum kurallarını okuyup, uyunuz!
Forum kurallarını okuyup, uyunuz!
-
- Üye
- Mesajlar: 48
- Kayıt: 15 May 2009 12:16
Excel Fonksiyonları gibi
Excel in Eğersay Fonksiyonu ile aynı bir Koda ihtiyacım var
Re: Excel Fonksiyonları gibi

Soru Sorarken yazmaya Üşenmeyen Parmaklar Sorunun Çözüldükten Sonra Teşekkür etmeye de Üşenmesin.
Re: Excel Fonksiyonları gibi
Araştırırken şöyle bir şey görmüştüm belki işine yarar, uses comobj,xlconst; //comobj kütüphanesinin eklemeyi unutma.
//Excel deki hücreye formul yazmak için
Kod:
//Excel hücresindeki formulü getirir.
Kod:
//Excel deki hücreye formul yazmak için
Kod:
Kod: Tümünü seç
Function ExcelSetCellFormula(
Excel : Variant;
FormulaString : ShortString;
RowNum, ColNum: Integer): Boolean;
Begin
Result := True;
Try
Excel.
ActiveSheet.
Cells[RowNum, ColNum].
Formula := FormulaString;
Except
Result := False;
End;
End;
//Excel hücresindeki formulü getirir.
Kod:
Kod: Tümünü seç
Function ExcelGetCellFormula(
Excel : Variant;
RowNum, ColNum: Integer): ShortString;
Begin
Result := ' ';
Try
Result := Excel.
ActiveSheet.
Cells[RowNum, ColNum].
Formula;
Except
Result := ' ';
End;
End;