Senin, 18 Februari 2013

[belajar-excel] Digest Number 2095

15 New Messages

Digest #2095
1a
Bls: [belajar-excel] perhitungan insentif borongan by "Renaldo Parulian" renaldo.parulian
3a
Open New File by "agung aldhino" d_nozz
3b
Re: Open New File by "Mr. Kid" nmkid.family@ymail.com
4a
6
Force Error 452 by slametharto
7
Tanya Rumus untuk hitung target by "Apriyadi Apri" apriyadi_apry
8a
Re: Rekap data quesioner by "Mr. Kid" nmkid.family@ymail.com
9a
9b
Re: edit dan run bat file by "Mr. Kid" nmkid.family@ymail.com

Messages

Sun Feb 17, 2013 11:31 pm (PST) . Posted by:

"Renaldo Parulian" renaldo.parulian

trims pak ferdian...cukup membantu

________________________________
Dari: M. Ferdiansyah muh_ferdy@pusri.co.id>
Kepada: belajar-excel@yahoogroups.com
Dikirim: Senin, 18 Februari 2013 14:08
Judul: Re: [belajar-excel] perhitungan insentif borongan


 
Dear Mas Re,

Coba dengan tabel bantu dan kombinasi rumus index match.

file terlampir

> Dear Suhu Excel
>
> mohon untuk bantuannya dalam perhitungan insentif borongan.
> adapaun perhitungannya kami lampirkan datanya.
>
> trims
>

____________ _________ _________ _________ _________ _________ _________
Notice : This e-mail (and any attachment) is strictly confidential and
is intended only for the addressee(s)above. Is strictly prohibited to
forward, print, copy, or otherwise reproduce this message that would
allow it to be viewed by any individual not originally listed as
a recipient(s). If you have received this e-mail in error, please
immediately notify the sender and delete this message. The opinions
expressed in this e-mail (and any attachment) are those of the individual
sender and may not necessarily reflect the views of PT Pusri.
____________ _________ _________ _________ _________ _________ _________

Sun Feb 17, 2013 11:55 pm (PST) . Posted by:

"Helsy B" helsyb

Dear Bp Renaldo P,

Bisa digunakan rumus IF seperti file terlampir, semoga sesuai yang diharapkan.

terima kasih

--- Pada Ming, 17/2/13, Renaldo Parulian renaldo.parulian@yahoo.co.id> menulis:

Dari: Renaldo Parulian renaldo.parulian@yahoo.co.id>
Judul: [belajar-excel] perhitungan insentif borongan
Kepada: "belajar-excel@yahoogroups.com" belajar-excel@yahoogroups.com>
Tanggal: Minggu, 17 Februari, 2013, 11:00 PM

 

Dear Suhu Excel
mohon untuk bantuannya dalam perhitungan insentif borongan.adapaun perhitungannya kami lampirkan datanya.
trims

Sun Feb 17, 2013 11:34 pm (PST) . Posted by:

"Dropbox" hendrikkarnadi

Hendrik's message:

"Buat rekan2 yang pernah mencari buku saya berjudul "Program Laporan Keuangan Terpadu, Aplikasi Visual Basic pada Excel 2007" silakan mengunduhnya secara gratis melalui link DropBox ini. Saya sudah mendapat ijin dari penerbitnya (PT Elex Media).

Salam,
Hendrik Karnadi"

Click here to view Program Laporan Keuangan Terpadu:
https://www.dropbox.com/l/jrvCZZrpfrEckMpR

(Hendrik shared this file using Dropbox. Enjoy!)

Mon Feb 18, 2013 12:04 am (PST) . Posted by:

"Sofyan Efendi" accesswebs

Alhamdulillah. Terima kasih untuk Pak Hendrik atas sharing filenya ini.

Saya sudah download seluruhnya, extract dan buka beberapa filenya. Insya Allah sangat bermanfaat untuk kita dalam memahami laporan keuangan, siklus accounting dan juga cara membuat program di Excel.

Terima Kasih.

Wassalamu'alaikum Warahmatullahi Wabarakatuh,
Sofyan Efendi
http://imopi.wordpress.com/

