例如：Sheet2中為資訊內容，可以使用如下程式碼，已測試透過。Private Sub CommandButton1_Click()Dim cx As String "定義查詢內容變數Dim i As Integer "定義查詢數量變數Dim ii As Integer "定義迴圈變數Dim a As Integer "定義顯示數量的行數變數 a = 4 "從第三行開始顯示查詢到的資訊cx = ThisWorkbook.Sheets("Sheet1").Range("A2").Value "獲取查詢內容i = ThisWorkbook.Sheets("Sheet2").UsedRange.Rows.Count "獲取查詢表中已經使用的行數For ii = 1 To i If cx = ThisWorkbook.Sheets("Sheet2").Range("A" & ii).Value Then ThisWorkbook.Sheets("Sheet1").Range("A" & a).Value = ThisWorkbook.Sheets("Sheet2").Range("A" & ii).Value ThisWorkbook.Sheets("Sheet1").Range("B" & a).Value = ThisWorkbook.Sheets("Sheet2").Range("B" & ii).Value ThisWorkbook.Sheets("Sheet1").Range("C" & a).Value = ThisWorkbook.Sheets("Sheet2").Range("C" & ii).Value a = a + 1 End IfNextEnd Sub

1。 選擇要刪除條件格式的單元格； 2。 選擇選單“格式”/“條件格式…”，在系統彈出“條件格式”設定對話方塊中按“刪除”按鈕。 或者 1。 選擇沒有設定條件格式的單元格； 2。 按下工具列的格式刷，對要刪除條件格式的單元格進行格式複製。

如要刪除工作表中全部或部分相同條件格式，可先按“Ctrl+G”，之後在對話方塊中按“定位條件”，系統顯示定位條件對話方塊（參見圖五），在該框中，選擇“條件格式”，之後，根據需要選擇“全部”或“相同”，再按“確定”，回到編輯視窗，這時，所有設定了條件格式的單元格都被選中，再按上面所講的第一種刪除方法刪除即可。

圖五自動工作日計算 工作量當然得以“工作日”的數量去安排，但每個月的天數不同，而且週六日也不盡相同。如果想準確地知道一個月有多少個工作日，可以請Excel來幫忙! 小知識 標準工作日是指法律規定的各企業、事業、機關、團體等單位在正常情況下普遍實行的工作日。

通俗的說，就是指除了國家法定節假日（雙休日、元旦、五一、國慶、春節等）之外正常工作的日期。 任務分析 因為每月的總天數和雙休日的分佈是不同的，而且春節是農曆的假期，簡單地使用Excel函式去計算是滿足不了要求的。我們先使用Excel“分析工具庫”中的networkdays()函式計算出“準工作日”，再考慮其中的特殊農曆假日。

這樣就能準確的算出“工作日”的天數。 有請 networkdays()函式 通常情況下，在Excel中是找不到這個函式的。彆著急，跟我來。單擊“工具→載入宏”，在彈出的“載入宏”對話方塊中複選“分析工具庫”，再單擊“確定”按鈕。將Office的安裝光碟放入光碟機，按提示即可安裝成功，如圖1。

外來的和尚念不好經 networkdays()函式的語法為：networkdays(Start_date，End_date，Holidays)。其中Start_date表示開始日期，End_date為終止日期，Holidays表示一個或者多個特定假日序列，可以採用單元格引用的方式。

如圖2，B8單元格公式“=networkdays(B2,B3,B4:B6)”結果為20。事實上，2004年的10月2日和3日是星期六和星期天，那麼按照我們的習慣就會透過調休的方式，最終得到10月份只有18天上班，而不是networkdays()函式計算出的20天。

特殊假日的處理 雖然說直接應用networkdays()函式並不能得到正確的工作日天數，但我們還是可以透過對此函式的變化來得到。圖3是我們的範例，演示瞭如何一步一步逼近我們的目標。 第一步：將A列定義為月份。選中A列，在右鍵選單中選擇“設定單元格格式”，在“數字”標籤中選擇“分類”為“自定義”，“型別”中輸入“yyyy-mm”格式，單擊“確定”按鈕退出。

