12
返回列表 上一主題 發帖

[發問] VBA不給用工作表函數ABS絕對值功能嗎?

VBALearner

帖子
102 
主題
14 
精華
0 
積分
142 
點名
0  
作業系統
Win10 
軟體版本
Office2016 
閱讀權限
20 
性別
男 
註冊時間
2016-7-31 
最後登錄
2020-3-21 

論壇贊助勳章
1# 跳轉到 » 倒序看帖
打印
tT
發表於 2016-8-7 17:33 | 只看該作者

[發問] VBA不給用工作表函數ABS絕對值功能嗎?

請教一下各位高手
  1. a = -0.543
  2. msgbox application.worksheetfunction.abs(a)
複製代碼
ABS絕對值函數在工作表上面使用是可行，但移到VBA程式碼裡面就不能用嗎?
各位高手在VBA裡面要使用ABS絕對值得功能時，難道只能打...
  1. if a < 0 then a = -a
複製代碼
了嗎O___Q?!
雖然也不是不行啦.....
收藏 分享

VBALearner

帖子
102 
主題
14 
精華
0 
積分
142 
點名
0  
作業系統
Win10 
軟體版本
Office2016 
閱讀權限
20 
性別
男 
註冊時間
2016-7-31 
最後登錄
2020-3-21 

論壇贊助勳章
2#
發表於 2016-8-7 17:53 | 只看該作者
回復 1# VBALearner

但是用evaluate就可以...?! 到底差在哪裡呢...=口="
  1. a = -0.543
  2. Msgbox Application.evaluate(ABS(a))
複製代碼

TOP

c_c_lai

帖子
2035 
主題
24 
精華
0 
積分
2031 
點名
0  
作業系統
Win7 
軟體版本
Office2010 
閱讀權限
100 
性別
男 
註冊時間
2012-3-22 
最後登錄
2024-2-1 
3#
發表於 2016-8-7 18:03 | 只看該作者
回復 1# VBALearner
MsgBox Abs(a)

TOP

lpk187

帖子
552 
主題
3 
精華
0 
積分
578 
點名
0  
作業系統
win7 
軟體版本
office 2010 
閱讀權限
50 
性別
男 
註冊時間
2015-2-8 
最後登錄
2024-7-9 

2016猴年全勤獎章2015羊年全勤獎章熱烈參與勳章
4#
發表於 2016-8-7 18:16 | 只看該作者
回復 2# VBALearner


    Abs()是屬於Visual Basic函數，直接引用就可以了
Dim MyNumber
MyNumber = Abs(50.3)    ' 傳回 50.3。
MyNumber = Abs(-50.3)    ' 傳回 50.3。

TOP

VBALearner

帖子
102 
主題
14 
精華
0 
積分
142 
點名
0  
作業系統
Win10 
軟體版本
Office2016 
閱讀權限
20 
性別
男 
註冊時間
2016-7-31 
最後登錄
2020-3-21 

論壇贊助勳章
5#
發表於 2016-8-7 22:38 | 只看該作者
回復 4# lpk187

喔喔知道了感謝您!
順便問一下喔 要如何知道函數是不是Visual Basic的內建函數阿?

TOP

VBALearner

帖子
102 
主題
14 
精華
0 
積分
142 
點名
0  
作業系統
Win10 
軟體版本
Office2016 
閱讀權限
20 
性別
男 
註冊時間
2016-7-31 
最後登錄
2020-3-21 

論壇贊助勳章
6#
發表於 2016-8-7 22:39 | 只看該作者
回復 3# c_c_lai

喔喔可以了感謝!
可以順便問一下您有關於 [ ] 的用法嗎T___T?
實在是有點難懂中括弧的用法......

TOP

lpk187

帖子
552 
主題
3 
精華
0 
積分
578 
點名
0  
作業系統
win7 
軟體版本
office 2010 
閱讀權限
50 
性別
男 
註冊時間
2015-2-8 
最後登錄
2024-7-9 

2016猴年全勤獎章2015羊年全勤獎章熱烈參與勳章
7#
發表於 2016-8-8 00:18 | 只看該作者
本帖最後由 lpk187 於 2016-8-8 00:20 編輯

回復 5# VBALearner


    在VBE在中使用"列出屬性或方法"
當你鍵入Application.WorksheetFunction.時所顯示出的下拉式選單所列出的都是工作表函數。如下圖：

而VB的內鍵函數就直接輸入即可，如下圖：反白部份，很像綠色橡皮擦圖示就是VBA內鍵函數


在 VBE說明中，搜尋 "Visual Basic 中可用的工作表函數清單"，可獲取其清單

當瞭解工作函數後，且工作表函數在VBA輸入時，是可以簡化其語句，
如Application.WorksheetFunction.CountA()可簡化成Application.CountA()或WorksheetFunction.CountA()

TOP

VBALearner

帖子
102 
主題
14 
精華
0 
積分
142 
點名
0  
作業系統
Win10 
軟體版本
Office2016 
閱讀權限
20 
性別
男 
註冊時間
2016-7-31 
最後登錄
2020-3-21 

論壇贊助勳章
8#
發表於 2016-8-8 00:23 | 只看該作者
回復 7# lpk187

喔喔哇懂了!感謝您詳細的回答!!!

TOP

Scott090

帖子
519 
主題
54 
精華
0 
積分
595 
點名
257  
作業系統
win 10 
軟體版本
[] 
閱讀權限
50 
性別
男 
註冊時間
2013-3-19 
最後登錄
2024-11-24 

2023年全勤獎章2022虎年全勤獎章2021牛年全勤獎章2020鼠年全勤獎章2019 豬年全勤獎章2018 狗年全勤獎章2017 雞年全勤獎章2016猴年全勤獎章論壇榮譽勳章論壇贊助勳章2015羊年全勤獎章
9#
發表於 2016-8-10 07:22 | 只看該作者
回復 6# VBALearner


    VBA內 中括號 [ ] 相當於 Range  值
           
               '單一cell 值:
                   a= cells(1,"A")
                   a = [A1]
              '一個陣列 1x2 的值
                   b= range("A1:B1")
                   b = [A1:B1]
            '一個陣列 3x3 的值
                  c = range("A1:C3")
                  c = [A1:C3]

TOP

GBKEE

帖子
5923 
主題
13 
精華
1 
積分
5986 
點名
0  
作業系統
win10 
軟體版本
Office 2010 
閱讀權限
150 
性別
男 
來自
台灣基隆 
註冊時間
2010-5-1 
最後登錄
2022-1-23 

2017 雞年全勤獎章2016猴年全勤獎章2015羊年全勤獎章2014馬年全勤獎章2013蛇年全勤獎章2012龍年全勤獎章論壇貢獻勳章熱烈參與勳章2011兔年全勤獎章
10#
發表於 2016-8-10 07:52 | 只看該作者
回復 9# Scott090

VBA內 中括號 [ ]  指活頁簿的[名稱,物件,範圍,函數的計算],不可是VBA內的變數
感恩的心......(在麻辣家族討論區.用心學習會有進步的)
但資源無限,後援有限,  一天1元的贊助,人人有能力.

TOP

        靜思自在 : 忘功不忘過，忘怨不忘恩。
12
返回列表 上一主題