VBA vba與運算子

2021-08-31 09:47:21 字數 1696 閱讀 1969

宣告:筆記**於我要自學網-《excel vba基礎教程》-授課講師:曾賢志

定義:運算子是代表vba某種運算功能的符號

賦值運算子:=

數**算符:&(字元連線符)、+(加)、-(減)、mod(取餘)、\(整除)、*(乘)、/(除)、-(負號)、^(指數)

邏輯運算子:not(非)、and(與)、or(或)、xor(異域)、eqv(相等)、imp(隱含)

關係運算子:=(相同)、<>(不等於)、>(大於)、=(大於等於)、<=(小於等於)、like(比較字串是否相同)

例項演示:

sub a1()

a = "admin" like "admin" '區分大小寫

end sub

sub a2()

b = "abc" like "a?c" '萬用字元運用

b2 = "abc" like "???"

end sub

sub a3()

c = "excel函式" like "*函*"

end sub

sub a4()

d = 88 like "##"

end sub

sub a5()

e = "a" like "[a-z]"

f = 8 like "[!1-7]"

g = 8 like "[1-4,6-9]"

end sub

like運算子運用

sub aa()

for j = 2 to 6

for i = 2 to 14

if cells(i, "a") like cells(j, "e") then n = n + 1

next

range("f" & j) = n

n = 0

next

end sub

綜合運用(盤點清單核對)

sub 盤點清單()

dim rng as range, rngs as range, k%, a, b

for each rng in [a2:a6]

a = rng.value

for each rngs in [b2:b4]

b = rngs.value

if rng = rngs then

goto 100

end if

next rngs

k = k + 1

cells(k + 1, "c") = rng

100:

next rng

end sub

NOT運算子與 運算子

6.4.2 not運算子與 運算子 對於簡單的條件查詢,not運算子與 運算子的功能幾乎沒有什麼區別,那麼not運算子的優勢體現在 呢?答案是它可以與其他運算子組合使用,這一點是 運算子所不能實現的。在6.4.1節已經介紹了not運算子與in運算子組合使用的例子,下面給出乙個not運算子與betwe...

C語言 運算子與 運算子

我們平時使用帶參巨集時,字串中的巨集引數是沒有被替換的。例如 輸出結果為 然而,我們期望輸出的結果是 5 20 2513 14 27 這該怎麼做呢?其實,c語言允許在字串中包含巨集引數。在類函式巨集 帶參巨集 中,號作為乙個預處理運算子,可以把記號轉換成字串。例如,如果a是乙個巨集形參,那麼 a就是...

(運算子) 運算子

運算子既可作為一元運算子也可作為二元運算子。備註 unsafe context data guid 00bf87717d88a9fac1afadb796c675da 一元 運算子返回運算元的位址 要求 unsafe 上下文 bool data guid 9efd189df2cfb88799dca08...