VBA中的WITH 語句用法 及含義
通俗點講with的作用就是簡化代碼,讓代碼簡潔易懂
讓你不需要輸入重復的內容
例如:
With [A1]
.RowHeight = 10
.ColumnWidth = 15
End With
相當于
[A1].RowHeight = 10
[A1].ColumnWidth = 15
省去了輸入很多[A1]
也就是說with中以 . 開頭的就相當于
WITH后的對象 .什么什么什么
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 vba with是什么意思
簡化代碼的,省略掉需要重復輸入的內容
比如要輸入
[A1].RowHeight = 10
[A1].ColumnWidth = 15
使用WITH語句后為
With [A1]
.RowHeight = 10
.ColumnWidth = 15
End With
這里[A1]只是舉例,這個可以很長,可以涉及很多行。使用WITH就能省時省力,代碼也看著簡練。
excel vba 有多少語句,分別是什么意思
VBA與VB一樣,Visual Basic 語句(75條)
AppActivate語句
Beep語句
Call語句
ChDir語句
ChDrive語句
Close語句
Const語句
Date語句
Declare語句
Deftype語句
DeleteSetting語句
Dim語句
Do。Loop語句
End語句
Enum語句
Erase語句
Error語句
Event語句
Exit語句
FileCopy語句
ForEach。Next語句
For。Next語句
Function語句
Get語句
GoSub。Return語句
GoTo語句
If。Then。Else語句
Implements語句
Input#語句
Kill語句
Let語句
LineInput#語句
Lock,Unlock語句
LSet語句
Mid語句
MkDir語句
Name語句
OnError語句
On。GoSub、On。GoTo語句
Open語句
OptionBase語句
OptionCompare語句
OptionExplicit語句
OptionPrivate語句
Print#語句
Private語句
PropertyGet語句
PropertyLet語句
PropertySet語句
Public語句
Put語句
RaiseEvent語句
Randomize語句
ReDim語句
Rem語句
Reset語句
Resume語句
RmDir語句
RSet語句
SaveSetting語句
Seek語句
SelectCase語句
SendKeys語句
Set語句
SetAttr語句
Static語句
Stop語句
Sub語句
Time語句
Type語句
While。Wend語句
Width#語句
With語句
Write#語句
轉載請注明出處華閱文章網 » excelvbawith語句