看板 Visual_Basic 關於我們 聯絡資訊
我的程式碼打這樣 Type StockData StockCode As Long StockName As String Address As String TEL As String End Type Sub 輸入股票基本資料() Dim Stock As StockData Dim LastRow As Integer LastRow = Range("A65536").End(xlUp).Row Stock.StockCode = InputBox("請輸入股票代號") Stock.StockName = InputBox("請輸入股票名稱") Stock.Address = InputBox("請輸入公司地址") Stock.TEL = InputBox("請輸入公司電話") Cells(LastRow + 1, 1) = Stock.StockCode Cells(LastRow + 1, 2) = Stock.StockName Cells(LastRow + 1, 3) = Stock.Address Cells(LastRow + 1, 4) = Stock.TEL End Sub 但執行的時候出現: 編譯錯誤;無法在物件模組中定義公用(public)的使用者定義型態 我使用的教學光碟上面也是這樣打卻可以執行,拜託各位大大可以解決我的疑惑 謝謝各位!!!! -- ※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 123.193.193.138 ※ 文章網址: https://www.ptt.cc/bbs/Visual_Basic/M.1479139333.A.1E3.html
manforwan: 你類別沒寫,或每注冊,或沒設定引用 11/15 18:05
unfinish: 那段程式碼你應該是寫在表單(userform)裡面吧 如果只有 11/18 14:33
unfinish: 單一表單會用到 那在最前面加個private就行了 如果有很 11/18 14:33
unfinish: 多表單都會用到 那你要新增模組定義類別才能共用 11/18 14:34
waiter337: Public Stock As StockData 放在end type 後面看看 12/07 03:26