0

やあみんな私Compile Error: Expected:End of Statementは数式に変数を挿入し続けているので、このテーブルは異なるシート名に基づいて何度も使用できます。

私が欠けているものを教えてください。挿入しようとしているこの式で、構文エラーが発生します。

ActiveCell.Formula = "=INDEX(PrevSh & [LENGTH],MATCH([MATERIAL], PrevSh & [MATERIAL],0)) & "(" & COUNTIF(PrevSh & [LENGTH],INDEX(PrevSh & [LENGTH],MATCH([MATERIAL],PrevSh & [Material],0)) )&")"

Dim PrevSh As String
PrevSh = ActiveSheet.Previous.Name

Range(TableName & "[QTY OF LNG]").Select
ActiveCell.Formula = "=INDEX(PrevSh & [LENGTH],MATCH([MATERIAL], PrevSh & [MATERIAL],0)) & "(" & COUNTIF(PrevSh & [LENGTH],INDEX(PrevSh & [LENGTH],MATCH([MATERIAL],PrevSh & [Material],0)) )&")"
4

2 に答える 2