第二步：設計B列公式。先直接用networkdays()函式計算只考慮本月除去雙休日後的天數。雖然可直接使用該函式，但需要知道每月的開始日期和終止日期。開始日期當然是每月的1日，用“date(year(A2),month(A2),1)”表示就OK了。

結束日期應當是每月的最後一天，這就有些難度了，究竟是30日、31日還是28日、29日？需要一個複雜的判斷關係。這裡我們採用了一個變通的辦法，就是當月的最後一天其實就是下月的第一天再減去1天，所以我們可以用“date(year(A2),month(A2)+1,1)-1”來表示。

於是B2的公式就有了：“=networkdays(date(year(A2),month(A2),1),date(year(A2),month(A2)+1,1)-1)”。第三步：計算除了春節以外的雙休日。我們知道國家規定的公眾假日一共10天，除了春節的3天是每年變化的外，其餘元旦1天，勞動節3天，國慶節3天都是固定的。

因此我們可以用IF函式對月份是否是1月、5月和10月做判斷，再來減去相應的公眾假日天數，就得到了不考慮春節以外的工作日。於是C2=if(month(A2)=5,B2-3,if(month(A2)=5,B2-3,if(month(A2)=1,B2-1,B2)))或者使用or()函式就是C2=if(or(month(A2)=5,month(A2)=10),B4-3,if(month(A2)=1,B4-1,B4))。

第四步：考慮春節的問題。根據常識，春節的三天只會在1月份或者2月份出現，也就是說最後的判斷只正對1、2月份。透過萬年曆查詢得到2000——2010這十年的春節分佈，巧的是正好沒有春節三天跨月份的年份，也就是說春節三天不是落在1月份就是落在2月份，如圖4所示，這給我們應用IF函式判斷帶來了方便。

透過對年份和月份的判斷，減去相應的春節天數，就得到了真正意義上的工作日。因此在D2中應該輸入=IF(AND(OR(YEAR(A2)=2001,YEAR(A2)=2004,YEAR(A2)=2006,YEAR(A2)=2009),MONTH(A2)=1),C2-3,IF(AND(OR(YEAR(A2)=2000,YEAR(A2)=2002,YEAR(A2)=2003,YEAR(A2)=2005,YEAR(A2)=2007,YEAR(A2)=2008,YEAR(A2)=2010),MONTH(A2)=2),C2-3,C2))。

第五步：隱藏過渡列。選中“B:C”這兩列，在右鍵選單中選擇“隱藏”，將中間用於計算方便所使用的過渡列B和列C隱藏即可。 選中區域B2:D2，按住填充柄向下拖動填充後，只要在A列任一單元格輸入月份，就可以在D列得到該月相應的天數，是不是很方便？ 讓多頁表自動生成表頭 當我們製作的表格有好多頁的時候（如成績統計表等），為便於觀看，最好是每一頁都新增一個相同的表頭。

如果表格檔案頁數很少，透過手工的方法就可以很容易地實現。但當一個表格檔案多達數十頁的時候，再一個一個地逐頁新增，不僅費事，還容易出錯。那麼，有沒有辦法讓系統自動生成呢？ 1)． 在Word 2003中 開啟Word 2003表格文件，選中第一頁表的表頭，然後點選“表格→標題行重複”。

假如表頭有兩行內容，選中開頭兩行，這樣，在後面的每一頁，都會將這兩行的內容作為表頭。 2)． 在Excel 2003中 （1）開啟Excel表格文件，點選“檔案→頁面設定”。 （2）在調出的“頁面設定”對話方塊中，選擇“工作表”選項卡，在“頂端標題行”欄中輸入表頭行號，其中，“$1”表示第1行，“$1:$2”表示第1、2行。

本例中設定為“$1:$2”，打印出來的每頁表格便都有同第1、2兩行同樣內容的表頭。 3)． 在金山文字2003中 （1）開啟金山文字2003表格文件，選中表格，然後點選“表格→表格屬性→表格外觀”。 （2）在調出的“表格外觀”屬性視窗上，選擇“外觀設定”為“行列式1”，設定“以標題行重複出現行數”，本例設定為“2”，即在每一頁表格都自動生成與第1、2行內容相同的表頭。

