返回列表 上一主題 發帖

如何在自訂函數裡 輸入PI值

jsj702985

帖子
3 
主題
1 
精華
0 
積分
4 
點名
0  
作業系統
win7 
軟體版本
2007 
閱讀權限
10 
註冊時間
2015-3-6 
最後登錄
2016-11-10 
1# 跳轉到 » 倒序看帖
打印
tT
發表於 2015-3-6 20:17 | 只看該作者

如何在自訂函數裡 輸入PI值

請問各位大大
小弟要 自訂函數 但是程式寫出來 運算不出來 麻煩各位大大幫忙解答
Function PP(II)
P1 = II * PI <-----這樣寫電腦不接受 寫PI()也不接受
P2 = P1 / 180
PP = P2
End Function
收藏 分享

bobomi

帖子
181 
主題
5 
精華
0 
積分
197 
點名
0  
作業系統
XP 
軟體版本
2000 
閱讀權限
20 
性別
女 
註冊時間
2014-3-9 
最後登錄
2024-4-29 
2#
發表於 2015-3-6 20:20 | 只看該作者
Function PP(II)
Pi = 3.1415926
P1 = II * Pi
P2 = P1 / 180
PP = P2
End Function

TOP

jsj702985

帖子
3 
主題
1 
精華
0 
積分
4 
點名
0  
作業系統
win7 
軟體版本
2007 
閱讀權限
10 
註冊時間
2015-3-6 
最後登錄
2016-11-10 
3#
發表於 2015-3-6 22:09 | 只看該作者
小弟也是暫時直接寫3.1415926代替
但想知道以前的版本可以 到2007就不行的原因

TOP

bobomi

帖子
181 
主題
5 
精華
0 
積分
197 
點名
0  
作業系統
XP 
軟體版本
2000 
閱讀權限
20 
性別
女 
註冊時間
2014-3-9 
最後登錄
2024-4-29 
4#
發表於 2015-3-6 23:30 | 只看該作者
回復 3# jsj702985


不然你用這個也可以取到值   pi =  WorksheetFunction.Pi


Function PP(II)
P1 = II * Application.WorksheetFunction.Pi
P2 = P1 / 180
PP = P2
End Function

TOP

jsj702985

帖子
3 
主題
1 
精華
0 
積分
4 
點名
0  
作業系統
win7 
軟體版本
2007 
閱讀權限
10 
註冊時間
2015-3-6 
最後登錄
2016-11-10 
5#
發表於 2015-3-11 17:12 | 只看該作者
謝謝 bobomi  大大
小弟試出來了

TOP

        靜思自在 : 能付出愛心就是福，能消除煩惱就是慧。
返回列表 上一主題