从VBA代码

时间:2016-08-26 15:57:43

标签: excel excel-vba excel-formula vba

我试图通过VBA代码将特定单元格放入公式。

这是我的公式:

=CONCATENATE("SK-",IF(A5+1<1000,IF(A5+1>=10,CONCATENATE("0",A5+1),CONCATENATE("00",A5+1)),A5+1),"-",RIGHT(J8,LEN(J8)-2))

我想将公式添加到单元格中,但在执行代码时会出现错误1004。

我正在尝试这个:

Sheets("Sheet1").Select
Range("J6").Formula = "=CONCATENATE('SK-',IF(A5+1<1000,IF(A5+1>=10,CONCATENATE('0',A5+1),CONCATENATE('00',A5+1)),A5+1),'-',RIGHT(J8,LEN(J8)-2))"

关于评论的任何问题发布!

1 个答案:

答案 0 :(得分:4)

Sheets("Sheet1").Range("J6").Formula = "=CONCATENATE(""SK-"",IF(A5+1<1000,IF(A5+1>=10,CONCATENATE(""0"",A5+1),CONCATENATE(""00"",A5+1)),A5+1),""-"",RIGHT(J8,LEN(J8)-2))"