--- In belajar-excel@yahoogroups.com, Dropbox wrote:
>
> Hendrik's message:
>
> "Buat rekan2 yang pernah mencari buku saya berjudul "Program Laporan Keuangan Terpadu, Aplikasi Visual Basic pada Excel 2007" silakan mengunduhnya secara gratis melalui link DropBox ini. Saya sudah mendapat ijin dari penerbitnya (PT Elex Media).
>
> Salam,
> Hendrik Karnadi"
>
> Click here to view Program Laporan Keuangan Terpadu:
> https://www.dropbox.com/l/jrvCZZrpfrEckMpR
>
> (Hendrik shared this file using Dropbox. Enjoy!)
>

Mon Feb 18, 2013 12:39 am (PST) . Posted by:

"Mr. Kid" nmkid.family@ymail.com

Salinan file dari pengarang juga dapat diunduh di folder backup files milis
berikut ini :
>> 1 file zip (17MB) : Program Laporan Keuangan Terpadu, Aplikasi Visual
Basic pada Excel 2007
(zip)http://www.4shared.com/zip/sm3jMwF3/Program_Laporan_Keuangan_Terpa.html>

>> 1 folder berisi 6 part zip
- link folder : Folder : Program Laporan Keuangan Terpadu, Aplikasi Visual
Basic pada Excel
2007http://www.4shared.com/dir/P4GnMPBp/Program_Laporan_Keuangan_Terpa.html>
- link 6 part zip file Program Laporan Keuangan Terpadu, Aplikasi Visual
Basic pada Excel 2007 dalam folder :
part_001 (3MB)http://www.4shared.com/file/c7l0N6P3/Program_Laporan_Keuangan_Terpa.html>
part_002 (3MB)http://www.4shared.com/file/NrIVbWio/Program_Laporan_Keuangan_Terpa.html>
part_003 (3MB)http://www.4shared.com/file/MH74jglW/Program_Laporan_Keuangan_Terpa.html>
part_004 (3MB)http://www.4shared.com/file/ie-PMsx3/Program_Laporan_Keuangan_Terpa.html>
part_005 (3MB)http://www.4shared.com/file/_GxwWyYz/Program_Laporan_Keuangan_Terpa.html>
part_006 (1.7MB)http://www.4shared.com/file/dspXGg51/Program_Laporan_Keuangan_Terpa.html>
Unduh seluruh part, letakkan dalam sebuah folder, extract part_001.

>> Unduh dari link pengarang : https://www.dropbox.com/l/rdkGEObplsyPEUgO

Wassalam,
Kid.

2013/2/18 Dropbox hendrikkarnadi@yahoo.com>

> **
>
>
> From Hendrik:
>
> "Buat rekan2 yang pernah mencari buku saya berjudul "Program Laporan
> Keuangan Terpadu, Aplikasi Visual Basic pada Excel 2007" silakan
> mengunduhnya secara gratis melalui link DropBox ini. Saya sudah mendapat
> ijin dari penerbitnya (PT Elex Media).
>
> Salam,
> Hendrik Karnadi"
>
> Click here to view Program Laporan Keuangan Terpaduhttps://www.dropbox.com/l/rdkGEObplsyPEUgO>
>
> (Hendrik shared these files using Dropbox. Enjoy!) � 2013 Dropbox
>
>
>

Sun Feb 17, 2013 11:55 pm (PST) . Posted by:

"agung aldhino" d_nozz

dear master excel,
saya lagi belajar excel nich. ada yang mau saya tanyakan ke master2 sekalian. untuk membuat new file dari sheet yang ada lewat macro bagaimana yach master2???

Mon Feb 18, 2013 1:12 am (PST) . Posted by:

"Mr. Kid" nmkid.family@ymail.com

Hai Agung,

Biasanya tanpa macro bisa dengan menekan CTRL N

Jika ingin belajar VBA (Macro), coba langkah berikut : (asumsi dengan
xl2007)
1. menuju ke ribbon (menu) Developer (jika belum muncul, tekan Office
Button -> Options -> page Popular (sisi kiri) -> centang Show developer
ribbon -> OK)
2. tekan tombol record macro
3. beri nama macro (misal : BuatWorkbookBaru)
4. pada shortcut isi dengan huruf N
5. tekan OK
6. tekan CTRL N
7. tekan tombol Stop recording
8. save as workbook dengan menekan ALT F A atau menekan F12
9. pada save as type, pilih .xlsm
10. tekan tombol Save
11. coba tekan CTRL SHIFT N

