第一篇：Excel 2007中添加或刪除工作表背景

Excel 2007中添加或刪除工作表背景

2007-09-27 10:07作者：編輯整理出處：天極網軟件頻道責任編輯：still

Excel 2007中，您可以將圖片用作僅供顯示的工作表背景。工作表背景不會被打印，也不會保留在單個工作表中或保留在另存為網頁的項目中。（Office2007專區）

要點 由于不會打印工作表背景，因此不能將其用作水印。但是，通過在頁眉或頁腳中插入圖形，您可以創造出水印的效果。

添加工作表背景

1、單擊要為其顯示工作表背景的工作表。請確保只選中了一個工作表。

2、在“頁面布局”選項卡上的“頁面設置”組中，單擊“背景”。

3、選擇要用作工作表背景的圖片，然后單擊“插入”。

所選圖片將重復填入工作表中。

注釋

·為了提高可讀性，您可以隱藏單元格網格線，并將單色陰影應用于包含數據的單元格。·當您保存工作簿時，工作表背景將與工作表數據一起保存。

刪除工作表背景

1、單擊為其顯示工作表背景的工作表。請確保只選中了一個工作表。

2、在“頁面布局”選項卡上的“頁面設置”組中，單擊“背景”。

在 Excel 中創造水印效果

在 Excel 中無法使用水印功能。如果要在每張打印的頁面上顯示圖形(例如，用于指明信息屬于機密信息)，您可以在頁眉或頁腳中插入圖形。這樣，圖形將從每頁的頂部或底部開始顯示在文本背后。您也可以調整圖形大小或縮放圖形以填充頁面。

1、單擊要與水印一起顯示的工作表。請確保只選中了一個工作表。

2、在“插入”選項卡上的“文本”組中，單擊“頁眉和頁腳”。

3、在“頁眉”下，單擊“左”、“中”或“右”框。

4、在“頁眉和頁腳元素”組中的“頁眉和頁腳工具”的“設計”選項卡上，單擊“圖片”后查找要插入的圖形。，然

5、雙擊圖形將其插入頁眉區域框中。

6、要調整圖形大小或縮放圖形，請單擊“頁眉和頁腳元素”組中的“設置圖片格式”然后在“設置圖片格式”對話框中的“大小”選項卡上選擇所需選項。

注釋

·對圖形或圖形格式所做的更改將會立即生效，并且不能撤消。

·如果要在圖形上面或下面增加空間，請在“&[圖片]”之前或之后單擊，然后按 Enter 開始新的一行。

·要更換圖形，請在“頁眉和頁角元素”組中選擇“&[圖片]”，單擊“圖片”

換”。

·在打印之前，請確保頁眉或頁腳邊緣留有足夠的空間可用于自定義的頁眉或頁腳。·要刪除圖形，請選擇“&[圖片]”，然后按 Delete。，然后單擊“替，

第二篇：刪除EXCEL工作表密碼的宏代碼

Public Sub 刪除工作表密碼()

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 '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

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

第三篇：如何在ppt中插入統一的背景或圖片

如何在ppt中插入統一的背景或圖片

office2003

方法一：空白處點右鍵——背景——下拉框中選擇“填充效果”——圖片——選擇圖片——確定。然后在“背景”對話框中點“全部應用”即可。

方法二：視圖——母板——幻燈片母板，然后添加一張圖片，然后點擊“關閉母板視圖”即可。可在“視圖”菜單下，找到對應的“母版”，然后把你想應用的圖片粘進去，再調整好位置就OK了。

第四篇：【人力表008】-應聘人員工作背景調查表

候選人背景調查報告

一.候選人基本信息

候選人姓名：性別：年齡：應聘崗位：

二.調查內容

受訪人信息：公司：

受訪人姓名：

受訪人目前職位：

受訪人聯系電話：（固話、手機）

與候選人原工作關系：

證明候選人受雇職位：

證明候選人工作時間：

證明候選人離職原因：

候選人直接匯報對象：

候選人管理團隊規模：

候選人管理能力及業績：

候選人性格特征：

候選人與同事相處關系：

候選人在工作中有何不足之處;

候選人是否與公司有經濟或勞動糾紛：

候選人在任職期間有無不良記錄：

候選人職業道德如何：

候選人可信度/忠誠度：

候選人的工作能力及工作態度如何：

候選人的知識面如何、是否勤奮：

三．綜合評價：

調查人：年月日

第五篇：對Excel數據區域或表中的數據進行排序