4)． 在金山表格2003中 （1）開啟金山表格2003，點選“檔案→頁面設定”。 （2）在調出的“頁面設定”選單中，選擇“工作表”選項卡，在“頂端標題行”輸入表頭行數，本例為“2”，即在打印出來的每一頁表格上，都自動生成與第1、2行內容相同的兩行表頭。

如果表格的表頭在左邊，可以在“左端標題列”欄中輸入表頭列數。 Excel輕鬆實現自動換行 Excel處理資料之便捷眾人皆知，可在其單元格內換行就略顯不便，不知你是否也遇到過此類問題？透過摸索，以下四法便能輕鬆實現單元格內的自動換行。

1。 輸入資料隨時換行 使用者若要在輸入資料時換行，只要透過Alt+Enter組合鍵即可輕鬆實現。此方法同樣可使已輸入內容的單元格在游標所在處換行。 2。 單元格區域內換行 將某個長行轉成段落並在指定區域內換行。

例如：A10內容很長，欲將其顯示在A列至C列之內，步驟是：選定區域A10：C12（先選A10），選擇“編輯→填充→內容重排”，A10內容就會分佈在A10：C12區域中。此法特別適合用於表格內的註釋。 3。 調整單元格格式換行 選定單元格，選擇“格式→單元格”，在彈出的對話方塊中單擊“對齊”，選中“自動換行”複選框，單擊[確定]按鈕即可。

4。 文字框的巧用 單擊“檢視”選單，在“工具欄”命令中，選中“繪圖”工具欄，單擊該工具欄的“文字框”，為了保證文字框的邊界與工作表網格線重合，需按住Alt鍵的同時插入文字框，然後，就可以在文字框中任意輸入內容了。 通向Excel智慧化的N條捷徑 智慧判斷Excel重複資料 在Excel工作表中，若要判斷各個單元格中的資料是否重複並統計出重複的行號，可使用函式令其自動執行操作。

假設，要統計顯示於A1～A12單元格中的資料。首先，在B1單元格中輸入程式碼： =IF(COUNTIF($A$1:$A$13,VLOOKUP(A1,A2:$A$13,1,0))>1,CONCATENATE("重複行號:",MATCH(A1,A2:A$13,0)+ROW(A1)),"") 而後，在B1單元格中會顯示與A1資料重複的行號。

下面，選擇區域B1～B12，點選選單欄“編輯”→“填充”→“序列”，在彈出對話方塊中檢視“型別”專案，在此選擇“自動填充”，其餘選項保持預設設定。確認操作後，B2～B12之間的重複行號均會自動填充（如圖1）。 快捷搜尋相同的資料 在Excel中，若要從眾多的資料快速查詢到相同的一組資料，可利用其篩選功能。

先選擇資料列的最上方的單元格，再點選選單欄“資料→篩選→自動篩選”。而後，即可在該單元格上看到一個向下箭頭按鈕，點選它，在彈出選單中選擇欲查詢的相同資料即可（如圖2）。 自動填寫IP地址 如果需要在Excel中輸入在大量本公司區域網的IP地址，人工操作是非常耗時的，這種情況下我們可使用以下方法使其自動完成輸入。

首先，在資料列的第一行和第二行輸入IP地址。然後，選擇這兩個已輸入IP地址的單元格，點選工具欄上的“複製”按鈕。此後，會看到該區域又被新增為虛線邊框，把滑鼠置於該區域的右下角，會看到一個十字形游標，點選拖拽該游標至需輸入IP地址的結束位置。放開滑鼠後，將看到所有IP地址均按規則自動填充完畢（如圖3）。

提示：按照使用者的習慣性思維，往往會考慮使用Excel的“自動填充”實現這一效果，但可惜在本例中此項功能並不奏效。 自動計算銷售金額 在如圖4所示的表單中，若要計算出某個員工一個月內的銷售金額，可以使用篩選再求和的方法，也可以使用函式計算。

