软件: EXCEL_VBA
版本:365
For i = 11 To 29
If i = 11 Then
Range("A11").Value = 1
Else
Range("A" & i).Value = "=IF(B " & i & " = "","", A " & i & " + 1)"
End If
Next
Else那一行一直显示错误:应用程式或物件定义上错误
不明白到底哪里错了?
1.如果B&i=空白则显示空白,请问在函数中空白用""表示对吗?
2.变量i要写在公式内不是用 " & & " 包起来就可以了吗?

1.对 但要注意真的是一般空白 可能有特殊空白字符承上 网页抓得很容易有特殊空白字符2 后面那段先不要写到程式码里面 先用录制宏的方式

"=IF(B" & i & " = """","""", A" & i & " + 1)" 改为这样

录制一段 你原本要打在工作表的函数 之后修改先录制宏方法 可以先确认有多少"" 有的是""" 或""""