编译错误缺少
❶ 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