看板 Office 關於我們 聯絡資訊
軟體: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
soyoso: https://i.imgur.com/7O6mlSS.jpg 11/04 19:20
yimean: 這真是太神奇了捷克 11/04 19:39
yimean: https://imgur.com/cfLfBW4 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: https://imgur.com/uXZHoDO 11/04 20:02
yimean: https://imgur.com/63gfVlH 11/04 20:03
newacc: stackoverflow網友給我的回饋 http://bit.ly/2AJYxaO 11/04 20:03
yimean: 請問兩位高手大大,這個有解嗎? 11/04 20:04
soyoso: 出現連結內錯誤1004無法插入物件方面,是否同excel檔案子 11/04 20:16
soyoso: 目錄內無該檔案(未指定路徑下),或指定路徑和完整檔名上不 11/04 20:18
soyoso: 確呢?https://i.imgur.com/fVVHF4H.jpg 測試如同excel檔 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