Jika ingin membuat tombol khusus dalam worksheet :
1. insert shape (misal rectangle)
2. klik kanan shape -> pilih Assign Macro -> pilih nama macro (misal tadi
record macro bernama BuatWorkbookBaru ) -> OK
3. save (CTRL S)
4. klik sebuah cell
5. klik shape

Jika ingin lihat script untuk buat workbook baru :
1. ke VBE dengan menekan ALT F11
2. double click Module1
3. cari prosedur bernama BuatWorkbookBaru (bisa gunakan fitur Find dengan
menekan CTRL F dan pilih Current Project)
4. dalam prosedur (antara tulisan SUB sampai END SUB) ada perintah untuk
buat workbook baru
5. kembali ke worksheet dengan menekan ALT F11

Jika ingin buat secara langsung tanpa record macro :
1. ke VBE
2. menu Insert -> Module
3. copas script berikut :
public sub ContohBuatWorkbookBaru()
workbooks.add
end sub
4. kembali ke worksheet
5. insert shape dan assign macro ke prosedur ContohBuatWorkbookBaru [bila
perlu]

Wassalam,
Kid.

2013/2/18 agung aldhino d_nozz@yahoo.co.id>

> **
>
>
> dear master excel,
> saya lagi belajar excel nich. ada yang mau saya tanyakan ke master2
> sekalian. untuk membuat new file dari sheet yang ada lewat macro bagaimana
> yach master2???
>
>
>

Sun Feb 17, 2013 11:55 pm (PST) . Posted by:

"Andrie -" sioean2

Bro  Renald,
Ketikkan formula ini ke kolom E =IF(C6<60000,50%*C6,IF(AND(C6>59999,C6<99999),75%*C6,100%*C6))
Terima kasih

--- On Mon, 2/18/13, Renaldo Parulian renaldo.parulian@yahoo.co.id> wrote:

From: Renaldo Parulian renaldo.parulian@yahoo.co.id>
Subject: [belajar-excel] perhitungan insentif borongan
To: "belajar-excel@yahoogroups.com" belajar-excel@yahoogroups.com>
Date: Monday, February 18, 2013, 7:00 AM

 

Dear Suhu Excel
mohon untuk bantuannya dalam perhitungan insentif borongan.adapaun perhitungannya kami lampirkan datanya.
trims

Sun Feb 17, 2013 11:56 pm (PST) . Posted by:

"diklie94" diklie94

oowh, memang rumus yang dari "Alm Mbak Siti" sama juga menggunakan cell berwana ?

"Ali Sodikin"
--- In belajar-excel@yahoogroups.com, hendrik karnadi wrote:
>
> Sama2 mas, sebenarnya itu adalah ilmu warisan "Alm Mbak Siti" dengan sedikit modifikasi ...
>
> Salam,
> Hendrik Karnadi
>
>
> ________________________________
> From: diklie94
> To: belajar-excel@yahoogroups.com
> Sent: Monday, 18 February 2013, 12:05
> Subject: [belajar-excel] Re: untuk memperjelas pertanyaan saya yang tadi (membuat rumus fungsi sendiri)
>
>
>  
> waaahh mas rumus nya bagus banget mas, sesuai dengan yang saya harapkan ...
> makasih banyak ya mas atas bantuannya :)
> makasih banget, ilmu saya jadi bertambah lagi deh :)
>
> --- In belajar-excel@yahoogroups.com, hendrik karnadi wrote:
> >
> > File sudah saya edit.
> > Silakan lihat lampiran.
> >
> > Salam,
> >
> > Hendrik Karnadi
> >
> >
> >
> > ________________________________
> > From: Ali Sodikin
> > To: "belajar-excel@yahoogroups.combelajar-excel@yahoogroups.com>
> > Sent: Saturday, 16 February 2013, 12:14
> > Subject: Re: [belajar-excel] untuk memperjelas pertanyaan saya yang tadi (membuat rumus fungsi sendiri)
> >
> >
> >  
> > assalamu'alaikum mas hendrik .
> > rumus nya emang bagus tapi kurang
> > mengenai sasaran, yang saya ingin, di kolom data (angka) walau data
> > dirubah, tidak berpengaruh ke hasil
> > saya lampirkan kembali cotoh yang mungkin bisa memerjelas.
> >
>

