Excel Fonksiyonları gibi

Delphi'de kod yazma ile ilgili sorularınızı bu foruma yazabilirsiniz.
Cevapla
Tahsinzencir
Üye
Mesajlar: 48
Kayıt: 15 May 2009 12:16

Excel Fonksiyonları gibi

Mesaj gönderen Tahsinzencir »

Excel in Eğersay Fonksiyonu ile aynı bir Koda ihtiyacım var
tayipk
Üye
Mesajlar: 284
Kayıt: 27 Kas 2013 11:32

Re: Excel Fonksiyonları gibi

Mesaj gönderen tayipk »

:D güzelmiş
Soru Sorarken yazmaya Üşenmeyen Parmaklar Sorunun Çözüldükten Sonra Teşekkür etmeye de Üşenmesin.
Lord_Ares
Üye
Mesajlar: 1070
Kayıt: 15 Eki 2006 04:33
Konum: Çorlu

Re: Excel Fonksiyonları gibi

Mesaj gönderen Lord_Ares »

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:

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;
Cevapla