C001 Excel VBA 自定義資料型別

2021-09-08 23:16:47 字數 1766 閱讀 4686

→使用者自定義資料型別需要使用type語句

type lianxiren

name

asstring

***

asstring

age

asinteger

phone

asstring

address

asstring

department

asstring

endtype

subaddresslist()

dim record as

lianxiren

record.name = "

alex

"record.*** = "

male

"record.age = 23

record.phone = "

18812345678

"record.address = "

blahblah

"record.department = "

blahblah

"msgbox

record.name

end sub

前面建立乙個自定義的資料型別,後面就可以引用

→ 系統常量指vba系統內部定義的常量,一般以vb為字首開頭。

例如:vbred,vbokonly等等~

→ object型資料表示物件的引用,其中儲存的內容是乙個物件的位址,對於乙個object型變數賦值時,不能直接採用複製語句,而應當利用set語句為其賦值

dim sheet as object

set sheet = worksheets("sheet1")

→ is 比較兩個object型變數應用的是否是同乙個變數,如果是同乙個變數,則返回true,否則為false。

→ like舉例(與word中的替換有點相似)

dim

mycheck

mycheck = "

abbba

" like "

a*a"

'返回 true。

mycheck = "

f" like "

[a-z]"'

返回 true。

mycheck = "

f" like "

[!a-z]"'

返回 false。

mycheck = "

a2a" like "

a#a"

'返回 true。

mycheck = "

am5b

" like "

a[l-p]#[!c-e]"'

返回 true。

mycheck = "

bat123khg

" like "

b?t*"'

返回 true。

mycheck = "

cat123khg

" like "

b?t*"'

返回 false。

→ 暫停語句,stop語句,語句會在stop位置停下,再按下執行可以繼續執行。。。分號也可以連線字串,而且會在數字左右加入空格

sub

stop1()

dim i as

integer

for i = 1to5

debug.print

"程式第

"; i; "

次暫停"

stop

next

end sub

Excel VBA 自定義資料型別及其它

使用者自定義資料型別需要使用type語句 type lianxiren name as string as string age as integer phone as string address as string department as string end type sub addres...

Excel VBA自定義函式 根據條件連線字串

做excel發現現有的函式功能不夠用,就自學了一下vba寫了第乙個新函式 根據條件連線字串 比如count 有countif 和countifs sum 有sumif 和sumifs 但是concatenate 卻沒有類似concatenateifs 的函式,於是自己寫了個替代品 寫的解釋比較面向初...

C 自定義控制項和自定義事件

今天在專案開發的過程中,因為好幾個頁面都要用到同乙個分類控制項,就想著把它做成乙個自定義控制項,然後隨託隨用。在網上找了些列子,自定義控制項的寫法不用多說,主要說一下,如何將控制項的事件,封裝到自己定義的控制項的自定義事件裡面。這裡同時也當作對自定義事件的乙個複習吧。首先控制項是乙個由treelis...