返回列表 上一主題 發帖

有3個問題

有3個問題

第1   我見人寫IF時都有END IF  但我不寫END IF  都冇出錯,那END IF  有什麼用?
第2  可以用VBA  開不信任的EXCEL時用AUTO_OPEN 的VBA嗎?
第3  使用者自訂數這樣寫錯了什麼?
請大大指導指導.

hyh.JPG (57.5 KB)

hyh.JPG

50 字節以內
不支持自定義 Discuz! 代碼

第1   我見人寫IF時都有END IF  但我不寫END IF  都冇出錯,那END IF  有什麼用?
第2  可以用VBA  開不信任 ...
basarasy 發表於 2010-7-22 19:54



    回你一,三

一, 如果判斷條件下的包括的只有一句, 就不用end if

if a=b then c=1
d=1

當a等於b 的時候 c=1 會運行 d=1會運行
當a不等於b 的時候 c=1 不會運行但 d=1會運行

三,你是想在工作頁用這個function? 把這段放在module上就可
Public Function myDate(n As Variant) As Long
Application.Volatile
myDate = Range("A2").Value * n
End Function
懂得發問,答案就會在其中

今日の一秒は  明日にない
http://kimbalko-chi.blogspot.com
http://kimbalko.blogspot.com

TOP

回復 2# kimbal

謝謝kimbal大大.
50 字節以內
不支持自定義 Discuz! 代碼

TOP

回復 1# basarasy

另外是有關第2個問題, 可以參考一下這裡
    http://office.microsoft.com/zh-t ... 031999.aspx?redir=0
懂得發問,答案就會在其中

今日の一秒は  明日にない
http://kimbalko-chi.blogspot.com
http://kimbalko.blogspot.com

TOP

回復 4# kimbal


    這個我知道.
3的問題  我放在module都不能用.

vba.rar (11.83 KB)

50 字節以內
不支持自定義 Discuz! 代碼

TOP

Function BSS(n As Integer) As Long
不是lnteger
學海無涯_不恥下問

TOP

回復 6# Hsieh
Function myDate(n As Integer) As Long
Application.Volatile
myDate = Range("A2").Value * n
End Function
這個我是看書的.
為什麼不可以用Integer??
50 字節以內
不支持自定義 Discuz! 代碼

TOP

回復 7# basarasy


    是你輸入錯了,是 i 的大寫
不是L的小寫
學海無涯_不恥下問

TOP

回復 8# Hsieh
謝謝大大的提點.
請問 入 Integer的地方有冇 1個多用途的字?
50 字節以內
不支持自定義 Discuz! 代碼

TOP

回復 9# basarasy


    怎樣較多用途?
他是資料型態
就是宣告該變數的資料型態
請參考VBA說明
Integer 變數係以範圍為 -32,768 到 32,767 之 16 位元 (2 個位元組) 數字的形式儲存。Integer 的型態宣告字元是百分比符號(%)。
學海無涯_不恥下問

TOP

        靜思自在 : 欣賞別人就是莊嚴自己。
返回列表 上一主題