請問VBA 編譯時出現Sub未定義，我要如何解…

MaverickRay

程序如下：
Option Explicit
Sub 批次新增工作表()
Dim i , x
For i = 2 To Sheets(1).Range("A2").End(xlDown).Row '讓i=A欄類股名稱裡(有含資料的連續列的部份)之所有列數
    x = Sheets(1).Cells(i, "A")  '令變數x=由左邊數來的第一個工作表內的儲存格(第i列,A欄)
    Sheets.Add after:=Sheets(Sheets.Count)
    Sheets(Sheets.Count).Name = x
Next
Sheet(1).Select
End Sub

===============
結果一執行編譯，問題就卡在第一列sub 批次新增工作表(),說我未定義...我要如何定義？
先前不管是用錄製的或手動插入模組時都沒出現這問題,今天上網學習，參照他人成功的範例照打就卡在第一列了...哦MG




我受夠卡關了啊...同時也受夠微軟的官方亂翻譯了啦...

  ┴┴︵ ╰(‵□′)╯ ︵┴┴  

wcshk

我有看到你剛剛在FB的發文XD
試試看把最後一行的Sheet(1).Select改成Sheets(1).Select

MaverickRay

wcshk 發表於 18-11-17 22:28
我有看到你剛剛在FB的發文XD
試試看把最後一行的Sheet(1).Select改成Sheets(1).Select ...

都忘了有在這裡發問了，現在回頭看，應該是你講的最後一段陳述式裡漏了小s 跟蔡康永了~~
VBA好麻煩，久沒出問題就算了，一出問題就又頭大了~~~
現在正在研究如何看他內部的物件與使用方法跟屬性，不過都找不到好的地方有詳細介紹的..~~~
也煩請有知情的大大能大略告知囉...謝謝啦~~