Private Sub cmdRUN_Click()
Dim i As Integer, j As Integer
Dim 所有人 As Integer
Dim 有電腦的人 As Integer
所有人 = 30
有電腦的人 = 20
For i = 2 To 所有人
Cells(i, 4) = ""
For j = 2 To 有電腦的人
If Cells(i, 3) = Cells(j, 1) Then Cells(i, 4) = "有電腦": Exit For
Next j
Next i
MsgBox "OK"
End Sub
熱門文章
-
前言:使用Adobe Reader X版處理公文表單上傳PDF檔案時出現「Adobe Reader已經停止運作」錯誤; 1.錯誤訊息如下,解決方法即將Adobe Reader X移除後再安裝(Adobe Reader X)一次後,即可以正常操作不再出現錯誤。 使用w...
-
前言:列印簡報要雙面都印每頁2張投影片設定 方法如下; 1.使用Powerpoint 2010,點選,檔案/列印 ; 2.將單面列印改為雙面列印,按一下[印接機內容] ; 3.按一下,/排版/,頁籤,將多張合一,改為 "2合1",按一下,[確定]...
-
前言:桌上型電腦鍵盤右邊的數字鍵可以方便輸入數字,為何會變成上下左右鍵呢?其實是有一個數字鍵[Num Lock]被關閉了,如圖你可以去按一下[Num Lock]燈亮時為數字鍵,關閉燈時為上下左右方向鍵。 延伸閱讀: 使用word開啟網頁資料,可以將網頁下載存成WORD檔...
-
前言:結束 Word 時，可能會出現提示要求您一定要將變更儲存至共用範本 Normal.dot 中。首先，您可以關閉提示，而 Word 將會自動儲存變更，但可能還是會發生問題。第二，您的 Normal.dot 範本可能會受到巨集病毒的感染。如果要解決這個問題，您必須在電腦上安...
-
前言:有一些EXCEL檔內容不多可是檔案大小確是很大一個的解決方法,或者你在網頁上去複製貼上一個有網頁程式的網頁而要刪除,方法如下; 1. 如下為網頁上去複製貼上一個有網頁程式的網頁貼上後內容有一堆程式物件 ; 2.點選「功能區」的常用,編輯/尋找與選取/到 ; 3...
-
IMT-瑛茂電子股份有限公司下載 http://www.inmax.com.tw/ 司內網頁下載 http://nts1191.ceci.com.tw/Intranet/IntranetSetup.htm CR0530智慧卡讀卡機驅動程式 資料來源:兆豐國際商業銀行 微亮電...
-
前言:通常寄出去的mail是沒有辦法回收的,可是如果收件者是公司的同事而且系統是microsoft outlook就可以回收，方法如下; 1. 在寄件備份區,去開啟你要回收的郵件 ; 2.按"檔案",按一下[重傳或回收▼]，選取「回收此郵件」 ; ...
-
前言:當試算表原版(自己作的)資料不想被任意人開啟後修改,可以設定一個密碼才可以打開為正本,而不是原作者開啟時都要以複本文件打開,如此不會改到原版資料,當然你忘記密碼時...那就會掉眼淚了; 1.將已建立好的檔案另存新檔 ; 2.按一下,[工具▼],[一般選項] 3....
-
軟體:7-Zip 說明:使用個人7zip檔案壓縮及解壓縮的習慣都是在檔案總管中進行,壓縮檔案時只要按住ctrl複選檔案後按滑鼠右鍵選7zip壓縮;解壓縮時就按滑鼠右鍵選7zip解壓縮到資料夾,這樣壓縮檔檔案內容就會被解壓縮到與檔案名稱同名的資料夾中; 下載: http:/...
-
前言:有些日期資料在EXCEL儲存格中「93.03.09」,此時如果要將他分開成3個欄位這時可以使用Notepad將「.」改為TAB後再貼回去EXCEL即可; 1.選取,尋找/取代,搜尋模式改為●增強模式,尋找目標為「‧」,取代成「\t」,按一下.[全部取代] ; 2...