方法1：定位於“人員”單元格，點選選單欄“資料→篩選→自動篩選”，而後點選新增的該單元格向下箭頭按鈕，在彈出選單醒≡褚桓鮒付ǖ男彰 似淥 嗽保 笱≡袼 邢 勱鴝鈧械氖 藎 俚慊鞴ぞ呃干係摹白遠 蠛汀卑磁ゼ純苫竦眉撲憬峁 7椒?：定位於某人一月彙總銷售金額輸入位置的單元格後，輸入公式程式碼： =SUM((B列始行數:B列結束行數="目標員工姓名")×(D列始行數:D列結束行數="1")×(C列始行數:C列結束行數))再按“Ctrl+Shift+回車”確認公式即可。

智慧化判斷資料有效性 1． 自動彈出說明提示 對於需要註釋說明的單元格資料，我們可為其新增提示功能，以幫助使用者能夠更明晰地瞭解當前內容。在選定Excel表格中的指定單元格後，點選選單欄“資料→有效性”，而後在彈出視窗中切換到“輸入資訊”標籤頁，在此輸入選定單元格時顯示的標題及資訊（如圖5）。

2． 自動彈出錯誤提示 我們還可以設定在Excel中當輸入不符合條件的資料時自動提示。按以上方法調出“資料有效性”視窗後，切換到“出錯警告”對話方塊，在此可選擇出錯警告的圖示樣式與標題及錯誤資訊。 3． 限制輸入資料的條件 預設狀態下，在Excel中可以輸入任何資料，而你若是想讓指定單元格的資料只能是日期、時間或是有大小、長度等限制，即可使用Excel有效性功能。

在“資料有效性”視窗中，檢視“設定”標籤頁，在此點選“允許”下拉列表，在此選擇允許輸入資料的條件，例如“整數”、“小數”、“序列”、“文字長度”等，而後再按需進一步詳細設定。 4。自動新增表頭 有些使用者在列印多頁Excel表格時發現，僅第一頁有表頭，而第二頁以後就看不到表頭，只能手工新增，其實只需要調節一下列印設定即可。

在Excel中點選選單欄“檔案→頁面設定”，而後在彈出視窗中切換到“工作表”標籤頁，在此檢視“列印標題”專案，在“頂端標題行”中輸入每頁列印的表頭內容，再預覽一下效果。 隔行數值自動求和 有時出於特殊需要，得把一個Excel表格中的單數行數值及雙數行數值分別相加（即隔行數值相加），統計出最終結果5 碭裉 ぃ 止ぜ撲閌翟謔翹 氖保 聳本託枰 罷乙桓黿菥丁J紫齲 詰鼻氨碭袷 檔撓也嗵砑右渙小H緩螅 詰諞恍瀉偷詼 械ピ 衲謔淙氬煌 淖址 ㄈ鏰、b），再使其自動填充整列。

下面，點選選單欄“資料→篩選→自動篩選”，此後在新增列中分別選擇那兩個不同的字元，即可篩選出單行與雙行的數值。選中這些數值後，點選工具欄上的“自動求和”按鈕既可。 讓Office 2003能自動輸入序列號 office 2003是微軟公司推出的新一代團隊協作及辦公處理軟體。

和微軟的其他產品一樣，在安裝時它會要求使用者對照著光碟使用者手冊一個字元一個字元地輸入序列號。其實，我們只要對office 2003的安裝程式稍加改造，就可以讓它在安裝時自動輸入序列號，免去重複輸入的麻煩。 先將office 2003安裝光碟中的內容全部複製到硬碟的任意目錄下，如F:\ office2003。

然後開啟資源管理器，進入F:\office2003\office\PRO\FILES\SETUP資料夾，在右側視窗中用滑鼠右鍵單擊Setup。ini檔案，在彈出的右鍵選單中選擇“屬性”命令，開啟“屬性”對話方塊，將“只讀”複選框前的複選框清空，再單擊“確定”按鈕。

接下來用記事本程式開啟Setup。ini檔案，找到“[Options]”小節，在其下找到“USERNAME=Customer”一行，這裡定義的是使用者在安裝時輸入的使用者名稱，將其改為“USERNAME=你自己的名字”即可；“COMPANYNAME=”定義的是在安裝時使用者輸入的單位名稱，將其改為正確的名稱即可。

