作者bank89902595 (阿虎几)
看板Office
标题[问题] VBA内写函数(公式)_IF
时间Sun Dec 12 14:45:35 2021
软体: 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要写在公式内不是用 " & & " 包起来就可以了吗?
--
※ 发信站: 批踢踢实业坊(ptt.cc), 来自: 36.236.48.217 (台湾)
※ 文章网址: https://webptt.com/cn.aspx?n=bbs/Office/M.1639291537.A.61D.html
1F:推 waiter337: 1.对 但要注意真的是一般空白 可能有特殊空白字元 12/12 15:35
2F:→ waiter337: 承上 网页抓得很容易有特殊空白字元 12/12 15:35
3F:→ waiter337: 2 後面那段先不要写到程式码里面 先用录制巨集的方式 12/12 15:36
4F:→ soyoso: "=IF(B" & i & " = """","""", A" & i & " + 1)" 改为这样 12/12 15:36
5F:→ waiter337: 录制一段 你原本要打在工作表的函数 之後修改 12/12 15:37
6F:→ waiter337: 先录制巨集方法 可以先确认有多少"" 有的是""" 或"""" 12/12 15:38
谢谢两位协助!!
※ 编辑: bank89902595 (36.236.48.217 台湾), 12/12/2021 15:54:03