用宏代码破解密码：
以office2007为例说明，（2003也是一样的，只是菜单命令的位置不同）
第一步：打开该文件，先解除默认的“宏禁用”状态，方法是点击工具栏下的“选项”状态按轴构由间致钮，打开“MicrosoftOffice安全选项”窗口，选择其中的“启用此内容”，“确定”败判缓来自退出；
再切换到“视图”选项卡，点击“宏”→“录制宏”，出现“录制新宏”窗口，在“宏名”定义一个360问答名称为：Pass方席能WordBreaker，点击“确定”退出；
第二步倒：再点击“宏”→“查看宏磁走针”，选择“宏名”下的“PasswordBreake还热胶仍哪神r”并点击“编辑”，打开“MicrosoftVisualBasic”编辑器冲耐，冲商端德念结饭员皇用如下内容替换右侧窗口中的所有代码：
SubPasswordBreaker决率哪内()
DimiAsInteger侵坚圆左热盾把,jAsInteger,kAsInteger
DimlAsInteger,mAsInteger,nAsIn错殖发怀施teger
Dimi1As采轻Integer,i2AsInteger,i3AsInteger
Dimi4AsInteger,i5AsInteger,i6AsInteger
OnErr联影地叫言阳拿orResumeNext
Fori=65To66独最记应身儿:Forj=65To66厚正班利州动上丝队京初:Fork=65To66
Forl=65To66:Form=65To66:Fori1=65To66
Fori2=65To66:Fori3=65To66:Fori4=65To66
F营占快本春下停死成固帮ori5=65To6算纸错假化随顾值调6:Fori6=65To66:Forn=32To126
***.unprotectChr(i)&Chr(j)&Chr(k)&_
Chr(l)&Chr(m)&Chr(吃i1)&Chr(i2)&Chr(i3)&_
Chr(i4)&Chr(i5)&Chr(i6)&Chr(n)
If***.protectcont季和如标ents=FalseThen
MsgBox"Oneusablepasswordis"&Chr(i)&Chr(j)&_
Chr(k)&Chr(l)&Chr(m)&Chr(i1)&Chr(i2)&_
Chr(i3)&Ch父但块航表乎口不r(i4)&Chr(i5)&Chr(i6)&Chr(n)
***.sheets(1).Select
Range("a1").FormulaR1C1=Chr(i)&Chr(j)&_
Chr(k)&Chr(l)&Chr(m)&Chr(i1)&Chr(i2)&_
Chr(i3)&Chr(i4)&Chr(i5)&Chr(i6)&Chr(n)
ExitSub
EndIf
Next:Next:Next:Next:Next:Next
Next:Next:Next:Next:Next:Next
EndSub
第三步：再点击“宏”→“察模查看宏”，选择“宏名”下的“PasswordBreaker”并点击“执行”，密码就现形了。
请添加详细解释
标签：撤销,考勤机,保护
