[VBA ] 關於執行階段錯誤"438"

看板Visual_Basic作者 (完備性)時間15年前 (2009/12/14 14:41), 編輯推噓0(0推 0噓 1→)
留言1則, 1人參與, 最新討論串1/2 (看更多)
我的程式碼如下 Const pi = 3.1415926 Public Sub WriteTest() Dim x As Double Dim ans As Double x = Worksheets("Sheet1").Cellls(2, 2).Value ans = NorPdf(x) Worksheets("Sheet1").Cells(2, 3).Value = ans End Sub Public Function NorPdf(d As Double) As Double Dim ans As Double ans = Exp(-d * d / 2) / Sqr(2 * pi) NorPdf = ans End Function 當按執行時,卻產生執行階段錯誤"438" 查了很久 還是不知道錯在哪??? 不知道有人能不能幫幫小弟 謝謝 -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 114.36.208.119 ※ 編輯: boral 來自: 114.36.208.119 (12/14 22:41)
→
12/15 00:17, , 1F
Cellls(2,2),多了一個l
12/15 00:17, 1F
‣ 更多 boral 的文章
文章代碼(AID): #1B9awU1l (Visual_Basic)
‣ 更多 boral 的文章
文章代碼(AID): #1B9awU1l (Visual_Basic)