bu guru... sory ya kalau sy rada oon..soalnya nanya2 treus sih........ maaf bu... Private Sub Worksheet_active sy ganti dg Private Sub Worksheet_Change dengan maksud teh orang gak bisa ngerubah...tapi sy maunya pas orang lain ngerubah dia muncul peringatan yang kita mau.(sy dah berhasil)..trus pas click OK datanya itu maunya sayamah kembali ke yang blm dirubah....gimana ya bu guru codingnya....
maaf telah meropotkan... tq ----- Original Message ----- From: siti Vi To: XL-mania@yahoogroups.com Sent: Monday, November 27, 2006 11:16 PM Subject: Re: ]] XL-mania [[ Protect sheet sebetulnya, sheet yg diprotected, otomatis akan memunculkan message kalau diselect Range / cell nya, tetapi bahasanya sudah dari standa Om Bill. Kalo ingin: muncul message buatan sendiri, setiap Tab-Sheet di Klik, kira kira spt ini: di "Sheet1' dan Sheet2' Code Private Sub Worksheet_Activate() MsgBox "mohon jangan menyentuh sheet ini..", vbCritical, "ristiandy" End Sub memprotect sheet melalui VBA di Module di dalam suatu prosedur.. With Sheets("Ndak1") .Protect DrawingObjects:=True, Contents:=True, Scenarios:=True .EnableSelection = xlUnlockedCells End With With Sheets("Ndak2") .Protect DrawingObjects:=True, Contents:=True, Scenarios:=True .EnableSelection = xlUnlockedCells End With catatan: parameters untuk method PROTECT, terserah pemilihannya, tidak harus seperti itu. oiya yg lampiran yg sampai, cuma file image, bukan wkbook (xls) On 11/27/06, Ristiandy <[EMAIL PROTECTED]> wrote: Guys.. Sya punya data yang terdiri dari 3 sheet. (terlampir) Gimana sih codding nya, u/ protect sheet di data-1 / data-2 ?! Atau bisa juga timbul message-nya..? Maaf jika sudah pernah di bahas. Thx yaa.. xl mania top banget dech...