ExcelÆÆ½âÃÜÂë·½·¨!ExcelÍü¼ÇÃÜÂëÔõô½â¿ª£¿
ExcelÆÆ½âÃÜÂë ExcelÍü¼ÇÃÜÂëÔõô½â¿ª£¿Excel Password UnlockerÆÆ½â°æÊÇÒ»¿îרҵÓÃÓÚ΢Èí Excel Êý¾Ý¿âÎĵµµÄÃÜÂëÆÆ½â»Ö¸´¹¤¾ß¡£Ïë±Ø Excel Ó¦¸ÃÊǰ칫һ×å¾³£Óõ½µÄ°É£¬Èç¹ûÄãµÄ Excel ÃÜÂëÍü¼ÇÁËÄã¿ÉÒÔ³¢ÊÔʹÓøÃÈí¼þ½øÐлָ´ÃÜÂë»òÕßÇå³ýÃÜÂë¡£
Excel Password Unlocker 5.0 ºº»¯°æÊÇרΪ»Ö¸´¶ªÊ§µÄ Microsoft Excel ÃÜÂëÉè¼Æ£¬Ò»¸öÒ×ÓÚʹÓõŤ¾ß¡£ÃÜÂëÐ޸ı»»Ö¸´Ôڶ̶̵ļ¸ÃëÖÓ£¡¶ÔÓÚÃÜÂë´ò¿ª£¬Excel Password Unlocker 5.0 ÖÐÎİæÌṩÁËÈýÖÖ²»Í¬µÄËÑË÷·½·¨£º¸ß¼¶×ֵ䯯½â£¬±©Á¦ÆÆ½â£¬ÒÔ¼°¸ß¼¶Ç¿Á¦Ê¹ÓÃÃæ¾ß¹¥»÷¡£´Ó97µ½2007µÄExcel°æ±¾¶¼Ö§³Ö£¡
·½·¨¶þ
Èç¹ûExcelÎļþµÄ´ò¿ªÃÜÂëÍü¼ÇÁË£¬ÇÒÃÜÂëÊÇ6λÊýÒÔÄÚµÄÊý×Ö£¬¿ÉÓÃÒÔϲ½Öè½â¿ª£¨¹ØµôËùÓгÌÐò£¬ÎªÁËËÙ¶È£©£º
пªÒ»Excel£¬Í¬Ê±°´AltºÍF11£¬½øÈëVBA½çÃæ£¬µã²Ëµ¥ÉϵIJåÈ룬ģ¿é£¬ÔÚгöÀ´µÄ´°¿ÚÕ³ÌùһϴúÂ룺
Sub crack()
Dim i As Long
Dim FileName As String
i = 0
FileName = Application.GetOpenFilename("ExcelÎļþ£¨.xls & .xlsx£©,.xls;.xlsx", , "VBAÆÆ½â")
FileName = Right(FileName, Len(FileName) - InStrRev(FileName, "\"))
Application.ScreenUpdating = False
line2: On Error GoTo line1
Workbooks.Open FileName, , True, , i
MsgBox "Password is " & i
Exit Sub
line1: i = i + 1
Resume line2
Application.ScreenUpdating = True
End Sub
È»ºóÔڴ˽çÃæÖ±½Ó°´F5ÔËÐд˺꣬ѡÔñÎļþ£¬µÈ°¡µÈ
·½·¨Èý
Excel¡ª¡°³·Ïú¹¤×÷±í±£»¤ÃÜÂ롱µÄÆÆ½â²¢»ñÈ¡ÔʼÃÜÂë
1¡¢´ò¿ªÄúÐè񻮮½â±£»¤ÃÜÂëµÄExcelÎļþ£»
2¡¢ÒÀ´Îµã»÷²Ëµ¥À¸ÉϵŤ¾ß---ºê----Â¼ÖÆÐº꣬ÊäÈëºêÃû×ÖÈç:aa£»
3¡¢Í£Ö¹Â¼ÖÆ(ÕâÑùµÃµ½Ò»¸ö¿Õºê)£»
4¡¢ÒÀ´Îµã»÷²Ëµ¥À¸ÉϵŤ¾ß---ºê----ºê,Ñ¡aa,µã±à¼°´Å¥£»
5¡¢É¾³ý´°¿ÚÖеÄËùÓÐ×Ö·û(Ö»Óм¸¸ö),
6¡¢¹Ø±Õ±à¼´°¿Ú£»
7¡¢ÒÀ´Îµã»÷²Ëµ¥À¸ÉϵŤ¾ß---ºê-----ºê,Ñ¡AllInternalPasswords,ÔËÐÐ,È·¶¨Á½´Î£»
µÈÒ»»á,¾Í»á³öÏÖÒÔ϶Ի°¿ò£ºÕâ¾ÍÊÇExcelÃÜÂë¶ÔÓ¦µÄÔʼÃÜÂë(´ËÃÜÂëºÍÔÏÈÉèÖõÄÃÜÂë¶¼ÄÜ´ò¿ª´ËÎĵµ¡£ÔÙµã»÷È·¶¨¡£ExcelµÄÔʼÃÜÂë¾Í±»Çå³ýÁË
±¾ÎÄ·¢²¼ÓÚ2016Äê04ÔÂ12ÈÕ07:15
£¬ÒѾ¹ýÁË3382Ì죬ÈôÄÚÈÝ»òͼƬʧЧ£¬ÇëÁôÑÔ·´À¡
×ªÔØÇë×¢Ã÷³ö´¦: Íø¼ÊÍø
±¾ÎĵÄÁ´½ÓµØÖ·: /zhishi/2601.html
ÔÝÎÞÆÀÂÛ