vba出现编译错误语法错误怎么办
㈠ excel vba代码问题，总是报语法错误，请问是什么原因
报错的那句修改如下：
ActiveWorkbook.Names.Add Name:=Cells(i, 1), RefersToR1C1:="=Sheet1!R" & i & "C2:R" & i & "C" & j
存在的问题：一是可能多行语句处理缺少空格，二是&不要和变量连接，三是字符串应当使用双引号。
㈡ excel VBA 编译错误 语法错误
请把单引号换成双引号（英文状态下的）试试
㈢ VBA 的语法错误，怎么纠正呢
sentence= Today is the" word1& "of December, in the year" & word2 (错误)
sentence= "Today is the" & word1 & "of December, in the year" & word2 (正确)
㈣ VBA语法错误 怎么办
红色字体部分，看着很别扭的，没有附件，只能去猜测一下：
如果cells(1,k)单元格的数据时单元格地址格式，那么可能是：
range(cells(1,k)).select
如果仅仅是针对单元cells(1,k),可能是：
cells(1,k).select
range(cells(1,k).address).select，这种用法画蛇添足了
以上建议供参考
㈤ VBA语法错误，求大神解答，谢谢
为什么要用中文的逗号、引号、括号呢，编程里面一律使用英文，我修改后能编译通过的代码如下：
Subsheets2one()
'定义对话框变量
DimccAsFileDialog
Setcc=Application.FileDialog(msoFileDialogFilePicker)
DimnewworkAsWorkbook
Setnewwork=Workbooks.Add
Withcc
If.Show=-1Then
DimvrtSelectedItemAsVariant
DimiAsInteger
i=1
ForEachvrtSelectedItemIn.SelectedItems
DimtempwbAsWorkbook
Settempwb=Workbooks.Open(vrtSelectedItem)
tempwb.Worksheets(1).CopyBefore:=newwork.Worksheets(i)
newwork.Worksheets(i).Name=VBA.Replace(tempwb.Name,".xls","")
tempwb.CloseSaveChanges:=False
i=i+1
NextvrtSelectedItem
EndIf
EndWith
Setcc=Nothing
EndSub
另外，代码中的dim建议全部提前吧。
㈥ CAD加载VBA时出现编译错误，请各位大神帮忙给看看，万分感谢！
帮助写的很清楚了，跟我excel
VBA开发的项目一样的问题。
把你VBA程序最上面的声明语句改一下就好了，把
Declare
Function
替换成
Declare
ptrsafe
Function
就OK了。32位软件没问题，只有64位软件里的VBA才有这问题。
㈦ excel vba 在运行时出现编译错误
不知道具体表格的结构是啥，但按常理推断，员工工资信息管理的表中，员工应该是竖向排列的，你需要的信息应该是在一列中而不是一行中，这样的话Cells(2, tempx).Value是不是应该改为 Cells( tempx,2).Value。 cells 和 range 的参数正好是相反的，RANGE（列行） CELLS（行，列）希望对你有帮助。另外请检查其他位置的CELLS（）是不是你想要的结果。
㈧ excel的VBA编译语法错误怎么改
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Cells.Count=1 Then
if target.row>=6 and target.row<=12 then
if target.column>=6 and target.column<=9 then
target="Test"
end if
end if
End If
End Sub
㈨ VBA程序编译时的错误提示
溢出错误一般是你代码中变量定义类型过小
赋值时超过该变量类型限制导致的
基本上
错误号和错误描述会同时出现
6错误号
溢出就是错误描述
㈩ 我在用excel中的vba定义函数，总是提示我编译错误，求高手解答
蓝色选中的代表另一个函数，系统里没有这个函数，所以报没有定义，你要编写一个同名的函数放到这个工作簿中才能编译成功，我不知道它原代码里函数的作用，所以更多的就帮不到你了，找到原代码吧！