對Excel數據區域或表中的數據進行排序

上一頁 下一

頁

對Excel數據進行排序是數據分析不可缺少的組成部分。您可能需要執行以下操作：將名稱列表按字母順序排列;按從高到低的順序編制產品存貨水平列表，按顏色或圖標對行進行排序。對數據進行排序有助于快速直觀地顯示數據并更好地理解數據，有助于組織并查找所需數據，有助于最終做出更有效的決策。

注釋

若要查找某個單元格區域或某個表中的上限或下限值(如前 10 名或后 5 個銷售額)，可以使用自動篩選或條件格式。

了解排序

可以對一列或多列中的數據按文本(升序或降序)、數字(升序或降序)以及日期和時間(升序或降序)進行排序。還可以按自定義序列(如大、中和小)或格式(包括單元格顏色、字體顏色或圖標集)進行排序。大多數排序操作都是針對列進行的，但是，也可以針對行進行。

排序條件隨工作簿一起保存，這樣，每當打開工作簿時，都會對 Excel 表(而不是單元格區域)重新應用排序。如果希望保存排序條件，以便在打開工作簿時可以定期重新應用排序，最好使用表。這對于多列排序或花費很長時間創建的排序尤其重要。

對文本進行排序

1、選擇單元格區域中的一列字母數字數據，或者確保活動單元格在包含字母數字數據的表列中。

2、在“開始”選項卡上的“編輯”組中，單擊“排序和篩選”。

3、請執行下列操作之一：

·若要按字母數字的升序排序，請單擊“從 A 到 Z 排序”。·若要按字母數字的降序排序，請單擊“從 Z 到 A 排序”。

4、可以執行區分大小寫的排序(可選)。

如何執行區分大小寫的排序

1、在“開始”選項卡上的“編輯”組中，單擊“排序和篩選”，然后單擊“自定義排序”。

2、在“排序”對話框中，單擊“選項”。

3、在“排序選項”對話框中，選擇“區分大小寫”。

4、單擊“確定”兩次。

問題：檢查所有數據是否存儲為文本 如果要排序的列中包含的數字既有作為數字存儲的，又有作為文本存儲的，則需要將所有數字均設置為文本格式;否則，作為數字存儲的數字將排在作為文本存儲的數字前面。要將選定的所有數據設置為文本格式，請在“開始”選項卡上的“字體”組中，單擊“設置單元格字體格式”按鈕，單擊“數字”選項卡，然后在“分類”下，單擊“文本”。問題：刪除所有前導空格 在有些情況下，從其他應用程序導入的數據前面可能會有前導空格。請在排序前先刪除這些前導空格。

對數字進行排序

選擇單元格區域中的一列數值數據，或者確保活動單元格在包含數值數據的表列中。

在“開始”選項卡上的“編輯”組中，單擊“排序和篩選”，然后執行下列操作之一：

要按從小到大的順序對數字進行排序，請單擊“從最小到最大排序”。要按從大到小的順序對數字進行排序，請單擊“從最大到最小排序”。問題：檢查所有數字是否都存儲為數字 如果結果不是您所希望的，可能是因為該列中包含存儲為文本(而不是數字)的數字。例如，從某些財務系統導入的負數或者使用前導 '(撇號)輸入的數字被存儲為文本。

對日期或時間進行排序

1、選擇單元格區域中的一列日期或時間，或者確保活動單元格在包含日期或時間的表列中。

2、選擇單元格區域或表中的一列日期或時間。

3、在“開始”選項卡上的“編輯”組中，單擊“排序和篩選”，然后執行下列操作之一：

·若要按從早到晚的順序對日期或時間排序，請單擊“從最舊到最新排序”。·若要按從晚到早的順序對日期或時間排序，請單擊“從最新到最舊排序”。問題：檢查日期和時間是否存儲為日期或時間 如果結果不是您所希望的，可能是因為該列中包含存儲為文本(而不是日期或時間)的日期或時間。要使 Excel 正確地對日期和時間進行排序，該列中的所有日期和時間都必須存儲為日期或時間系列數值。如果 Excel 無法將值識別為日期或時間值，就會將該日期或時間存儲為文本。

注釋

如果要按星期日期進行排序，請設置單元格格式以顯示星期日期。如果要按星期日期進行排序，而不考慮日期，請使用 TEXT 函數將它們轉換為文本。但是，TEXT 函數會返回一個文本值，因此排序操作將基于字母數字數據。

按單元格顏色、字體顏色或圖標進行排序

