Hahaha, ga ngerti Mr. Kid karena baik soal maupun jawabannya bukan saya yang buat' Salam,HK On Monday, August 14, 2017, 3:52:28 PM GMT+7, 'Mr. Kid' [email protected] [belajar-excel] <[email protected]> wrote:
Kenapa ada baris di-non aktifkan ? 2017-08-14 15:07 GMT+07:00 hendrik karnadi [email protected] [belajar-excel] <[email protected]>: Hahaha...ternyata formatnya.Makasih Mr. Kid. Salam,HK On Monday, August 14, 2017, 2:50:12 PM GMT+7, 'Mr. Kid' [email protected] [belajar-excel] <[email protected] > wrote: hmmm.... Kenapa ada baris yang di-non aktifkan ? Apakah baris tersebut tidak dipakai atau tidak berguna ? Untuk bunyi Jenis Fluida, silakan lihat format cells tab Number Regards, Kid 2017-08-14 14:28 GMT+07:00 hendrik karnadi [email protected] [belajar-excel] <[email protected] >: Mr Kid, boleh ikutan kan ? Setelah Even di bawah ini dijalankan ( isi sel C5 diubah dan perubahan dibatalkan ("Cancel) ), Private Sub Worksheet_Change(ByVal Target As Range) Dim rngSave As Range With Target If .Count = 1 Then If .Address = "$C$5" Then Set rngSave = .Offset(0, -1) If .Value <> rngSave.Value Then Application.EnableEvents = False If MsgBox("Ganti isinya jadi '" & .Value & "' ?", vbQuestion + vbOKCancel, .Offset(0, -1).Text) = vbOK Then 'If Len(.Value) = 0 Then ' rngSave.Value = " " 'Else rngSave.Value = .Value 'End If Else .Value = rngSave.Value End If Application.EnableEvents = True End If End If End If End With End Sub maka sel B5 (.offset(0, -1)) akan "tetap berisi" kata "Oil" (di formula bar) padahal yang tampak pada sel adalah "Jenis Fluida" seperti tampak pada gambar berikut ini: Pertanyaannya :- Mengapa sel B5 bisa terisi dengan 2 kata "Oil" dan "Jenis Fluida" ? Mohon penjelasannya Mr. Kid.Terima kasih. Salam,HK ----- Forwarded Message -----From: Tio Adi Bayu Adjie [email protected] [belajar-excel] <[email protected] >To: "[email protected] " <[email protected] >Sent: Monday, August 14, 2017, 11:42:18 AM GMT+7Subject: Re: [belajar-excel] Code VBA dengan Worksheet _Change Terima kasih Mr. Kid, sudah berhasil. Semoga Allah membalas kebaikannya. Amiin... From: [email protected] <[email protected] > on behalf of 'Mr. Kid' [email protected] [belajar-excel] <[email protected] > Sent: Friday, August 11, 2017 7:18:03 PM To: BeExcel Subject: Re: [belajar-excel] Code VBA dengan Worksheet _Change [1 Attachment] Hai Tio, Coba file terlampir. Butuh cells penyimpan data terakhir yang diisi. Regards, Kid 2017-08-07 10:30 GMT+07:00 Tio Adi Bayu Adjie [email protected] [belajar-excel] <[email protected] >: Dear Be-Exceller, Bagaimana code VBA dengan menggunakanPrivate Sub Worksheet_Change(ByVal Target As Range). Jadi kalau isian “jenis fluida” di ganti maka nilainya kembali ke nilai sebelumnya kalau salah input. Misalnya sebelumnya nilai di Jenis Fluida nilainya "Oil”, kemudian kita ganti nilainya dengan nilai "Coolant", maka akan keluar peringatan "Anda merubah nilai ini, apakah anda yakin ? Kalau yakin, nilai jadi nilai baru (Coolant). Kalau tidak yakin (dengan klik no), nilai akan kembali ke nilai sebelumnya (Oil). Untuk lebih jelasnya, bisa dilihat di file terlampir. Thank you Best Regards, Tio Adi Bayu Adjie .
