過程示例:
sub test()
debug.print "hello"
end sub
'//'
函式示例: 函式體最後通常都帶有一條返回值語句,把函式執行的結果賦值給"函式名",就可以在呼叫這個函式的地方通過等於號=得到這個函式的執行結果。這個返回結果的資料型別應該與函式名後面as的資料型別一致,否則可能會出錯。
function my_sum(n1 as integer, n2 as integer) as integer
dim s as integer
s = n1 + n2
my_sum = s
end function
'///'
函式可被過程(即巨集)呼叫: 函式的呼叫通常會在呼叫時把其賦值給乙個變數,以獲取函式返回值。
sub test()
dim s as integer
s = my_sum(5, 5)
debug.print s
end sub
function my_sum(n1 as integer, n2 as integer) as integer
dim s as integer
s
excel 函式筆記(用乙個記乙個)
判斷相等 用exact,返回true和false 兩個引數可以是單元格引用,也可以是字元 注意,字元只能用雙引號 如 exact f2,是 意思是判斷f2單元格的文字是不是 是 字。查詢字串 用find,比如單元格內字串為abcdefg if iserror find abc a1 0,1 判斷函式...
從乙個excel複製到另外乙個excel
excel.range m objrange null wbs.open source path,type.missing,type.missing,type.missing,type.missing,type.missing,type.missing,type.missing,type.missi...
DELPHI中控制EXCEL的乙個例子
unit unit1 inte ce uses windows,messages,sysutils,classes,graphics,controls,forms,dialogs,stdctrls,comobj type tform1 class tform button1 tbutton butt...