Mon Feb 18, 2013 12:00 am (PST) . Posted by:

"hendrik karnadi" hendrikkarnadi

Ya, bedanya beliau menjumlahkan angka2 sesuai warna yang menjadi backgroundnya.

Salam,
Hendrik Karnadi

________________________________
From: diklie94 diklie94@ymail.com>
To: belajar-excel@yahoogroups.com
Sent: Monday, 18 February 2013, 14:15
Subject: [belajar-excel] Re: untuk memperjelas pertanyaan saya yang tadi (membuat rumus fungsi sendiri)


 
oowh, memang rumus yang dari "Alm Mbak Siti" sama juga menggunakan cell berwana ?

"Ali Sodikin"
--- In belajar-excel@yahoogroups.com, hendrik karnadi wrote:
>
> Sama2 mas, sebenarnya itu adalah ilmu warisan "Alm Mbak Siti" dengan sedikit modifikasi ...
>
> Salam,
> Hendrik Karnadi
>
>
> ________________________________
> From: diklie94
> To: belajar-excel@yahoogroups.com
> Sent: Monday, 18 February 2013, 12:05
> Subject: [belajar-excel] Re: untuk memperjelas pertanyaan saya yang tadi (membuat rumus fungsi sendiri)
>
>
>  
> waaahh mas rumus nya bagus banget mas, sesuai dengan yang saya harapkan ...
> makasih banyak ya mas atas bantuannya :)
> makasih banget, ilmu saya jadi bertambah lagi deh :)
>
> --- In belajar-excel@yahoogroups.com, hendrik karnadi wrote:
> >
> > File sudah saya edit.
> > Silakan lihat lampiran.
> >
> > Salam,
> >
> > Hendrik Karnadi
> >
> >
> >
> > ________________________________
> > From: Ali Sodikin
> > To: "belajar-excel@yahoogroups.combelajar-excel@yahoogroups.com>
> > Sent: Saturday, 16 February 2013, 12:14
> > Subject: Re: [belajar-excel] untuk memperjelas pertanyaan saya yang tadi (membuat rumus fungsi sendiri)
> >
> >
> >  
> > assalamu'alaikum mas hendrik .
> > rumus nya emang bagus tapi kurang
> > mengenai sasaran, yang saya ingin, di kolom data (angka) walau data
> > dirubah, tidak berpengaruh ke hasil
> > saya lampirkan kembali cotoh yang mungkin bisa memerjelas.
> >
>

Mon Feb 18, 2013 12:04 am (PST) . Posted by:

slametharto

Assalammu alaikum wr wb

Dear Master
Masih dgn email thunderbird. Saya coba dgn cdo method utk kirim bulk email ��400 recepient beserta attachment.
Tetapi hanya dpt mengirim ke 9 recepient saja, muncul error 452: Run-time error , the server rejected the sender address. The server response was : 452, user.name is over quota and can't send mail.

Setelah itu saya refresh thundirbird manual, lalu run vba lagi.. Jadi bisanya per 9 alamat penerima email. Gimana cara memaksakan agar terkirim semua.

Sebelum dan sesudahnya terima kasih.
Wassalammu 'alaikum wr wb

Mon Feb 18, 2013 12:41 am (PST) . Posted by:

"Apriyadi Apri" apriyadi_apry

Dear Master Excel,
   
        Salam sejahtera,
Mohon bantuan Master Excel untuk memberikan Rumus serta penjelasannya sehingga saya dapat mengerti setiap fungsi rumusnya.

Berikut file lampiran data dan pertanyaannya.
sebelum dan sesudahnya saya ucapkan terima kasih.

salam

Apri
WebRep
Overall rating
 

