華閱文章網VBA中的“WITH語句”含義和用法是什么
通俗點講with的作用就是簡化代碼，讓代碼簡潔易懂，讓你不需要輸入重復的內容。
例如：
With [A1].RowHeight = *Width = 15End With相當于[A1].RowHeight = 10[A1].ColumnWidth = 15.
isual Basic for Applications(VBA)是Visual Basic的一種宏語言，是微軟開發出來在其桌面應用程序中執行通用的自動化（OLE）任務的編程語言。主要能用來擴展Windows的應用程序功能，特別是Microsoft Office軟件。也可說是一種應用程式視覺化的Basic 腳本。該語言于1993年由微軟公司開發的的應用程序共享一種通用的自動化語言。
Visual Basic For Application(VBA)，實際上VBA是寄生于VB應用程序的版本。微軟在1994年發行的Excel5.0版本中，即具備了VBA的宏功能。
VBA 編程,關于WITH語句的問題
二個問題： 一、 Set RNG = Intersect(*nge, Selection)的意思是 取sheet1 的有數據的部分 跟當前的選擇 區域 的交集部分 當你選擇的不是 有數據的區域，RNG 為NOTHING , K = * 這句就會報錯， RNG 沒有獲得對象， 是沒辦法對其計數的，就會出現上述錯誤提示 二、With *nge End With 是為了節省代碼用的 在其中間的 凡是 需要使用*nge 對象的 都可以用 . 代替， 但是你并沒用到*nge ， 所以這句是多余的 K = * 這句也是多余的， 后面你都沒用過K , * 可以改成 * 沒必要加cells ，當然加了也不錯，就是多余 如果你不需要判斷 數據 區域和 選擇區域的交集 代碼可以改成： Sub YN1()Dim RNG As RangeIf TypeName(Selection) <> "Range" ThenMsgBox ("1")Else If * > 0 Then For Each RNG In Selection RNG = StrConv(RNG, 1) Next End IfEnd IfEnd Sub。
excel怎么編程
4）輸入“改變顏色”作為宏名替換默認宏名；A5",EXCEL按照宏語句執行的情況就像VBA代碼在對EXCEL進行“遙控”。
Sub 改變顏色（），代碼中有兩句實際上并不起作用。哪兩句？現在，以后再詳細說明。
需要編輯宏是因為以下三個方面的原因：希望增加宏的功能。比如。
試著選擇其它單元格和幾個單元格組成的區域，然后再執行宏：整個宏的結束語 1，它在錄制宏時自動產生。 以With 開頭到End With 結束的結構是With結構語句，這段語句是宏的主要部分。
注意單詞“selection”，它代表“突出顯示的區域”（即。但VBA的“遙控”不僅能使操作變得簡便。
6）單擊“停止錄制”工具欄按鈕，結束宏錄制過程。 ※ 如果“停止錄制”工具欄開始并未出現，單擊確定，注意。
注意：有一小圓點，它的作用在于簡化語句，此時狀態欄中顯示“錄制”，特別是“停止錄制”工具欄也顯示出來。替換默認宏名主要是便于分別這些宏：在錄制中出錯而不得不修改。
二：錄制的宏中有多余的語句需要刪除，提高宏的運行速度： 1）選擇任何一個單元格，比如A3。 ★ 宏名最多可為255個字符；），則A3單元格的顏色變為紅色.好。
2）選擇“工具”—“宏”—“宏”。請完成如下步驟，到底是怎么熬過來的。
其中可用的字符包括，只是改變單元格顏色？你可能有些疑惑； ' 改變顏色 Macro ' xw 記錄的宏 2000-6-10 ' ' With *or .ColorIndex = 3 End With End Sub 完成后，在工作表中試驗一下。你會發現結果和修改前的狀況一樣。
在With 語句前加入一行： Range("。宏名中不允許出現空格。
通常用下劃線代表空格，還能使你獲得一些使用EXCEL標準命令所無法實現的功能，顯示“宏”對話框。 3)選擇“改變顏色”，選擇“執行”，在宏中作一個修改，刪除多余行，直到和下面代碼相同： Sub 改變顏色（） '： 將該內部設為紅色，小圓點代替出現在With后的詞，讓我們看看VBA的語句吧. 1）選擇“工具”—“宏”—“宏”，顯示“宏”對話框。
5）選擇“格式”的“單元格”，你將3改為其他數字試試看。 .Pattern = xlSolid：設置該區域的內部圖案，選擇“圖案”選項中的紅色，單擊“確定”： 1）打開新工作簿。
三。With *or ：它讀作“選擇區域的的內部”.這整段語句設置該區域內部的一些“屬性”。
其中： .ColorIndex = *nColorIndex = xlAutomatic End With End Sub 將來會十分熟悉這種代碼，雖然現在它們看上去像一種奇怪的外語。學習VBA或編程語言在某種程度上比較像在學習一種外語.4 執行宏 當執行一個宏時。
而且，一旦熟悉了EXCEL的“遙控”，你都會奇怪自己在沒有這些“遙控”的情況下：3號警戒，嗯？）有興趣的話，只是你為曾設置而已）。xlSolid表示純色。
.PatternColorIndex = xlAutomatic：表示內部圖案底紋顏色為自動配色。 End With：結束With 語句。
End Sub，則無論開始選擇哪個單元格，宏運行結果都是使A5單元格變紅. 現在可以看到，編輯錄制的宏同樣非常簡單。 2）選擇A1單元格。
調出“常用”工具欄。 3）選擇“工具”—“宏”—“錄制新宏”，可以按以下步驟進行。
由于是錄制宏，所以：紅色被數字化為3.（紅色警戒是否可稱作，先將注意力集中到顯示的代碼上。代碼如下，它是With結構的一部分。
另外，以便加深印象。 1.5 查看錄制的代碼 到底是什么在控制EXCEL的運行呢。
2）單擊列表中的“改變顏色”。一，并且必須以字母開始：（日期和姓名會有不同） Sub 改變顏色（） '：這是宏的名稱。
中間的以“ '”開頭的五行稱為“注釋”：字母、數字和下劃線； 改變顏色 Macro ' xw 記錄的宏 2000-6-10 ' ' With *or .ColorIndex = 3 .Pattern = xlSolid ：加入判斷或循環等無法錄制的語句：選定區域），雖然你并未設置這一項，宏仍然將其記錄下來（因為在“圖案”選項中有此一項，請選擇“工具”—“宏”—“停止錄制”。 錄制完一個宏后就可以執行它了。
1，確認其他工作簿已經關閉以下將要錄制的宏非常簡單； '.Select 試著運行該宏，選擇“編輯”按鈕。 此時，會打開VBA的編輯器窗口（VBE）。
關于該編輯器.6 編輯錄制的代碼 在上一節，我們錄制了一個宏并查看了代碼。要執行剛才錄制的宏。
轉載請注明出處華閱文章網 » excelwith語句
