Asalamualaikum warahmatullah,
Syukron, Terima kasih Mas Kid, saya kerjakan dahulu besok kalau ada
kesulitan akan saya tanyakan kembali.
Terima kasih
Wasalamualaikum warah matullah.
On 03/09/2017 11:32, 'Mr. Kid' [email protected] [belajar-excel] wrote:
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]
<mailto:[email protected]> [belajar-excel]
<[email protected] <mailto:[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]
<mailto:[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]
<mailto:[email protected]> [belajar-excel]
<[email protected]
<mailto:[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