Mon Feb 18, 2013 12:57 am (PST) . Posted by:

"Mr. Kid" nmkid.family@ymail.com

hehehe... ribet ya.

Untuk membuat lembar soal quiz nya memang ribet karena harus setting
control option button.
Untuk meng-compila, hanya kolom P (kolom dengan formula) saja yang diambil.
Kolom yang berisi nomor soal, bunyi soal, kolom berisi control apapun atau
shape apapun, keterangan apapun di kolom apapun selain kolom P tidak perlu
digubris. Ketika soalnya digeser, bisa jadi kolom P nya tetap atau juga
ikut digeser tergantung selera dimana akan meletakkan formula dalam kolom P
tersebut.
Jadi, copy kolom P setiap file peserta, dan paste special values ke file
compile di kolom peserta ke-sekian (kolom baru dikanan kolom peserta
terkanan yang sudah ada di file compile).

Biasanya input (dalam hal ini untuk kasus user diluar lembaga - seperti
koresponden atau anggota) diusahakan tanpa VBA dan dibuat sejelas mungkin
yang hanya bisa menampilkan hasil pilihan si user. Jika akan menggunakan
cara pilih YA atau TIDAK dengan mengubah warna, maka diperlukan VBA. Jika
menggunakan checkbox maka akan memungkinkan dipilih keduanya. Jika
menggunakan option control, agak sedikit ribet dalam membuat lembar
quesioner nya. Fitur Data Validation bisa juga digunakan.

Apapun bentuk interface kepada user, data utama yang disimpan dalam file
yang berasal dari user adalah nilai-nilai pilihan user tanpa mempedulikan
object apapun yang ada dilembar interface.

Ketika susunan hasil compile cenderung tidak berkaidah database seperti
file compile tersebut, maka cukup data seperti di kolom P (file tempo lalu)
yang diambil.
Ketika susunan hasil compile ingin dibentuk sebagai sebuah database yang
baik, maka perlu penyusunan kolom P yang lebih berkaidah database dan bisa
jadi akan menjadi setidaknya 3 kolom yang harus di-copy, yaitu kolom yang
berisi nomor koresponden, id soal quiz, nilai pilihan koresponden. Seluruh
record (setiap nomor quiz) disusun rapat (meskipun secara interface dibuat
indah dengan berbagai jarak dan layout peletakan).
Ketiga kolom ini akan di salin ke 3 kolom tetap di file compile pada baris
baru agar menghasilkan tabel vertikal berisi 3 kolom dan buanyak baris.

Jadi, pada file untuk disebar ke koresponden sudah berisi 2 hal pokok,
yaitu :
1. Layout interface yang cantik dan mudah dipahami serta enak untuk diisi
koresponden
2. tabel data hasil inputan koresponden

Yang disalin ke file compile :
1. tabel data hasil inputan koresponden

Wassalam,
Kid.

2013/2/18 Winda Miranti winda_1504@yahoo.co.id>

