Ok Mr.Kid, sesuai keinginan...syukron...
From: [email protected] [mailto:[email protected]] On Behalf Of Mr. Kid Sent: 29 Maret 2014 14:17 To: [email protected] Subject: RE: [belajar-excel] workbook otomatis keluar Ya... Hehehe... Yg diminta klo bukan semen maka nutup. Klo begitu, jgn lupa menyesuaikan ="semen" menjadi <>"semen" On Mar 29, 2014 9:55 AM, "prazt" <[email protected]> wrote: Beginikah Mr.Kid? Private Sub Worksheet_Change(ByVal Target As Range) If Target.Count = 1 Then If Target.Address = "$F$7" Then If LCase(Target.Value) = "semen" Then ThisWorkbook.Close False End If End If End If End Sub From: [email protected] [mailto:[email protected]] On Behalf Of Mr. Kid Sent: 29 Maret 2014 6:47 To: BeExcel Subject: Re: [belajar-excel] workbook otomatis keluar Hai Prazt, coba langkah berikut : 1. buat prosedur event change pada sheet tersebut 2. isi dengan script : if target.count=1 then if target.address="$F$7" then if lcase(target.value)="semen" then thisworkbook.close false endif endif endif Wassalam, Kid. 2014-03-28 11:30 GMT+07:00 prazt <[email protected]>: Dear master, tentang script VBA nih masih belem medeng juga, bagaimana script VBA jika di Sheet1 pada cell F7 (pada file terlampir) terisi SEMEN maka workbook bisa dibuka, tetapi jika di Sheet1 pada cell F7 diganti dengan yang lain maka otomatis workbook akan tertutup dan tidak bisa dibuka? _____ <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
