2016-08-26 16 views
1

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))" 

任意の質問のポストをコメントに!

+0

あなたの問題は、式そのものではなく、中にそれを置くあなたの方法である。あなたが 'シート(「シート1」)しようとする。レンジ(「J6」)。数式=「= TODAY()」 「問題はない。あなたが間違って綴っているか、かっこなどを逃している可能性があります。 –

+0

@TimEdwards数式が正式にシート上の数式を直接テストするなら、それは問題ありません。 – TimeToCode

+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))"

+0

ああ、コードが動作するようになりました。ご協力ありがとうございました! – TimeToCode

関連する問題