如果您按單元格顏色或字體顏色手動或有條件地設置了單元格區域或表列的格式，那么，也可以按這些顏色進行排序。此外，您還可以按某個圖標集進行排序，這個圖標集是通過條件格式創建的。

1、選擇單元格區域中的一列數據，或者確保活動單元格在表列中。

2、在“開始”選項卡上的“編輯”組中，單擊“排序和篩選”，然后單擊“自定義排序”。

將顯示“排序”對話框。

3、在“列”下的“排序依據”框中，單擊需要排序的列。

4、在“排序依據”下，選擇排序類型。執行下列操作之一： ·若要按單元格顏色排序，請選擇“單元格顏色”。·若要按字體顏色排序，請選擇“字體顏色”。·若要按圖標集排序，請選擇“單元格圖標”。

5、在“次序”下，單擊該按鈕旁邊的箭頭，然后根據格式的類型，選擇單元格顏色、字體顏色或單元格圖標。

6、在“次序”下，選擇排序方式。執行下列操作之一：

·若要將單元格顏色、字體顏色或圖標移到頂部或左側，對列進行排序，請選擇“在頂端”;對行進行排序，請選擇“在左側”。

·若要將單元格顏色、字體顏色或圖標移到底部或右側，對列進行排序，請選擇“在底端”;對行進行排序，請選擇“在右側”。

注釋

沒有默認的單元格顏色、字體顏色或圖標排序次序。必須為每個排序操作定義您需要的順序。

7、若要指定要作為排序依據的下一個單元格顏色、字體顏色或圖標，請單擊“添加條件”，然后重復步驟三到步驟五。

確保在“然后依據”框中選擇同一列，并且在“次序”下進行同樣的選擇。對要包括在排序中的每個額外的單元格顏色、字體顏色或圖標，重復上述步驟。

按自定義序列進行排序 您可以使用自定義序列按用戶定義的順序進行排序。Excel 提供內置的星期日期和年月自定義序列，您還可以創建自己的自定義序列。

1、創建自定義序列(可選)。如何創建自定義序列

1）、在單元格區域中，按照需要的順序從上到下輸入要排序的值。例如： A 1 A2 1高 3 2中 3低

2）、選擇剛剛鍵入的區域。在上面的示例中，您應當選擇單元格 A1:A3。

3）、單擊“Microsoft Office 按鈕”，單擊“Excel 選項”，單擊“常用”類別，然后在“使用 Excel 時采用的首選項”下單擊“編輯自定義列表”。

4）、在“自定義序列”對話框中，單擊“導入”，然后單擊“確定”兩次。

注釋

·您只能基于值(文本、數字和日期或時間)創建自定義序列，而不能基于格式(單元格顏色、字體顏色和圖標)創建自定義序列。

·自定義序列的最大長度為 255 字符，并且第一個字符不得以數字開頭。

2、選擇單元格區域中的一列數據，或者確保活動單元格在表列中。

3、在“開始”選項卡上的“編輯”組中，單擊“排序和篩選”，然后單擊“自定義排序”。

將顯示“排序”對話框。

4、在“列”下的“排序依據”或“然后依據”框中，選擇要按自定義序列排序的列。

5、在“次序”下，選擇“自定義序列”。

6、在“自定義序列”對話框中，選擇所需的序列。在上面的示例中，您應當單擊“高、中、低”。

7、單擊“確定”。對行進行排序

1、選擇單元格區域中的一行數據，或者確保活動單元格在表列中。

2、在“開始”選項卡上的“編輯”組中，單擊“排序和篩選”，然后單擊“自定義排序”。

將顯示“排序”對話框。

3、單擊“選項”。

4、在“排序選項”對話框中的“方向”下，單擊“按行排序”，然后單擊“確定”。

5、在“列”下的“排序依據”框中，選擇要排序的行。

6、請執行下列操作之一： 按值

1)、在“排序依據”下，選擇“數值”。2)、在“次序”下，執行下列操作之一： ·對于文本值，選擇“升序”或“降序”。·對于數值，選擇“升序”或“降序”。

·對于日期或時間值，選擇“升序”或“降序”。按單元格顏色、字體顏色或單元格圖標

1)、在“排序依據”下，選擇“單元格顏色”、“字體顏色”或“單元格圖標”。

2)、單擊該按鈕旁邊的箭頭，然后選擇單元格顏色、字體顏色或單元格圖標。

3)、在“次序”下，選擇“在左側”或“在右側”。注釋