> **
>
>
> Hehe agak ribet yah ternyata MR Kid..
> Sudah saya coba untuk button nya sudah bisa tapi pada saat mengcompile nya
> ada kendala Mr Kid
> Saya coba dengan metode copy paste pada saat mau mengcompile data nya,
> ternyata Button nya ga ikut ke copy, apakah ada alternatif lain Mr Kid?
> Karena bisa nya kalo move or copy sheet..
>
> Atau kl alternatif spt file yg saya lampir kan apakah lebih mudah Mr Kid?
> Pada saat memilih Ya atau Tidak, maka fil warna akan berubah secara
> otomatis jadi hitam, font jadi putih
>
> Regards,
> Winda
>
> ------------------------------
> *Dari:* Mr. Kid mr.nmkid@gmail.com>
> *Kepada:* belajar-excel@yahoogroups.com
> *Dikirim:* Jumat, 15 Februari 2013 22:39
> *Judul:* Re: [belajar-excel] Rekap data quesioner
>
>
> Hai Winda,
>
> eee.... gimana ya...
> moga-moga ada BeExceller yang bisa bantu ya.
>
> kalau boleh usul, file data tiap pesertanya seperti file terlampir mulai
> kolom J jika tetap ingin menggunakan object control.
> 1. Penggunaan object ActiveX Option Button memungkinkan membentuk grup
> object per nomor berisi option button YA dan option button TIDAK, sehingga
> hanya bisa diisi salah satu saja, yaitu YA saja atau TIDAK saja. Object
> control Checkbox memang bagus tampilannya yang berupa checked, tetapi
> membutuhkan VBA untuk mengatur salah satu saja yang dipilih.
> 2. Pemberian nama object yang memiliki pola dan dapat membedakan antara
> object YA dan TIDAK untuk berbagai nomor, akan memudahkan proses loop jika
> dibutuhkan.
> 3. Penggunaan kolom bantu yang dapat sekaligus membentuk suatu data
> kontinyu sebagai sebuah area berisi data yang siap di-compile. Sehingga
> loop setiap file peserta dapat dilakukan dengan relatif lebih cepat dengan
> mengurangi proses terhadap setiap file yang dibuka.
> 4. Seluruh file peserta diletakkan dalam sebuah folder dan data pada sheet
> dengan nama tetap atau pada indeks sheet dalam sheet tab yang tetap juga
> setiap filenya. Hal ini akan memudahkan loop buka setiap file peserta.
> Contoh VBA untuk membuka workbook lain juga telah tersebar di milis.
>
> Dengan susunan file peserta seperti di atas, maka area data yang selalu
> diambil adalah sebuah area (currentregion) mulai cell P5 (kolom P pada item
> quiz pertama). Bisa jadi proses buka file -> salin area mulai P5 ke compile
> -> tutup file membutuhkan sekitar 5 detik bahkan mungkin kurang.
>
> Andai usulan di atas kurang sesuai atau tidak memungkinkan untuk
> diterapkan, maka diperlukan loop setiap object yang YA saja. Bisa jadi
> proses terhadap setiap peserta akan memakan waktu karena dibutuhkan loop
> setiap object yang ada (andai ada 20 item nomor, masing-masing ada 2
> object, total baca 40 object dan untuk yang diproses adalah 10 objectnya
> saja). Andai ada 100 koresponden, maka proses buka file -> baca -> susun
> data -> salin ke compile -> tutup file bisa memakan waktu. Andai setiap
> file sampai 15 detik, maka dibutuhkan 25 menit unuk 100 koresponden.
>
> Mungkin ada usulan lain dari rekan BeExceller, yang lebih mudah dan lebih
> simple untuk diterapkan.
>
> Wassalam,
> Kid.
>
>
> 2013/2/15 Winda Miranti winda_1504@yahoo.co.id>
>
> **
>
> Dear Be-Excel
>
> Selamat sore para excel mania, semoga semua dalam keadaan sehat waalfiat
> yaa
>
> Saya mempunyai sebuah kasus untuk merekap hasil quesioner
> Bagaimana caranya untuk mengcompile hasil qeusioner seperti contoh
> terlampir ke file compile, sehingga pada saat mengklik box compile hasil
> dari jawaban masing2 peserta secara otomatis terinput ke kolom yang sudah
> disediakan
> Dan kemungkinan pertanyaanya bisa sampe 100 atau lebih
>
> Saya sudah mencoba beberapa alternatif dan jawaban yang sekira nya mirip
> dengan kasus saya, tapi masi blm ketemu yg cocok
> atau mungkin ada contoh serupa yg pernah dibahas tapi terlewatkan oleh
> saya utk membaca nya, mohon dimaafkan
>
> Mohon pencerahanya para master excel :)
>
> Trimkasi Banyak
> Regards,
> Winda
>
>
>
>
>
>

Mon Feb 18, 2013 1:15 am (PST) . Posted by:

"him mah"

dear all, untuk edit dan run file bat dari excel VBA nya seperti apa ya

setelah saya googling di internet ketemu VBA seperti ini

Sub WriteAndRunBatFile()
Dim fs As Scripting.FileSystemObject
Dim file As TextStream
Dim retVal
Dim strFilePath As String

strFilePath = "C:\AKU\aku.bat"

Set fs = New Scripting.FileSystemObject 'Requires a reference to
Microsoft Scripting Runtime
'Set fs = CreateObject("Scripting.FileSystemObject") 'does not require
the reference

