[VBA ] 新手學習VBA問題

作者: deron08w (deron08w)   2016-11-15 00:02:10
我的程式碼打這樣
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)的使用者定義型態
我使用的教學光碟上面也是這樣打卻可以執行,拜託各位大大可以解決我的疑惑
謝謝各位!!!!
作者: manforwan (QQ)   2016-11-15 18:05:00
你類別沒寫,或每注冊,或沒設定引用
作者: unfinish (百年孤寂)   2016-11-18 14:33:00
那段程式碼你應該是寫在表單(userform)裡面吧 如果只有單一表單會用到 那在最前面加個private就行了 如果有很多表單都會用到 那你要新增模組定義類別才能共用
作者: waiter337 (給開司一罐蘇格登)   2016-12-07 03:26:00
Public Stock As StockData 放在end type 後面看看

Links booklink

Contact Us: admin [ a t ] ucptt.com