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: [email protected] [mailto:[email protected]] On 
Behalf Of Heru Monas
Sent: 16 Nopember 2013 11:40
To: [email protected]
Subject: Bls: [belajar-excel] memaksa user untuk aktifkan macro [1 Attachment]

 

Ah ... masak sih pak   
<http://mail.yimg.com/ok/u/assets/img/emoticons/emo31.gif> 
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 <[email protected] 
<mailto:[email protected]> > 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: [email protected] <mailto:[email protected]>  
[mailto:[email protected]] On Behalf Of Heru Monas
Sent: 16 Nopember 2013 10:57
To: [email protected] <mailto:[email protected]> 
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 <[email protected] 
<mailto:[email protected]> > 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: [email protected] <mailto:[email protected]>  
[mailto:[email protected]] On Behalf Of Heru Monas
Sent: 16 Nopember 2013 10:08
To: [email protected] <mailto:[email protected]> 
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 <[email protected] <mailto:[email protected]> > 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 <[email protected] 
<mailto:[email protected]> > 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 ™

 

 

  _____  


 <http://www.avast.com/> 

Email ini bebas virus dan malware karena avast! Antivirus 
<http://www.avast.com/>  proteksi aktif. 

 

 

 

 

  _____  


 <http://www.avast.com/> 

Email ini bebas virus dan malware karena avast! Antivirus 
<http://www.avast.com/>  proteksi aktif. 

 

 

  _____  


 <http://www.avast.com/> 

Email ini bebas virus dan malware karena avast! Antivirus 
<http://www.avast.com/>  proteksi aktif. 

 

 

 

  _____  


 <http://www.avast.com/> 

Email ini bebas virus dan malware karena avast! Antivirus 
<http://www.avast.com/>  proteksi aktif. 

 

 

  _____  


 <http://www.avast.com/> 

Email ini bebas virus dan malware karena avast! Antivirus 
<http://www.avast.com/>  proteksi aktif. 

 

 

 

  _____  


 <http://www.avast.com/> 

Email ini bebas virus dan malware karena avast! Antivirus 
<http://www.avast.com/>  proteksi aktif. 

 



---
Email ini bebas dari virus dan malware karena Proteksi avast! Antivirus aktif.
http://www.avast.com

<<image001.png>>

<<image002.png>>

<<image003.gif>>

<<image004.png>>

Kirim email ke