Wa'alaikumussalam wr wb mas Nang,
1. Saya tidak tahu Mcrosoft Scripting Runtime-nya mau digunakan untuk apa ? 2. Yang dimaksud dengan Microsoft Application Extensibility ini apakah Microsoft VBA Extensibility ? Prinsipnya begini : Semua isi VBA bisa diedit, tambah, buang dengan VBIDE (menggunakan library Microsoft VBA Extensibility). Contoh pemakaiannya seperti Cara 1 tersebut, termasuk export import (export module to file lalu import from file hasil export tadi [2 step]) maupun read dari module A dari workbook A1 lalu write ke module B di workbook B2. Jadi, contoh dalam file tersebut adalah salah satu penggunaan VBIDE, yaitu pada proses membuat general module, membuang general module, tambah baris kode, hapus baris kode. Untuk kemampuan Export to file maupun Import to file yang dimiliki VBIDE, silakan dieksplorasi. Untuk membuat workbook baru lalu diisi dengan script, cukup dengan VBIDE ini. Tentu syarat dan ketentuan berlaku, terutama dalam hal pengturan security-nya. ------------------------- Kalau dengan 2 file (utama dan lainnya), maka proses copy file tidak perlu dengan Microsoft Scripting Runtime untuk menggunakan File System Object. Dengan fungsi yang disediakan VBA berupa filecopy dan kill saja sudah cukup. Tapi pada level object file, bukan part isi file, apalagi khusus bagian file yang ada script VBA nya saja. Jadi, untuk : 1. Saya akan coba dahulu menggunakan jalan tengah, yaitu memberikan 1 buah file, cekrip dikopi dari file utama, untuk cekrip di ThisWorkbook ditulis dari file utama, > ini membutuhkan VBIDE dengan library Microsoft VBA Extensibility seperti dicontoh file itu. Tinggal memanfaatkan properties dan methods yang disediakan oleh objects yang ada di dalam VBIDE saja. 2. Kira-kira bisa apa tidak ya tanpa Microsoft Scripting Runtime dan Microsoft Application Extensibility Copy Cekrip module? (Export-Import) > Yang jelas, bisa dengan VBIDE saja untuk export module to file x (misalnya) lalu ada proses import from file x. Tidak perlu rumit pakai Microsoft Scripting Runtime (soale bingung, mau buat apa si scripting runtime pada kasus ini). 3. Jika semuanya mentok, tentu akan digunakan cara 2 yang lebih mudah, file tambahan disembunyikan sehingga seolah-olah hanya satu file, namun susahnya ada saja orang yang hanya copy filenya tidak copy folder sehingga ada file yang tertinggal. > Kalau saya, tidak perlu disembunyikan. Save saja dengan file ter-password dan ekstensi yang sesukanya, misal .nang. Yang di-password bukan VBA, worksheet, atau workbook ya, tapi file (File Save As -> klik Tools -> General Options -> isi password). Script VBA di file utama pakai pembuat password dengan algoritma tertentu misalnya. > Sak jan-jan-nya, buat apa di password. mbok biarin kalo mau di-copy. Buatkan saja file lain sebagai validator (qc) hasil inputan dari file yang sudah diubah-ubah user itu. 4. bagaimanakah mengatasi salah kopi ini? > saat workbook dibuka, jalankan proses pemeriksaan kelengkapan file (buatlah prosedur untuk memeriksa kelengkapan file). Seperti file yang harus tersedia di folder tersebut, worksheet yang dibutuhkan, dsb. Gitu kali ya... Wassalamu'alaikum wr wb Kid 2017-09-03 9:04 GMT+07:00 nangagus [email protected] [belajar-excel] < [email protected]>: > > > Assalamualaikum warahmatullah. > > Mas Kid, > > Terima kasih atas cekripnya, .... > > Cara 1 masih terlalu berat untuk saya ikuti karena kemampuan saya yang > hanya record macro. > > Sedangkan cara 2 masih membutuhkan dua buah file, saya bermaksud hanya > memberikan 1 file namun nanti hasilnya akan menjadi banyak file namun ada > beberapa file yang ada cekripnya. > Saya akan coba dahulu menggunakan jalan tengah, yaitu memberikan 1 buah > file, cekrip dikopi dari file utama, untuk cekrip di ThisWorkbook ditulis > dari file utama, namun belum dipikirkan untuk Microsoft Scripting Runtime > dan Microsoft Application Extensibility. > > Kira-kira bisa apa tidak ya tanpa Microsoft Scripting Runtime dan > Microsoft Application Extensibility Copy Cekrip module? (Export-Import) > > Jika semuanya mentok, tentu akan digunakan cara 2 yang lebih mudah, file > tambahan disembunyikan sehingga seolah-olah hanya satu file, namun susahnya > ada saja orang yang hanya copy filenya tidak copy folder sehingga ada file > yang tertinggal. bagaimanakah mengatasi salah kopi ini? > Terima kasih mas Kid atas segala-galanya semoga mas Kid sekeluarga selalu > dirahmadi Allah . > > Wasalamualaikum warahmatullah > > Kenang > On 02/09/2017 14:39, 'Mr. Kid' [email protected] [belajar-excel] wrote: > > > Wa'alaikumussalam wr wb > > mas Nang, > > 1. Untuk menulis sebuah script di sebuah module dan sebagainya : > Bisa seperti yang ada di file yang ada disini > <https://app.box.com/s/vqf2iqcukiirc3c3evnnl2z72s2vpf06>. > 2. Untuk membuat user menjalankan suatu file yang ada vba-nya : > - sediakan file lain berisi seluruh script (ekstensi bisa dibuat > sesukanya, seperti .kid atau .dat atau .jpg) > - sertakan file lain tersebut bersama file utama yang berekstensi > .xlsm atau .xlsb > - isi file utama dengan script meng-copy file lain menjadi suatu nama > tertentu yang terkesan baru, dengan ekstensi .xlsm atau .xlsb (tergantung > tipe file saat membuat file lain tersebut) > - lalu buka file hasil copy-an file tadi, diikuti menutup file utama. > > Ada beberapa opsi lain, tetapi yang sederhana cara 2 di atas. > Cara 1 membutuhkan syarat yang lebih banyak daripada sekadar enable macros > securty > > Wassalamu'alaikum wr wb > Kid > > > > > > 2017-09-01 20:32 GMT+07:00 nangagus [email protected] [belajar-excel] < > [email protected]>: > >> >> >> Dear member B-Excel >> >> Asalamualaikum warahmatullah. >> >> saya membuat sebuah file baru macro enabel menggunakan macro. >> >> saya menggunakan cekrip: >> >> Sub damel() >> Dim nm As String >> nm = ActiveWorkbook.Path & "\satu.xlsm" >> Workbooks.Add >> ActiveWorkbook.SaveAs Filename:=nm, >> FileFormat:=xlOpenXMLWorkbookMacroEnabled >> End Sub >> >> Bagaimana caranya agar file saya yang baru itu juga ada macronya, >> misalnya menulis macro di file satu.xlsm: >> >> Sub workbook_Open () >> >> Sheet1.Activate >> >> End sub. >> >> wasalamualaikum warahmatullah >> >> NangAgus >> >> > >