如果進行排序的數據行是工作表分級顯示的一部分，Excel 將對最高級分組(第一級)進行排序。這時即使明細數據行或列是隱藏的，它們也會集中在一起。按多個列或行進行排序

當某些數據要按一列或一行中的相同值進行分組，然后您將對該組相等值中的另一列或另一行進行排序時，您可能按多個列或行進行排序。例如，如果您有一個“部門”列和一個“雇員”列。您可以先按部門進行排序(將同一個部門中的所有雇員組織在一起)，然后按姓名排序(將每個部門內的所有姓名按字母順序排列)。最多可以按 64 列進行排序。

注釋

為了獲得最佳結果，要排序的單元格區域應包含列標題。

1、選擇具有兩列或更多列數據的單元格區域，或者確保活動單元格在包含兩列或更多列的表中。

2、在“開始”選項卡上的“編輯”組中，單擊“排序和篩選”，然后單擊“自定義排序”。

將顯示“排序”對話框。

3、在“列”下的“排序依據”框中，選擇要排序的第一列。

4、在“排序依據”下，選擇排序類型。執行下列操作之一： ·若要按文本、數字或日期和時間進行排序，請選擇“數值”。·若要按格式進行排序，請選擇“單元格顏色”、“字體顏色”或“單元格圖標”。

5、在“次序”下，選擇排序方式。執行下列操作之一： ·對于文本值，選擇“升序”或“降序”。·對于數值，選擇“升序”或“降序”。

·對于日期或時間值，選擇“升序”或“降序”。·若要基于自定義序列進行排序，請選擇“自定義序列”。

6、若要添加作為排序依據的另一列，請單擊“添加條件”，然后重復步驟三到五。

7、若要復制作為排序依據的列，請選擇該條目，然后單擊“復制條件”。

8、若要刪除作為排序依據的列，請選擇該條目，然后單擊“刪除條件”。注釋

必須至少在列表中保留一個條目。

9、若要更改列的排序順序，請選擇一個條目，然后單擊“向上”或“向下”箭頭更改順序。

列表中位置較高的條目在列表中位置較低的條目之前排序。在不影響其他列的情況下對單元格區域中的某列進行排序 警告

請謹慎使用此功能。按區域中的某列排序可能產生意外的結果，例如，移動該列中的單元格時，會使其遠離同一行上的其他單元格。注釋

不能在表中執行下列步驟。

1、選擇包含兩列或更多列的單元格區域中的一列。

2、單擊列標題選擇要排序的列。

3、在“開始”選項卡上的“編輯”組中，單擊“排序和篩選”，然后單擊某個可用的排序命令。

4、顯示“排序警告”對話框。

5、選擇“以當前選定區域排序”。

6、單擊“排序”。

7、在“排序”對話框中選擇需要的其他任意排序選項，然后單擊“確定”。

如果結果與預期不符，請單擊“撤消”了解有關排序的普遍問題的詳細信息

如果排序數據時出現意外的結果，請執行下列操作：

檢查公式返回的值是否已更改 如果排序后的數據包含一個或多個公式，那么在工作表重新計算后，這些公式的返回值可能會更改。在這種情況下，應確保重新應用排序或再次執行排序以獲得最新結果。

排序前取消隱藏行和列 對列進行排序時，隱藏的列不會移動;對行進行排序時，隱藏的列也不會移動。在對數據進行排序之前，最好先取消隱藏已隱藏的列和行。檢查區域設置 排序次序將隨區域設置的不同而不同。請確保計算機上“控制面板”的“區域設置”或“區域和語言選項”中的區域設置正確。有關更改區域設置的信息，請參閱 Windows 幫助系統。

只在一行中輸入列標題 如果需要多行標簽，請將單元格的格式設置為自動換行。

打開或關閉標題行 在對列進行排序時，通常最好有一個標題行，以便于理解數據的含義。默認情況下，標題中的值不包括在排序操作中。有時，您可能需要打開或關閉標題，以便標題中的值包括或不包括在排序操作中。執行下列操作之一：

·若要從排序中排除第一行數據(因為該行是列標題)，請在“開始”選項卡上的“編輯”組中，單擊“排序和篩選”，再單擊“自定義排序”，然后選擇“數據包含標題”。

·若要將第一行數據包括在排序中(因為它不是列標題)，請在“開始”選項卡上的“編輯”組中，依次單擊“排序和篩選”、“自定義排序”，然后清除“數據包含標題”。