wps怎樣查看工作表被保護
① Ipad上面的使用wps寫文件時顯示工作表被保護,無法完成該操作。該怎麼辦
你的文件是別人的嗎?
可能別人設置保護
你要解除保護才能編輯
② wps中的工作表保護不了和什麼有關
和軟體或者人有關系。
如果是軟體問題,嘗試更換軟體解決。
如果是人的關系,嘗試更換人,或者去其他人能正常使用的電腦上的軟體操作,以判斷自己的操作是否正確。
③ wps表格工作表被保護 但是密碼忘記了 怎麼撤銷保護呢
一、另存為和重建法 首先,用word 2010打開那個加密文檔。 依次單擊窗口的「文件另存為」菜單,單擊「另存為」對話框右側的「我的電腦」,再選中列表中的某數據分區(如G盤)。單擊「保存類型」右側的下拉列表箭頭,拖動滾動條,找到「純文本(*.txt)」選項後選定,單擊「保存」後完成操作。然後,打開G盤中剛才保存的TXT文檔,按下Ctrl+A組合鍵選中頁面中的全部文檔。新開的一個Word 2010空白文檔,將剛才復制的內容粘貼到這個新Word 2010空白文檔中。這樣,就可以對它進行編輯操作了。
二、使用word工具箱先在網上下載「Word工具箱」軟體,雙擊下載的WordTool.EXE文件開始解壓操作,自動進到「Word必備工具箱」窗口中;接著,單擊窗口下的「安裝」後,在Word菜單欄中生成「工具箱」的菜單項;然後,雙擊那個「加過密」的文檔,依次單擊菜單欄的「工具箱Word必備工具箱」;單擊工具箱的「破解」選項卡後,再單擊「輕松去除『保護文檔』密碼」,就能移去文檔中的密碼。
④ wps中 如何保護工作表
以WPS2010為例,二種方法打開工作表保護功能
方法1
1、菜單上的「審閱」
2、保護工作表,輸入工作表的密碼並選擇要保護的項
3、也可以保護整個工作簿
⑤ wps工作表被保護,但是不知道密碼
摘要 八、打開excel文件後發現工作表保護密碼已刪除。
⑥ WPS的工作表保護如何破解呀
一、打開WPS表格,在工作表的左上角(行標記與列標記的交匯處)點擊滑鼠,將整個工作表選中,然後右擊滑鼠,選擇「設置單元格格式」,在彈出的「單元格格式」窗口中,點擊「保護」標簽,在「保護」標簽下,將「鎖定」前面的鉤去掉,點擊「確定」退出。紅色框選區域「鎖定」只有在工作表被保護時才會生效。
⑦ WPS表格中,工作表保護密碼怎麼找回或者破解
可以去網上下載一個Excel密碼移除軟體。以前我就移除過Word的密碼。
⑧ WPS工作表如何去除保護,WPS工作表是受保護的,如何去除
1、打開WPS工作表,此工作表目前處於受保護的狀態。
⑨ wps保護工作表
「工具」菜單欄下選擇「選項」打開另一個窗口選擇「安全性」把裡面的密碼刪除掉再「確定」就行了。
⑩ WPS表格 撤銷工作表保護 密碼怎麼破解 能不能用什麼東西查看這個密碼
下面是步驟方法:
1、打開需要破解保護密碼的Excel文件;
2、依次點擊菜單欄上的工具---宏----錄制新宏,輸入宏名字如:aa;
3、停止錄制(這樣得到一個空宏);
4、依次點擊菜單欄上的工具---宏----宏,選aa,點編輯按鈕;
5、刪除窗口中的所有字元(只有幾個),替換為下面的內容;
從下面英文開始復制:
Option Explicit
Public Sub AllInternalPasswords()
' Breaks worksheet and workbook structure passwords. Bob McCormick
' probably originator of base code algorithm modified for coverage
' of workbook structure / windows passwords and for multiple passwords
'
' Norman Harker and JE McGimpsey 27-Dec-2002 (Version 1.1)
' Modified 2003-Apr-04 by JEM: All msgs to constants, and
' eliminate one Exit Sub (Version 1.1.1)
' Reveals hashed passwords NOT original passwords
Const DBLSPACE As String = vbNewLine & vbNewLine
Const AUTHORS As String = DBLSPACE & vbNewLine & _
"Adapted from Bob McCormick base code by" & _
"Norman Harker and JE McGimpsey"
Const HEADER As String = "AllInternalPasswords User Message"
Const VERSION As String = DBLSPACE & "Version 1.1.1 2003-Apr-04"
Const REPBACK As String = DBLSPACE & "Please report failure " & _
"to the microsoft.public.excel.programming newsgroup."
Const ALLCLEAR As String = DBLSPACE & "The workbook should " & _
"now be free of all password protection, so make sure you:" & _
DBLSPACE & "SAVE IT NOW!" & DBLSPACE & "and also" & _
DBLSPACE & "BACKUP!, BACKUP!!, BACKUP!!!" & _
DBLSPACE & "Also, remember that the password was " & _
"put there for a reason. Don't stuff up crucial formulas " & _
"or data." & DBLSPACE & "Access and use of some data " & _
"may be an offense. If in doubt, don't."
Const MSGNOPWORDS1 As String = "There were no passwords on " & _
"sheets, or workbook structure or windows." & AUTHORS & VERSION
Const MSGNOPWORDS2 As String = "There was no protection to " & _
"workbook structure or windows." & DBLSPACE & _
"Proceeding to unprotect sheets." & AUTHORS & VERSION
Const MSGTAKETIME As String = "After pressing OK button this " & _
"will take some time." & DBLSPACE & "Amount of time " & _
"depends on how many different passwords, the " & _
"passwords, and your computer's specification." & DBLSPACE & _
"Just be patient! Make me a coffee!" & AUTHORS & VERSION
Const MSGPWORDFOUND1 As String = "You had a Worksheet " & _
"Structure or Windows Password set." & DBLSPACE & _
"The password found was: " & DBLSPACE & "$$" & DBLSPACE & _
"Note it down for potential future use in other workbooks by " & _
"the same person who set this password." & DBLSPACE & _
"Now to check and clear other passwords." & AUTHORS & VERSION
Const MSGPWORDFOUND2 As String = "You had a Worksheet " & _
"password set." & DBLSPACE & "The password found was: " & _
DBLSPACE & "$$" & DBLSPACE & "Note it down for potential " & _
"future use in other workbooks by same person who " & _
"set this password." & DBLSPACE & "Now to check and clear " & _
"other passwords." & AUTHORS & VERSION
Const MSGONLYONE As String = "Only structure / windows " & _
"protected with the password that was just found." & _
ALLCLEAR & AUTHORS & VERSION & REPBACK
Dim w1 As Worksheet, w2 As Worksheet
Dim i As Integer, j As Integer, k As Integer, l As Integer
Dim m As Integer, n As Integer, i1 As Integer, i2 As Integer
Dim i3 As Integer, i4 As Integer, i5 As Integer, i6 As Integer
Dim PWord1 As String
Dim ShTag As Boolean, WinTag As Boolean
Application.ScreenUpdating = False
With ActiveWorkbook
WinTag = .ProtectStructure Or .ProtectWindows
End With
ShTag = False
For Each w1 In Worksheets
ShTag = ShTag Or w1.ProtectContents
Next w1
If Not ShTag And Not WinTag Then
MsgBox MSGNOPWORDS1, vbInformation, HEADER
Exit Sub
End If
MsgBox MSGTAKETIME, vbInformation, HEADER
If Not WinTag Then
MsgBox MSGNOPWORDS2, vbInformation, HEADER
Else
On Error Resume Next
Do 'mmy do loop
For i = 65 To 66: For j = 65 To 66: For k = 65 To 66
For l = 65 To 66: For m = 65 To 66: For i1 = 65 To 66
For i2 = 65 To 66: For i3 = 65 To 66: For i4 = 65 To 66
For i5 = 65 To 66: For i6 = 65 To 66: For n = 32 To 126
With ActiveWorkbook
.Unprotect Chr(i) & Chr(j) & Chr(k) & _
Chr(l) & Chr(m) & Chr(i1) & Chr(i2) & _
Chr(i3) & Chr(i4) & Chr(i5) & Chr(i6) & Chr(n)
If .ProtectStructure = False And _
.ProtectWindows = False Then
PWord1 = Chr(i) & Chr(j) & Chr(k) & Chr(l) & _
Chr(m) & Chr(i1) & Chr(i2) & Chr(i3) & _
Chr(i4) & Chr(i5) & Chr(i6) & Chr(n)
MsgBox Application.Substitute(MSGPWORDFOUND1, _
"$$", PWord1), vbInformation, HEADER
Exit Do 'Bypass all for...nexts
End If
End With
Next: Next: Next: Next: Next: Next
Next: Next: Next: Next: Next: Next
Loop Until True
On Error GoTo 0
End If
If WinTag And Not ShTag Then
MsgBox MSGONLYONE, vbInformation, HEADER
Exit Sub
End If
On Error Resume Next
For Each w1 In Worksheets
'Attempt clearance with PWord1
w1.Unprotect PWord1
Next w1
On Error GoTo 0
ShTag = False
For Each w1 In Worksheets
'Checks for all clear ShTag triggered to 1 if not.
ShTag = ShTag Or w1.ProtectContents
Next w1
If ShTag Then
For Each w1 In Worksheets
With w1
If .ProtectContents Then
On Error Resume Next
Do 'Dummy do loop
For i = 65 To 66: For j = 65 To 66: For k = 65 To 66
For l = 65 To 66: For m = 65 To 66: For i1 = 65 To 66
For i2 = 65 To 66: For i3 = 65 To 66: For i4 = 65 To 66
For i5 = 65 To 66: For i6 = 65 To 66: For n = 32 To 126
.Unprotect Chr(i) & Chr(j) & Chr(k) & _
Chr(l) & Chr(m) & Chr(i1) & Chr(i2) & Chr(i3) & _
Chr(i4) & Chr(i5) & Chr(i6) & Chr(n)
If Not .ProtectContents Then
PWord1 = Chr(i) & Chr(j) & Chr(k) & Chr(l) & _
Chr(m) & Chr(i1) & Chr(i2) & Chr(i3) & _
Chr(i4) & Chr(i5) & Chr(i6) & Chr(n)
MsgBox Application.Substitute(MSGPWORDFOUND2, _
"$$", PWord1), vbInformation, HEADER
'leverage finding Pword by trying on other sheets
For Each w2 In Worksheets
w2.Unprotect PWord1
Next w2
Exit Do 'Bypass all for...nexts
End If
Next: Next: Next: Next: Next: Next
Next: Next: Next: Next: Next: Next
Loop Until True
On Error GoTo 0
End If
End With
Next w1
End If
MsgBox ALLCLEAR & AUTHORS & VERSION & REPBACK, vbInformation, HEADER
End Sub
-------------------
復制到橫線以上
6、關閉編輯窗口;
7、依次點擊菜單欄上的工具---宏-----宏,選AllInternalPasswords,運行,確定兩次;
8、 等一會,就會出現以下對話框:這就是Excel密碼對應的原始密碼(此密碼和原先設置的密碼都能打開此文檔。如果是別人的文檔,又想恢復密碼設置,就可以用此密碼進行保護,就能用設置的密碼打開。字母一定要大寫):
再點擊確定。Excel的原始密碼就被清除了。