作者yimean (溫柔殺手)
看板Office
標題[算表] VBA 請問Sub/Function傳值上限
時間Sun Nov 4 19:08:36 2018
軟體:Excel
版本:2013
各位版大晚安。
小弟寫了一個Sub(A as integer, B as integer)
呼叫的時候就是會錯,錯誤訊息是語法不正確,此時我只要將B刪掉,就可以了。
我在想說,Sub傳入的參數會有上限嗎?
Sub ImportPDF(item_number As Integer, sequency As Integer)
' 插入PDF調整
Dim PDF As Object
Dim PDFfilename As String
PDFfilename = item_number & ".pdf"
real_locate_row = (sequency - 1) * 36 + 1
Set PDF = ActiveSheet.OLEObjects.Add(Filename:=PDFfilename, Link:=False,
DisplayAsIcon:=False)
With PDF
.Top = ActiveSheet.Cells(real_locate_row, 2).Top
.Left = ActiveSheet.Cells(real_locate_row, 2).Left
.Width = 100
.Height = 200
End With
Set PDF=Nothing
End Sub
這個是程式碼,太詭異了。
請高手大大指導一下,感恩。
--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 123.195.98.141
※ 文章網址: https://www.ptt.cc/bbs/Office/M.1541329719.A.435.html
→ soyoso: 測試該兩變數傳值1,是無出現錯誤 11/04 19:20
→ yimean: 這真是太神奇了捷克 11/04 19:39
→ yimean: 我剛剛試著把括號拿掉,竟然就可以了@.@ 11/04 19:44
→ yimean: 這...我之前一個變數的都有加括號,所以我不疑有他。 11/04 19:45
→ newacc: 我也曾經出現過類似的bug,後來就把習慣改成通通不加括號 11/04 20:02
→ newacc: ,除非執行時跳錯誤,再把括號加上去 11/04 20:02
→ yimean: 請問兩位高手大大,這個有解嗎? 11/04 20:04
→ soyoso: 出現連結內錯誤1004無法插入物件方面,是否同excel檔案子 11/04 20:16
→ soyoso: 目錄內無該檔案(未指定路徑下),或指定路徑和完整檔名上不 11/04 20:18
→ soyoso: 案內無test1.pdf的檔案,則出現同原po回文連結內的錯誤 11/04 20:19
→ soyoso: 另外要加括號方面的話,前面就加上call importpdf(..,..) 11/04 20:21
→ yimean: @Soyoso & @newacc 感謝指導,獲益良多。 11/04 20:31