作者deron08w (deron08w)
看板Visual_Basic
標題[VBA ] 新手學習VBA問題
時間Tue Nov 15 00:02:10 2016
我的程式碼打這樣
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://webptt.com/m.aspx?n=bbs/Visual_Basic/M.1479139333.A.1E3.html
1F:推 manforwan: 你類別沒寫,或每注冊,或沒設定引用 11/15 18:05
2F:推 unfinish: 那段程式碼你應該是寫在表單(userform)裡面吧 如果只有 11/18 14:33
3F:→ unfinish: 單一表單會用到 那在最前面加個private就行了 如果有很 11/18 14:33
4F:→ unfinish: 多表單都會用到 那你要新增模組定義類別才能共用 11/18 14:34
5F:→ waiter337: Public Stock As StockData 放在end type 後面看看 12/07 03:26