Komunikasi Delphi-Excel menggunakan VBA


Bismillahirrohmanirrohim,
Assalamu’alaikum Wr Wb.
Sekitar 2 tahun (2012) yang lalu saya pernah menulis artikel “Export DBGrid ke Microsoft Excel” di grup facebook
(https://www.facebook.com/notes/komunitas-programmer-delphi-dan-interbase-indonesia/export-dbgrid-ke-microsoft-excel/390918654286205).
Alhamdulillah ternyata banyak yang tertarik dengan artikel tersebut,
unit tersebut telah didownload 457 kali pada saat postingan ini ditulis.

Kali ini saya tidak membahas tentang mengexport DBGrid/database ke Microsoft Excel namun hanya melakukan perbaikan/update pada unit yang ada dengan ditambahkan dokumentasi singkat dan contoh program.
Unit yang saya upload ada 2 versi yaitu untuk Delphi 7 dan Delphi 2006 (karena saya cuman punya 2 versi delphi itu .. hehehe)

Update Desember 2018 – Tambahan dukungan untuk Delphi 10.1-Berlin, Delphi 10.2-Tokyo 32/64bit dan Delphi 10.3-Rio 32/64bit.

Untuk menggunakan unit ini cukup mudah, copy unit yang sesuai dengan versi delphi yang anda pakai, taruh di folder lib atau jadikan satu dengan aplikasi.
Selanjutnya tambahkan VsrExcelOle pada klausa uses.

Berikut ini contoh potongan kodenya …

uses ..... VsrExcelOle;

var
  Form1: TForm1;
  ex: VsrExcel;

implementation

procedure TForm1.Button1Click(Sender: TObject);
begin
     if not Assigned(ex) then
     begin
          ex:=VsrExcel.Create; // komunikasi dengan excel
          ex.Show; // tampilkan excel
     end;
     ex.New; // buat workbook baru
     ex.AutoSelect:=True; // supaya otomatis aktifkan cell setelah menulis
     ex.Write('A1',Edit1.Text); // tulis Edit1 pada Cell A1
     if CheckBox1.Checked then
        ex.Font.Bold:=True; // Tebalkan jika dicentang
     ex.Write('A2',Edit2.Text); // tulis Edit1 pada Cell A2
     if CheckBox2.Checked then
        ex.Font.Bold:=True; // Tebalkan jika dicentang
end;

Pada object VsrExcel ada property App yang dapat kita gunakan untuk memasukkan perintah VBA lainnya yang belum tersedia di unit ini.

Unit beserta dokumentasi dan contoh programnya dapat
didownload di https://app.box.com/s/f9c4ebde3a0ce86a1895
Bila ingin memperdalam VBA Excel silahkan baca di helpnya Excel, kalo gak punya bisa juga
didownload di https://app.box.com/s/1i5ivb6k04jgz0822ez1

Semoga bermanfaat

4 Comments to Komunikasi Delphi-Excel menggunakan VBA

  1. Indra says:

    Mantap pak imam

    ijin sedot……

  2. robby says:

    joss pak, matur suwun ngih

  3. Imam Chalimi says:

    @mas Indra: silahkan
    @mas rooby: sami2

  4. wp-admin says:

    Update 17/12/2018 ..
    Support Delphi 10.1,10.2 & 10.3

Leave a Reply to robby Cancel reply

Your email address will not be published. Required fields are marked *