Setuju dengan mbak Putri...
Akan lebih mudah kalau membuat sebuah userform berisi sebuah textbox dan
diset properti password char nya.

btw,
kalau mau mencoba yang rada ruwet, bisa dilihat di file yang ada disini
<https://app.box.com/s/qbj93mamaq2peulbav58>.
Bagi pengguna xl2010 dengan office 64 bit, silakan disesuaikan lebih dulu
deklarasi fungsi-fungsi API nya.

Wassalam,
Kid





On Wed, Jun 3, 2015 at 7:31 PM, egidia seftyanaputri
[email protected] [belajar-excel] <[email protected]>
wrote:

>
>
> Dear Nurani,
>
> imho, input box tidak bisa dimodifikasi menjadi **** atau sejenisnya untuk
> input password,
> coba gunakan form dengan sebuah text box untuk media input password, lalu
> ubah nilai properti Password Characternya menjadi **** atau karakter lain
> yang diinginkan
>
> cmiiw,
>
> -putri-
>
> 2015-06-03 15:39 GMT+07:00 [email protected] [belajar-excel] <
> [email protected]>:
>
>>
>>
>> Hello mr...
>> Mr. bagaimana cara menghidden password di input box
>>
>> Private Sub CommandButton3_Click()
>> 'Tombol Edit
>> *Dim myCode As String*
>> *myCode = InputBox("Please Insert your Password to Edit this
>> Worksheet..", "Your Password")*
>> *If StrPtr(myCode) = 0 Then  'Klik cancel atau close dialog (do nothing)*
>> *ElseIf LenB(myCode) = 0 Then  'Not Fill -> press OK (do nothing)*
>> *ElseIf myCode = "123" Then   'Fill 123 -> OK*
>> MsgBox "Good...your Password is Match", vbInformation, "Your Password"
>> *Sheet1.Unprotect ("123")*
>> CommandButton3.Enabled = False
>> Else   'user mengisi suatu teks yang bukan berbunyi 123 lalu menekan OK
>> MsgBox "Sorry...Your Password is not Match !!!" & vbCrLf & _
>> "You Can not Edit this Worksheet", vbCritical, " Your Password"
>> End If
>> End Sub
>>
>>  
>

Kirim email ke