Re: RE: [belajar-excel] memaksa user untuk aktifkan macro

[Heru Monas]

Sebenarnya goal nya pak prazt ini apa to ???? Tadi bapak bilang setelah di jalankan, kok workbook nya gak tertutup ? Setelah saya cek Ternyata emang tulisan Jalankan macro itu bukan berupa coment Trus saya tambahin single quote itu pak Trus saya jalankan macro nya Sesuai keinginan tuh, saat saya klik cancel workbook lsg close Nah sekarang anda bilang macro harus jalan dalam kondisi disable Ya mana bisa to pak ???? Betul itu kata pak bagus Saya sekarang malah bingung sama tujuan anda pak. Mau nya maksa jalanin macro pas file di buka atau Maksa jalanin makro saat di disable ?? Kalo yang terakhir itu, jawaban saya idem sama pak bagus pak Saya nyerah Maklum bukan master Salam.hormat Sent from Yahoo! Mail on Android

---

From: PRAZT <praztm...@gmail.com>;
To: <belajar-excel@yahoogroups.com>;
Subject: RE: [belajar-excel] memaksa user untuk aktifkan macro
Sent: Sat, Nov 16, 2013 5:03:52 AM

Tadi udah saya amati betul” codenya dan saya tuli seperti berikut Private Sub Workbook_Open()     Dim answer     answer = MsgBox("Peasan yang ingin di sampaikan", vbOKCancel)     If answer = vbOK Then         'jalankan macro     Else         Application.Quit     End If     End Sub   Dan ode dari mas Heru sbb: Private Sub Workbook_Open()     Dim answer     answer = MsgBox("Peasan yang ingin di sampaikan", vbOKCancel)     If answer = vbOK Then        ' jalankan macro     Else         Application.Quit     End If     End Sub   Kira-kira dmn perbedaanya mas Heru? Cuma emang di file lampiran pada ari ' jalankan macro Saya tuliskan jalankan macro, tapi setelah itu saya ganti seperti yang diatas setelah saya kirim tapi tetep tidak bisa jalan seperti keinginan dengan catatan macro harus dalam keadaan disabel all lho ya... PRAZTMATH ™   From: belajar-excel@yahoogroups.com [mailto:belajar-excel@yahoogroups.com] On Behalf Of Heru Monas Sent: 16 Nopember 2013 11:40 To: belajar-excel@yahoogroups.com Subject: Bls: [belajar-excel] memaksa user untuk aktifkan macro [1 Attachment]   Ah ... masak sih pak Pak Prazt copy paste saja sih code saya, tanpa di pahami kemana maksudnya heheheh Nama nya saja milis belajar Excel pak, harus usaha dikit dong Maaf pak saya suka bercanda hehehe File terlampir Coba bapak amati mana yang berubah Clue dari saya : VBA itu bahasa komputer , jadi selain bahasa komputer gak akan dia pahami Nah silahkan di cari mana yang berubah dan bukan bahasa komputer pak ? Saya menulis code (awal nya) seperti itu karena saya gak tahu apa macro bapak, makanya saya tulis seperti itu. Dalam benak saya , Pak Prazt sudah bisa buat macro, pikir saya anda sudah paham mana bahasa vba mana yang bukan.  Semangat terus belajar pak, harapan saya Milis ini jadi milis tempat belajar , bukan tempat mencari solusi tanpa tahu kemana / bagaimana masalah tersebut terselesaikan     (mohon maaf buat Pak Kid sebagai moderator jika kata kata saya kurang berkenan )   Pada Sabtu, 16 November 2013 12:24, PRAZT <praztm...@gmail.com> menulis: Sudah saya coba difile terlampir dengan sentingan security macro excel saya tidak saya aktifkan tapi kok tidak jalan ya alias workbook tidak tertutup pk heru?   PRAZTMATH ™   From: belajar-excel@yahoogroups.com [mailto:belajar-excel@yahoogroups.com] On Behalf Of Heru Monas Sent: 16 Nopember 2013 10:57 To: belajar-excel@yahoogroups.com Subject: Bls: [belajar-excel] memaksa user untuk aktifkan macro   coba di ganti dengan     if answer = vbOK then   Pada Sabtu, 16 November 2013 11:55, PRAZT <praztm...@gmail.com> menulis:   Terus ada pesan eror di sini pk Heru Private Sub Workbook_Open()     dim answer     answer = Msgbox("Peasan yang ingin di sampaikan",vbOKCancel)     if answer vbOK then         jalankan macro     else         application.quit     end if End Sub   Mohon pencerahannya.. PRAZTMATH ™   From: belajar-excel@yahoogroups.com [mailto:belajar-excel@yahoogroups.com] On Behalf Of Heru Monas Sent: 16 Nopember 2013 10:08 To: belajar-excel@yahoogroups.com Subject: Bls: [belajar-excel] memaksa user untuk aktifkan macro   Menambahkan dikit ya pak... mungkin Macro nya nanti kurang lebih nya seperti ini Private Sub Workbook_Open()     dim answer     answer = Msgbox("Peasan yang ingin di sampaikan",vbOKCancel)     if answer vbOK then         jalankan macro     else         application.quit     end if     End Sub  Semoga membantu Salam ### Monas, non stop VBA Learner ####     Pada , Heru Monas <sinau...@yahoo.co.id> menulis: Salam Pak Praz.... Saya bukan pakar excel atau master, boleh ikut nimbrung kan pak ? Mohon Info, apakah setiap membuka file user wajib membuka makro tsb atau ada kemungkinan bisa mengerjakan file tanpa buka makro ? Jika sequence nya harus menjalankan macro dulu , saran dari saya sebaik nya macro nya di taruh pada even Workbook_open saja pak Atau jika ada permisif lain nya, alternatif nya  pada event workbook_open, buat prosedur yang menampilkan pesan, Beri pilihan tombol pada pesan ini dengan Yes/No dari hasil tombol mana yang di klik ini, jika OK, kita bisa eksekusi macro yang dingin kan. Jika No atau Cancel, bisa mengabaikan macro nya Semoga seperti yang di harapkan Salam Hormat ## Monas ###     Pada Sabtu, 16 November 2013 10:45, PRAZT <praztm...@gmail.com> menulis:   Selamat siang master dan be_Exeler semua Mau minta sosuli dan pencerahannya bisa atau tidak dan bagaimana cara untuk memaksa user agar mengaktifkan macro dengan kriteria jika si user membuka file excel (misal filnya bernama : coba) tapi macro belum diaktifkan maka file yang dibuka tersebut secara otomatis akan Close/keluar, tapi jika macro sudah aktif maka file coba tersebut bisa dibuka...   PRAZTMATH ™     Email ini bebas virus dan malware karena avast! Antivirus proteksi aktif.         Email ini bebas virus dan malware karena avast! Antivirus proteksi aktif.     Email ini bebas virus dan malware karena avast! Antivirus proteksi aktif.       Email ini bebas virus dan malware karena avast! Antivirus proteksi aktif.     Email ini bebas virus dan malware karena avast! Antivirus proteksi aktif.       Email ini bebas virus dan malware karena avast! Antivirus proteksi aktif.   Email ini bebas virus dan malware karena avast! Antivirus proteksi aktif.