編譯錯誤缺少
❶ Excel 宏編譯錯誤，缺少:=
Sub PrintAllSheet()
Dim a As New Excel.Application
a.ActiveWorkbook.PrintOut()
End Sub
改改：
Sub PrintAllSheet()
Dim a As New Workbook
Set a = ActiveWorkbook
a.PrintOut copies:=1
End Sub
❷ 編譯錯誤 缺少End Sub 怎麼解決
Private Sub Worksheet_Change(ByVal Target As Range)是一個『表格點選位置改變觸發的事件過程』，不需要再增加『Sub 按名稱篩選片段圖片()』也不需要寫在模塊中，Sheet("引用")應寫作Sheets("引用")其他類似，沒有你的表格，無法測試。
❸ VB編譯錯誤 缺少語句結束怎麼辦
1.缺少declare,正確的描述如下
private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
2 declare的說明
Declare 語句
用於在模塊級別中聲明對動態鏈接庫 (DLL) 中外部過程的引用。
語法 1
[Public | Private] DeclareSubnameLib"libname" [Alias"aliasname"] [([arglist])]
語法 2
[Public | Private] DeclareFunctionnameLib"libname" [Alias"aliasname"] [([arglist])] [Astype]
Declare 語句的語法包含下面部分：
部分 描述
Public 可選的。用於聲明對所有模塊中的所有其它過程都可以使用的過程。
Private 可選的。用於聲明只能在包含該聲明的模塊中使用的過程。
Sub 可選的（但Sub 或 Function 二者需選其一）。表示該過程沒有返回值。
Function 可選的（但Sub 或 Function 二者需選其一）。表示該過程會返回一個可用於表達式的值。
name 必需的。任何合法的過程名。注意動態鏈接庫的入口處（entry points）區分大小寫。
Lib 必需的。指明包含所聲明過程的動態鏈接庫或代碼資源。所有聲明都需要Lib 子句。
libname 必需的。包含所聲明的過程動態鏈接庫名或代碼資源名。
Alias 可選的。表示將被調用的過程在動態鏈接庫 (DLL)
中還有另外的名稱。當外部過程名與某個關鍵字重名時，就可以使用這個參數。當動態鏈接庫的過程與同一范圍內的公用變數、常數或任何其它過程的名稱相同時，也可以使用
Alias。如果該動態鏈接庫過程中的某個字元不符合動態鏈接庫的命名約定時，也可以使用 Alias。
aliasname 可選的。動態鏈接庫或代碼資源中的過程名。如果首字元不是數字元號 (#)，則
aliasname 是動態鏈接庫中該過程的入口處的名稱。如果首字元是
(#)，則隨後的字元必須指定該過程的入口處的順序號。
arglist 可選的。代表調用該過程時需要傳遞的參數的變數表。
type 可選的。Function 過程返回值的數據類型；可以是 Byte、布爾、Integer、Long、Currency、Single、Double、Decimal（目前尚不支持）、Date、String（只支持變長）或 Variant，用戶定義類型，或對象類型。
arglist 參數的語法以及語法各個部分如下：
[Optional] [ByVal | ByRef] [ParamArray] varname[( )] [Astype]
❹ VB說編譯錯誤，缺少：語句結束。請問哪裡錯了
模糊的看到 應該是左邊引號後面 沒有加連接符號 用+ 或者&都可以 就不會出現這樣的錯誤了
❺ Excel VBA裡面提示編譯錯誤缺少end sub怎麼解決(最後一行有end sub)
解決方法：
1、在資源管理器中進入「C:\Documents
and
Settings\Administrator\Application
Data\Microsoft\Templates」目錄，刪除其中的「Normal.dot」公用模板文件（可能還有個隱藏的編輯中的文件，一並刪除），再重新啟動Word即可。
2、上述方法1如不行，可先完全卸載OFFICE2003，並刪除安裝文件夾及相關注冊表文件，重新安裝OFFCIE2003.
3、上述兩種方法如都不行，那就要重新安裝操作系統了
基本上採用以上第一個方式，問題圓滿解決。
❻ wps 編譯錯誤缺少標識符
文件格式不對。在wps文檔中如果輸入的文件格式不對，就會導致在編譯的過程中，生成全局唯一標識符文的時候出錯，提示「編譯錯誤缺少標識符」。解決辦法：從新將文件保存為uif-8bom格式，保證編譯文件格式統一即可。
❼ vb編譯錯誤：缺少變數或過程，不是模塊
編譯錯誤：
缺少變數或過程，不是模塊。
'這個是模塊中的代碼，（不在窗體的代碼區內，在一個模塊文件中）
Public
Sub
SEND_SERINFO(IP
As
String,
Text
As
String)
main.wsk1.RemoteHost
=
IP
main.wsk1.SendData
"SER_INFO
"
+
Text
End
Sub
'然後在窗體代碼模塊中調用
call
send_serinfo(ip,text)
然後進行調試
❽ 編譯錯誤：缺少：語句結束 語法錯誤
應該在&運算符的左右加上空格，為了能看到程序的運行結果，建議把第一行改為Private Sub Form_click()
❾ 編譯錯誤 缺少語句結束
'由於不知道題主的窗體是如何設計的，想執行什麼，大致猜測代碼要做如下修改：
PrivateSubCmdQC_Click()
Me.CLIENT="公司名"'COMPANYNAME
KHMC=Null
Me.CNZ=l"裝箱標識"'MARKNUMBERS
CNZBH=Null
Me.CONTAINER="集裝箱號碼"'NUMBER
GH=Null
Me.BOOKING="參考號碼"'REF
CH=Null
'這一句猜不出要表達啥？也許是啟程日期吧Me.VESSELDATE
YJCQ=Null
Me.VESSEL="船名"'NAME
CMC=Null
Me.HLZCT.Requery
EndSub
❿ VB運行時出現「編譯錯誤：缺少as"
出現「編譯錯誤：缺少as"的原因是你的語句「open f:\121.w for output as #1」中缺少了引號。應該是這樣的：
open "f:\121.w" for output as #1
因為VB中的冒號「:」用來分割兩個語句，這樣分割以後前面的語句就成了「open f」，是一個不完整的語句，就「缺少as」咯！
你上面的代碼修改後應該是：
Private Sub command1_click()
Dim s As Integer
s = 5
Close #1
Open "f:\121.w" For Output As #1
Print #1, s
Close #1
End Sub