接下來在其下面新增上一個空行，輸入“PIDKEY=”，其中，“PIDKEY=”後面，就是光碟使用者手冊中提供的序列號，序列號要連續輸入，不需要用“-”進行連線。輸入完畢、檢查無誤後，儲存檔案並退出。 現在將“Setup。ini”檔案改回成“只讀”屬性，然後將該資料夾的內容刻錄成光碟，以後再需要安裝office 2003時，只需雙擊該光碟“Pro”資料夾下的“Setup。

exe”檔案，office 2003就會自動開啟一個已經填好了序列號的介面要求你確認，單擊“下一步”後會出現一個填好了使用者名稱、單位名稱的介面，你只需再單擊“下一步”按鈕即可，非常方便吧! 給資料新增上單位 用Excel製表，經常需要給單元格中的資料新增上單位，例如單位全年財政預算報表，就需要給單元格資料新增上單位“元”。

遇到這種情況，很多朋友都是手工新增單位符號的，甚是煩瑣。在Excel報表中，我們是實現自動為單無格資料新增單位的。 選中所有需要新增單位的單元格，然後單擊“格式/單元格”，在彈出的“單元格格式”對話方塊中，切換到“數字”選項卡，在“分類”列表框中點選“自定義”，在“型別”列表框中選擇自己需要的資料格式，如“0。

00”，最後在“型別”文字框中資料格式的後面新增中需要的數量單位，如“元”，完成後點選“確定”按鈕。 好了，現在在Excel中一一錄入資料，Excel就會為各單元格自動新增上數量單位了，可謂是一勞永逸，十分方便。 用Excel製作自動評分計算表[文章導讀] Excel自動評分計算表功能：去掉最高分和最低分後，求出平均分，根據平均分的高低排定選手的名次…… Excel自動評分計算表功能： 參加比賽的選手為20人，評委9人，去掉1個最高分和1個最低分後，求出平均分，然後根據平均分的高低排定選手的名次。

本例項所涉及到的函式有： SUM(Number1,Number2……) MAX(number1,number2……) MIN(number1,number2……) RANK(Number,ref,order) 一、評委評分表的製作 1、啟動Excel2003，新建一空白工作簿。

2、在Sheet1工作表中，仿照如圖1所示的樣式，製作一份空白表格。 3、執行“檔案→儲存”命令（或按“Ctrl+S”組合鍵），開啟“另存為”對話方塊（如圖2）。 4、單擊工具條上“工具”按鈕，在隨後出現的下拉列表（參見圖2）中，選擇“常規選項”，開啟“儲存選項”對話方塊（如圖3），設定好“開啟許可權密碼”後，確定返回。

注意：①密碼需要重新確認輸入一次。②此處只需要設定“開啟許可權密碼”，如果設定了“修改許可權密碼”，則評委在儲存評分時，必須提供密碼，反而造成不須要的麻煩。 5、然後取名（如1。xls）儲存。 6、再執行“檔案→另存為”命令，再次開啟“另存為”對話方塊，然後仿照上面的操作重新設定一個密碼後，另取一個名稱（如2。

xls）儲存一下。 7、重複第6步的操作，按照評委數目，製作好多份工作表（此處為9份）。 用Excel巧妙設定定時提醒 小余在交易中心工作，經常要打電話通知相應的評委參加工程評標工作，有時工作一忙，就忘記通知而影響正常開標。

由於他每天都用Excel為登記相應的資料，於是，我就用Excel為他設定了一個定時提醒的功能。文章末尾提供原檔案供大家下載參考。 1、啟動Excel，新建一文件，取名儲存（如“提醒。xls”）。 2、按“Alt+F11”組合鍵進入VBA編輯狀態（如圖1）。

（圖片較大，請拉動捲軸觀看） 3、在左側“工程資源管理器”視窗中，選中“VBAProject(提醒。xls)”選項，執行“插入模組”命令，插入一個新模組（模組1，參見圖1）。 4、將下述程式碼輸入到右側的編輯區域中： Sub auto_open() "設定一個自動執行的宏——auto_open Application。