Set file = fs.CreateTextFile(strFilePath)

file.WriteLine "blah-blah&quot;
file.WriteLine "blah-blah&quot;
file.Close

retVal = Shell(strFilePath)

End Sub

nah ketika dijalankan, error pada bagian
Scripting.FileSystemObject
"user defined type not defined"

kira-kira solusinya seperti apa

Mon Feb 18, 2013 1:37 am (PST) . Posted by:

"Mr. Kid" nmkid.family@ymail.com

Hai Him Mah,

Deklarasi variabel seperti :
Dim fs As Scripting.FileSystemObject
menuntut dipastikannya bahwa pada references telah di-add (dicentang) class
terkait.
Untuk class scripting, pada references bisa dicari MS Scripting Runtime
(jika tidak ada, browse dan cari file scrrun.dll dan andai file tersebut
tidak ada, cari, install dan register ke komputer setempat).

Dengan deklarasi seperti tersebut di atas, maka init object pertama kali
akan selalu membutuhkan baris :
Set fs = New Scripting.FileSystemObject

Jika tidak ingin harus melakukan add references, maka bisa dilakukan
binding secara langsung. Deklarasi variabelnya adalah sebagai Object
dim fs as object
Kemudian init object bisa menggunakan :
Set fs = CreateObject("Scripting.FileSystemObject") 'untuk membuat
object baru dari class scripting

Pada class lainnya, bisa juga menggunakan GetObject
misal :
dim objXLNew as object
dim objXLOld as object

set objxlnew=createobject("Excel.Application") 'buat instansi Excel baru
set objxlold=getobject("Excel.Application";) 'ambil instansi Excel yang
sudah aktif

Karena type varibel menggunakan Object (universal variabel Object), maka
biasanya akan lebih lambat. Taoi komputer sekarang kan udah pada canggih
tuh, jadi kayanya bisa gak terasa beda.

Wassalam,
Kid.

On Mon, Feb 18, 2013 at 4:15 PM, him mah himmah.mlg@gmail.com> wrote:

> **
>
>
> dear all, untuk edit dan run file bat dari excel VBA nya seperti apa ya
>
> setelah saya googling di internet ketemu VBA seperti ini
>
> Sub WriteAndRunBatFile()
> Dim fs As Scripting.FileSystemObject
> Dim file As TextStream
> Dim retVal
> Dim strFilePath As String
>
> strFilePath = "C:\AKU\aku.bat"
>
> Set fs = New Scripting.FileSystemObject 'Requires a reference to
> Microsoft Scripting Runtime
> 'Set fs = CreateObject("Scripting.FileSystemObject") 'does not require
> the reference
>
> Set file = fs.CreateTextFile(strFilePath)
>
> file.WriteLine "blah-blah&quot;
> file.WriteLine "blah-blah&quot;
> file.Close
>
> retVal = Shell(strFilePath)
>
> End Sub
>
> nah ketika dijalankan, error pada bagian
> Scripting.FileSystemObject
> "user defined type not defined"
>
> kira-kira solusinya seperti apa
>
>
GROUP FOOTER MESSAGE
---------------------------------------------------------------------
bergabung ke milis (subscribe), kirim mail kosong ke:
belajar-excel-subscribe@yahoogroups.com

posting ke milis, kirimkan ke:
belajar-excel@yahoogroups.com

berkunjung ke web milis
http://tech.groups.yahoo.com/group/belajar-excel/messages

melihat file archive / mendownload lampiran
http://www.mail-archive.com/belajar-excel@yahoogroups.com/
atau (sejak 25-Apr-2011) bisa juga di :
http://milis-belajar-excel.1048464.n5.nabble.com/

menghubungi moderators & owners: belajar-excel-owner@yahoogroups.com

keluar dari membership milis (UnSubscribe):
kirim mail kosong ke  belajar-excel-unsubscribe@yahoogroups.com
---------------------------------------------------------------------
Diposting oleh EXCEL FEED LEARNING di 01.37

Tidak ada komentar:

Posting Komentar

Langganan: Posting Komentar (Atom)