1. Dalam Word, pada Tools menu, pilih Macro, dan klik Macros.
2. Di dalam kotak Macro name, taipkan SetWordOpenPassword.
3. Di dalam Macros in list, pilih Normal.dot (global template).
4. Klik Create. Microsoft Visual Basic® Editor akan dibuka.
5. Diantara kod Sub SetWordOpenPassword() dan End Sub taipkan:

Code:
Dim strPassword As String

strPassword = InputBox(Prompt:="Type " & _
"a case-sensitive password that " & _
"must be used to open this document " & _
"from now on, and then click OK.")

ActiveDocument.Password = strPassword

MsgBox Prompt:="Open password set to '" & _
strPassword & "'."


6. Klik di mana di dalam kod macro, dan, di Run menu, klik Run Sub/UserForm.
7. taipkan password, klik OK, dan save dan tutup document. Apabila dibuka semula, anda akan diminta untuk
taipkan password.

salamz...
nie plak tipz..
utk buka PASSWD x-cel yg dah ter PROTECT.. sekiranya kengkawan lupa key passwd tadi...

Mudah jimat dan berkesan..

klu microsoft excel terlock ... gunakan OPEN OFFICE
klick menu Tools> Protect Document > Sheet.
unclick pada box protection dan save. bila korang buka semula, semua data akan terbuka seperti sedia kala....

gunakanlah... :rokok: untuk mengubat kelegaan :pompom:

aku tidak bertanggung jawab sekiranya ada penyalahgunaan tips di atas
ia anya sekadar ilmupengetahuan.. bukan utk melihat data-data bukan milik kita... oK.... Next.... kita belajar pecah masuk PASSWD M.OFFICE Plak....

erm ini lock utk 1 word atau utk semua word?..mksd aku klu lock 1 word...yg word lain pun terlock kah jga?..