OnTime TimeValue("08:30:00"), "tx" "設定提醒時間——08:30:00（可以根據需要修改），設定呼叫提醒宏——tx。 Application。OnTime TimeValue("09:30:00"), "tx" "再設定提醒一次。

End Sub Sub tx() "設定一個顯示提醒訊息的宏（名稱要與上述自動執行宏中呼叫的名稱一致）。 msg = MsgBox("通知張三、李四、王五評委參加下午評標!", vbInformation, "趕快打電話") "設定提醒對話方塊中的訊息和標題（前面是訊息內容，後面是對話方塊標題，請根據需要輸入）。

End Sub 注意：①上述程式碼中，英文單引號及其後面的字元是對程式碼的解釋，在實際輸入時可以不需要（參見圖1）。②如果設定多個提醒宏（tx1、tx2……），並在自動執行宏中分別設定呼叫的時間，可以實現多個訊息的定時提醒。 5、輸入完成後，退出VBA編輯狀態，儲存工作簿文件。

6、以後，一上班，就啟動Excel，開啟上述工作簿文件。設定時間一到，系統即刻彈出如圖2所示的提示框，這下不會忘記了吧。原檔案下載 用Excel實現定時提醒 如果您從事裝置管理工作，有近千臺機械裝置需要定期進行精度檢測，那麼，就得每天翻閱“裝置鑑定臺賬”來尋找“到期”的裝置——實在是太麻煩了!用Excel建立一本“裝置鑑定臺賬”是不是方便得多？方法是：用Excel的IF函式巢狀TODAY函式來實現裝置“到期”自動提醒。

首先，執行Excel，將“工作簿”的名稱命名為“裝置鑑定臺賬”，輸入各裝置的詳細資訊、上次鑑定日期及到期日期（日期的輸入格式應為“年-月-日”，如：2003-10-21，如圖1）。 圖1後，選中圖1所示“提示欄”下的F2單元格，點選插入選單下的函式命令，在“插入函式”對話方塊中選擇“邏輯”函式類中的IF函式，點選[確定]按鈕，就會彈出“函式引數”對話方塊，分別在Logical_test行中輸入E2=TODAY()、value_if_true行中輸入“到期”、Value_if_false行中輸入“" "”(如圖2)，並點選[確定]按鈕。

這裡需要說明的是：輸入的 "" 是英文輸入狀態下的雙引號，是Excel定義顯示值為字串時的識別符號號，即IF函式在執行完真假判斷後顯示此雙引號中的內容。為了醒目，可在“單元格屬性”中將F2單元格的字型顏色設定為紅色。圖2 最後，拖動“填充柄”，填充F列以下單元格即可。

我們知道Excel的IF函式是一個“條件函式”，它的語法是“IF(logical_test,value_if_true,value_if_false)”，具體地說就是：如果第一個引數logical_test返回的結果為真，則執行第二個引數Value_if_true的結果，否則執行第三個引數Value_if_false的結果；Excel的TODAY函式〔語法是TODAY()〕是返回當前系統日期的函式。

中4-5-31 15:43:04 實際上，本文所應用的IF函式語句為IF(E2=TODAY(),"到期","")，解釋為：如果E2單元格中的日期正好是TODAY函式返回的日期，則在F2單元格中顯示“到期”，否則就不顯示，TODAY函式返回的日期則正好是系統當天的日期。

Excel的到期提醒功能就是這樣實現的。 Excel 控制重算的方式 計算是指進行公式運算，然後在包含此公式的單元格中以數值形式顯示出運算結果的過程。在一般情況下，當在單元格中輸入一個公式時，如果相關的單元格已經準備好資料，則Excel將自動計算出結果，並顯示在單元格中；如果相關的單元格沒有準備好資料，則Excel將在單元格中顯示“0”。

實際上，可以將工作表設定為“人工重算”模式，以便在輸入工作表時，提高資料的輸入速度。設定手動計算的步驟如下： （1）執行“工具”選單中的“選項”命令，出現選項對話方塊。 （2）單擊“重新計算”選項卡，出現如圖7-10所示的對話方塊。