coba dilihat pada sub routine berikut:
Private Sub cmdKeluar_Click()
ActiveWorkbook.Save 'Buat menyimpan perubahan yang
terjadi pada workbook
Me.Hide 'buat menyembunyikan Form
frmPDAM
Application.Quit 'Menutup Applikasi Excel
End Sub
Jadi pada sub routine tersebut diatas, ada sebuah baris yang menyuruh
untuk menutup applikasi excel,
Gimana kalau Me.Hide dan Application.Quit diubah menjadi Unload Me
Private Sub cmdKeluar_Click()
ActiveWorkbook.Save
Unload Me
End Sub
Dengan begitu setelah form diclose routine akan melanjutkan kembali pada
baris berikutnya yang berada pada:
Private Sub Workbook_Open()
Application.Visible = False
frmPDAM.Show
* Application.Visible = True**
*End Sub
Demikian disampaikan, terima kasih.
Rgds,
[dp]
Pada 17/06/2013 8:49, Rudi Anto menulis:
Selamat pagi Excel mania,
untuk admin, mohon topic post bisa di rubah sesuai dengan permasalahan
saya, maaf sebelumnya.
pagi ini saya coba iseng2 main-main dengan vba excel.
setelah koding saya tuliskan kemudian file saya close.
saya coba buka kembali file tersebut, sungguh senang file keluar
sesuai harapan.
permasalahan kemudian timbul ketika file saya close/kluar.
jreng... file excelnya yang berupa sheet2 kok ga ada alias langsung close.
hiks.. bagaimana ini.
Mohon bantuan rekan2, adakah cara untuk buka sheet file tersebut,
NB : file terlampir
++rudi
