Miss jan Hebat!!
Miss mau tanya donk, kalau searchnya dihapus, lalu'kan muncul lagi tetapi kok
linknya jadi tdk bisa bekerja ya miss ? apa berubah textnya hanya menjadi nama
"Search" ya Miss ? kalau memasukan rumusan yang ada di cell pengganti
Target.Value = "Search" berubah menjadi
=IFERROR(IF(B2="","",HYPERLINK("[Protect sheet & Cell tetapi Hyperlink bisa di
ketik..xlsm]Ngetes!A"&B2+1,"Search")),"") Kode'nya menjadi apa ya miss ? andy
dah masukin langsung tanpa (") tapi gagal miss. hehe maaf miss merepotkan. ^_^
Miss Jan Baik deh, Bantu ya Miss... Please. tapi gak maksa kok miss cuma
berharap... hehe :D. bcanda miss... ^_^
Mr. Kid sakit... Semoga Allah SWT mengangkat penyakitnya, dan kembali seceria
sebelumnya... Amin...
Thanks,
Andy
----- Pesan yang Diteruskan -----
Dari: Jan Raisin <[email protected]>
Kepada: [email protected]
Dikirim: Kamis, 5 September 2013 15:22
Judul: Re: [belajar-excel] Protect sheet & Cell tetapi Hyperlink bisa di ketik.
oh.. iya ya..
ternyata masih bisa diubah.. maklum kemarin bikinnya buru-buru xixixix ^_^
masih di project explorer, dobel klik yang ada tulisannya sheet1
lalu copas mantra berikut ini:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = Range("a2").Address Then
Application.EnableEvents = False
Target.Value = "Search"
Application.EnableEvents = True
End If
End Sub
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Address = Range("a2").Address Then
Application.EnableEvents = False
Target.Value = "Search"
Application.EnableEvents = True
End If
End Sub
coba di tes.. mudah-mudahan mantranya bekerja dengan baik
Mohon do'a dari Be-Exceller untuk kesembuhan moderator milis ini (mr. Kid),
semoga
sakitnya segera diangkat dan mr Kid dapat segera beraktifitas seperti sedia
kala.
أَذْهِبِ الْبَأْسَ. رَبَّ النَّاسِ. وَاشْفِ أَنْتَ الشَّافِي. لاَ شِفَاءَ
إِلاَّ شِفَاؤُكَ. شِفَاءً لاَ يُغَادِرُ سَقَمًا
Salam,
-Miss Jan Raisin-
Pada 5 September 2013 09.22, Andy Ajhis Ramadhan <[email protected]>
menulis:
>
>Wah... maaf andy kurang deatil ya ^_^, jadi gak dijawab...
>Trima Kasih Miss -_-' ( Mantra ) ada-ada aja nih si Miss... hehe ^_^
>Sebenernya andy dah coba kode ini tapi rumus di search bisa terhapus miss.
>mungkin gak ya miss jan agar search dapat mencari dan tidak bisa dihapus ?
>
>Salam,
>Andy
>
>----- Pesan yang Diteruskan -----
>Dari: Jan Raisin <[email protected]>
>Kepada: [email protected]
>Dikirim: Rabu, 4 September 2013 11:53
>Judul: Re: [belajar-excel] Protect sheet & Cell tetapi Hyperlink bisa di ketik.
>
>
>
>
>thread ini sudah 2 hari tidak ada yang nyentuh,, mungkin karena pertanyaannya
>membingungkan.. ^_^
>
>setelah membaca pertanyaannya.. Jan lalu merenung.. dalam masa merenung itulah
>muncul wangsit yang memberikan pencerahan berupa sebuah titik terang..
>mungkin maksud dari bang Andy ini seperti ini:
>
>1. di sheet1 cel A2 ada tulisan yang bunyinya SEARCH
>2. tulisan itu gak boleh hilang atau diganti oleh user, makanya dilock
>3. lalu cel A2 tadi harus di klik untuk bisa milih sesuatu yang harus di pilih
>di sheet yang bernama Ngetes
>
>[walah.. Jan ini kok ngomongnya berbelit2 gini sih]
>
>kalo itu masalahnya.. maka solusinya seperti ini:
>
>
1. buka dulu proteksi sheetnya
>
>2. hilangkan lock dari cel A2
>
>3. tekan tombol F11, atau klik kanan di nama sheet lalu pilih View Code, atau
>pergi ke ribbon Developer lalu klik Visual Basic.. intinya adalah gimana
>caranya bisa pindah dari lembar kerja ke VBE
>
>4. di VBE, lihat frame VBA Project di sebelah kiri, cari sesuatu yang bernama
>This WorkBook, lalu diklik dua kali
>
>5. akan terbuka lembar kerja editor yang baru.. cari sesuatu yang ada tulisan
>General dan ganti menjadi WorkBook
>
>
>secara default event dari WorkBook adalah Open dan secara tiba-tiba akan
>muncul 2 baris mantra di VB Editor tadi..
>hiii serem kan.. (dont try this at home)
>
>di tengah2 baris mantra yang tadi masukkan mantra seperti ini:
>
>Sheets("sheet1").Protect "Tester", userinterfaceonly:=True
>
>simpan workbook tersebut, tutup, lalu buka kembali.. lalu coba klik cel A2
>yang tadi
>
>hiii.. Jan masih merinding saat mencoba menerapkan cara di atas..
>masih bingung dari mana asal 2 baris mantra di atas
>
>Salam,
>
>-Miss Jan Raisin-
>
>Pada 2 September 2013 09.57, Andy Ajhis Ramadhan <[email protected]>
>menulis:
>
>>
>>Dear,
>>Be-Exceller
>>
>>
>>Bagaimana protect sheet & Cell tetapi Coding Hyerlink bisa di ketik. Dalam
>>posisi Cell yang ter-coding tersebut dikunci cell. apa
>>ada perumusan menggunakan macro. Permasalahan terlampir. Terima Kasih banyak
>>Be- Exceller.
>>
>>
>>Salam,
>>Andy
>>__._,
>
>
