Question

VBA在EXCEL中设置公式

在A9:A44区域中有的为空，现在需要用VBA代码在B9:B44中设置公式="J"&A9:A44,比如A9=1,出来结果是B=J1,当A列区域内为空值时，B列返回也为空。该怎么写代码？
哪位高手知道？很着急
二楼的不是不知道怎么写公式我写range("b9").formula = "="J"&A9"但是报错啊！~说缺少结束语句，错误就在"J"这里，去掉""出来的结果就错了

Answer 1

看起来你就是不知道怎么往单元格写入公式嘛，照这个格式写就好：
range("b9").formula = xxxxxxxxxxx

追问

不是不知道怎么写公式我写range("b9").formula = "="J"&A9"但是报错啊！~说缺少结束语句，错误就在"J"这里，去掉""出来的结果就错了

追答

for i = 9 to 44
range("b" & i).formula = "J" & range("a" & i).value

next i

注意VBA中的&号前后一定要留出空格，否则有时候无法识别

追问

好像可以了，如果A列中有空值，则B列就不再执行了怎么写？

追答

在循环中加入判断：
if not range("a" & i).value = "" then

Answer 2

=IF(A1="","",INDIRECT("j"&A1))下拉